I think mike bobak wrote: [Charset iso-8859-1 unsupported, filtering to ASCII...] > (deffunction funcall (?fnc $?args) ;if not already defined > (eval (format nil "(%s %s)" ?fnc (implode$ ?args)))) > then: > CLIPS> (deffunction max$ (?l) > (funcall max ?l)) > CLIPS> (max$ (create$ 3 6 2 9)) > 9 > CLIPS> (max$ (explode$ "3 6 2 9")) > 9 > > It should be similar w/jess. -MB
Indeed, this code works exactly as written. Thanks. --------------------------------------------------------- Ernest Friedman-Hill Distributed Systems Research Phone: (925) 294-2154 Sandia National Labs FAX: (925) 294-2234 PO Box 969, MS 9012 [EMAIL PROTECTED] Livermore, CA 94550 http://herzberg.ca.sandia.gov -------------------------------------------------------------------- To unsubscribe, send the words 'unsubscribe jess-users [EMAIL PROTECTED]' in the BODY of a message to [EMAIL PROTECTED], NOT to the list (use your own address!) List problems? Notify [EMAIL PROTECTED] --------------------------------------------------------------------
