Schreiben Sie ein Prolog -Programm, um die Summe der Elemente in der angegebenen Liste zu finden.
domains
x = integer
l = integer*
predicates
sum(l,x)
clauses
sum([],0).
sum([X|List],Sum) :-
sum(List,Sum1),
Sum = X + Sum1.
Bad Butterfly