(if (not (=  (substr (ver) 1 13) "Visual LISP")) (load "gcad2023doc.lsp"))
(princ)

