1 (* Float test, part of calendar test which was failing. *)
5 let x = 1 * 3600 + 2 * 60 + 3 ;;
7 printf "minutes = %g\n" (float x /. 60.) ;;
9 printf "minutes (immediate) = 62.05 is %b\n" ((float x /. 60.) = 62.05) ;;
11 let m = float x /. 60. ;;
13 printf "minutes (variable) = 62.05 is %b\n" (m = 62.05) ;;