(defun main (&rest argv) (declare (ignorable argv)) (format t "~d~%" (gcd (read) (read)))) (main)