RosettaCodeData/Task/Variadic-function/Prolog/variadic-function-2.pro
2023-07-01 13:44:08 -04:00

3 lines
92 B
Prolog

execute( Term ) :-
Term =.. [F | Args],
forall( member(X,Args), (G =.. [F,X], G, nl) ).