2 (format t
"colnew.system = ~S~%" (merge-pathnames (make-pathname :name
"colnew" :type
"system") (maxima-load-pathname-directory)))
3 (load (merge-pathnames (make-pathname :name
"colnew" :type
"system") (maxima-load-pathname-directory)))
5 (mk:oos
"colnew-if" :compile
)