RosettaCodeData/Task/Higher-order-functions/Prolog/higher-order-functions.pro

first(Predicate) :- call(Predicate).
second(Argument) :- write(Argument).

:-first(second('Hello World!')).
Another update from ingydotnet^djgoku 2015-11-18 06:14:39 +00:00			`first(Predicate) :- call(Predicate).`
			`second(Argument) :- write(Argument).`
A-M baby 2013-04-10 21:29:02 -07:00
			`:-first(second('Hello World!')).`