(defun meval-test ()
	(meval '(defun fact (x y)
		(if (equal 1 x)
			x
			(* x (fact (- x 1))))))
	(meval '(fact 100)))