RosettaCodeData/Task/Function-composition/Prolog/function-composition.pro
Ingy döt Net db842d013d A-M baby
2013-04-10 21:29:02 -07:00

4 lines
84 B
Prolog

:- use_module(lambda).
compose(F,G, FG) :-
FG = \X^Z^(call(G,X,Y), call(F,Y,Z)).