zettacode.files/arithmetic.integer/rescript.txt in zettacode-0.1.0 vs zettacode.files/arithmetic.integer/rescript.txt in zettacode-0.1.1
- old
+ new
@@ -1,15 +1,15 @@
- = _of_(S.v[2])
- b = _f_(S.[3])
+let a = int_of_string(Sys.argv[2])
+let b = int_of_string(Sys.argv[3])
- u = + b
- ffc = - b
- uc = * b
- = b
- = (, b)
+let sum = a + b
+let difference = a - b
+let product = a * b
+let division = a / b
+let remainder = mod(a, b)
-J.(" + b = " ++ _f_(u))
-J.(" - b = " ++ _f_(ffc))
-J.(" * b = " ++ _f_(uc))
-J.(" b = " ++ _f_())
-J.(" % b = " ++ _f_())
+Js.log("a + b = " ++ string_of_int(sum))
+Js.log("a - b = " ++ string_of_int(difference))
+Js.log("a * b = " ++ string_of_int(product))
+Js.log("a / b = " ++ string_of_int(division))
+Js.log("a % b = " ++ string_of_int(remainder))