Sha256: 0317fb72ecc89bd798b470a00ea65e23ea411375765cfebcb76fd96ab689124e

Contents?: true

Size: 962 Bytes

Versions: 45

Compression:

Stored size: 962 Bytes

Contents

open Core.Std
open OUnit2
open Space_age

(* Assert In Delta *)
let ae ~delta:delta exp got _ctxt =
  let msg = sprintf "Expected %f got %f, difference is greater than %f"
                    exp got delta in
  assert_bool msg (cmp_float ~epsilon:delta exp got)

let tests = [
   "age on Earth" >::
      ae ~delta:0.005 31.69 (age_on Earth 1000000000);
   "age on Mercury" >::
      ae ~delta:0.005 280.88 (age_on Mercury 2134835688);
   "age on Venus" >::
      ae ~delta:0.005 9.78 (age_on Venus 189839836);
   "age on Mars" >::
      ae ~delta:0.005 39.25 (age_on Mars 2329871239);
   "age on Jupiter" >::
      ae ~delta:0.005 2.41 (age_on Jupiter 901876382);
   "age on Saturn" >::
      ae ~delta:0.005 3.23 (age_on Saturn 3000000000);
   "age on Uranus" >::
      ae ~delta:0.005 1.21 (age_on Uranus 3210123456);
   "age on Neptune" >::
      ae ~delta:0.005 1.58 (age_on Neptune 8210123456);
]

let () =
  run_test_tt_main ("space-age tests" >::: tests)

Version data entries

45 entries across 45 versions & 1 rubygems

Version Path
trackler-2.1.0.12 tracks/ocaml/exercises/space-age/test.ml
trackler-2.1.0.11 tracks/ocaml/exercises/space-age/test.ml
trackler-2.1.0.10 tracks/ocaml/exercises/space-age/test.ml
trackler-2.1.0.9 tracks/ocaml/exercises/space-age/test.ml
trackler-2.1.0.8 tracks/ocaml/exercises/space-age/test.ml
trackler-2.1.0.7 tracks/ocaml/exercises/space-age/test.ml
trackler-2.1.0.6 tracks/ocaml/exercises/space-age/test.ml
trackler-2.1.0.5 tracks/ocaml/exercises/space-age/test.ml
trackler-2.1.0.4 tracks/ocaml/exercises/space-age/test.ml
trackler-2.1.0.3 tracks/ocaml/exercises/space-age/test.ml
trackler-2.1.0.2 tracks/ocaml/exercises/space-age/test.ml
trackler-2.1.0.1 tracks/ocaml/exercises/space-age/test.ml
trackler-2.1.0.0 tracks/ocaml/exercises/space-age/test.ml
trackler-2.0.8.55 tracks/ocaml/exercises/space-age/test.ml
trackler-2.0.8.54 tracks/ocaml/exercises/space-age/test.ml
trackler-2.0.8.53 tracks/ocaml/exercises/space-age/test.ml
trackler-2.0.8.52 tracks/ocaml/exercises/space-age/test.ml
trackler-2.0.8.51 tracks/ocaml/exercises/space-age/test.ml
trackler-2.0.8.50 tracks/ocaml/exercises/space-age/test.ml
trackler-2.0.8.49 tracks/ocaml/exercises/space-age/test.ml