RosettaCodeData/Task/Apply-a-callback-to-an-array/Prolog/apply-a-callback-to-an-array.pro

6 lines
97 B
Prolog
Raw Permalink Normal View History

2013-04-10 14:58:50 -07:00
?- assert((fun(X, Y) :- Y is 2 * X)).
true.
?- maplist(fun, [1,2,3,4,5], L).
L = [2,4,6,8,10].