DATA_OBJECT result;

   Eval("(find-all-facts ((?p person)) (> ?p:age 18))",&result);