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

Domains
	list=integer*
Predicates
	sufix(list,list)
Clauses
	sufix(L,L).
	sufix(L,[_|T]):-sufix(L,T).

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