:- q(X). :- 1(X), nl. object test : root, top { var x = :hush:, y= x+y*z , z = plus y , x plus y plus z , q. var z = min x, y = x min c. member(X,[H,R|T2]) :- member(X,[ H | [Y,Z] ]), nl. p(a). p(a, int X,f(Y)). m(Y) :- C!m(X). };
Hush Online Technology
hush@cs.vu.nl
11/03/98 |
![]() |
![]() |