;;; -*- Mode:LISP; Package:MACSYMA; Base:10 -*-


(defun $fooy () '$ok_man)