Program di bawah ini adalah program prolog yang digunakan untuk mengetahui apakah suatu list input merupakan Prefix (penggalan awal) dari suatu list lain atau bukan.

Domains
	list=integer*
Predicates
	prefix(list,list)
Clauses
	prefix([],_).
	prefix([H|T],[H|U]):-prefix(T,U).

Program di atas telah diuji dan berjalan menggunakan Turbo Prolog dalam DOSBox.