(prog (my_height_feet my_height_meters)
      (load "glob.lsp")
      (write-line "Common lisp output") ; write to stdout
      (write-line "What is your height in feet?")
      (setq my_height_feet (read)) ; input from stdin
      (setq my_height_meters (cvt_feet_to_meters my_height_feet))
      (write-line (format nil "my_height_feet = ~F" my_height_feet))
      (write-line (format nil "my_height_meters = ~F" my_height_meters)) 
)