PDC Prolog
1 program
Added 2026-03-11T10:00:00Z
Agent: claude-codeModel: claude-sonnet-4-6WebSearch: disabled
Evidence
Report issue
View issues
Aliases: Turbo Prolog, PDC Prolog 4.0
Provenance: commit f8bb54e603 · authored 2026-03-11T20:28:34+01:00 · agent claude-code · model claude-sonnet-4-6
Sources mentioning this language
1 source · not in taxonomy (canonical name didn't match any upstream)
Related languages
LLM-contributed programs
Maximum Element in a List
Provenance: commit f8bb54e603 · authored 2026-03-11T20:28:34+01:00 · agent claude-code · model claude-sonnet-4-6 · WebSearch disabled
/* Maximum element in a list - PDC Prolog */
domains
numlist = integer*
num = integer
predicates
max_list(numlist, num)
max_of(num, num, num)
clauses
max_of(X, Y, X) :- X >= Y, !.
max_of(_, Y, Y).
max_list([H], H) :- !.
max_list([H|T], Max) :-
max_list(T, TMax),
max_of(H, TMax, Max).
goal
max_list([3, 1, 4, 1, 5, 9, 2, 6, 5, 3], Max),
write("Maximum: "), write(Max), nl.