:- write(start), nl. dlp_object(X):- write(xxxobject(X)),nl. end_object :- write(the_end),nl. object dummy : root, top { var x, y= x+y*z , z, q. dvmember(X,[H,R|T2]) :- dvmember(X,[ H,Y,Z ]). p(a). p(a,X,f(Y)). m(Y) :- m(X). };
Hush Online Technology
hush@cs.vu.nl
11/03/98 |
![]() |
![]() |