mirror
/
RosettaCodeData
mirror of https://github.com/acmeism/RosettaCodeData.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity
RosettaCodeData/Task/Metaprogramming/Prolog/metaprogramming-1.pro

4 lines
93 B
Prolog
Raw Permalink Blame History

:- initialization(main).
main :- clause(less_than(1,2),B),writeln(B).
less_than(A,B) :- A<B.
Reference in New Issue View Git Blame Copy Permalink