RosettaCodeData/Task/Variadic-function/Prolog/variadic-function-2.pro

4 lines
92 B
Prolog
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
execute( Term ) :-
Term =.. [F | Args],
forall( member(X,Args), (G =.. [F,X], G, nl) ).