Sha256: c263d131e70da00d0aaa47139695886c5dd5e33c51d6e63775e1bf5921b327ed
Contents?: true
Size: 859 Bytes
Versions: 63
Compression:
Stored size: 859 Bytes
Contents
open OUnit2
open Difference_of_squares
let ae exp got _test_ctxt = assert_equal exp got
let (* SUITE square_the_sum_of_the_numbers_up_to_the_given_number *)square_of_sum_tests = [
(* TEST
"$description" >::
ae $expected (square_of_sum $number);
END TEST *)
]
(* END SUITE *)
let (* SUITE sum_the_squares_of_the_numbers_up_to_the_given_number *)sum_of_squares_tests = [
(* TEST
"$description" >::
ae $expected (sum_of_squares $number);
END TEST *)
]
(* END SUITE *)
let (* SUITE subtract_sum_of_squares_from_square_of_sums *)difference_of_squares_tests = [
(* TEST
"$description" >::
ae $expected (difference_of_squares $number);
END TEST *)
]
(* END SUITE *)
let () =
run_test_tt_main (
"difference of squares tests" >:::
List.concat [square_of_sum_tests; sum_of_squares_tests; difference_of_squares_tests]
)
Version data entries
63 entries across 63 versions & 1 rubygems