open Printf let rec pgcd u v = if v = 0 then u else pgcd v (u mod v) ;; let u = int_of_string Sys.argv.(1) and v = int_of_string Sys.argv.(2) ;; let w = pgcd u v ;; let _ = printf "%i\n" w ; exit 0 ;;