Jane Street OCaml Challenge: Basic Types

In OCaml there are 6 basic types: int, float, char, string, bool, and unit.

Try these values:

let four = 4

let float_four = 4.

Functions

Define the average of two integers or floats.

let int_average x y = failwith "For you to implement"

let float_average x y = failwith "For you to implement"

let first_name = "Fred"

let last_name : string = "Flintstone"

let full_name = first_name ^ " " ^ last_name

let a_boolean_false : bool = false

let () = assert (true || a_boolean_false)

let () = Stdio.print_endline "Hi, My name is "; Stdio.print_endline full_name; Stdio.print_endline " and I am 5 years old"

let () = Stdio.printf "Hi, My name is %s and I am %d years old\\n" full_name 5

let%test "Testing int_average..." = Int.equal (int_average 5 5) 5

let%test "Testing int_average..." = Int.(=) (int_average 50 100) 75

let%test "Testing float_average..." = Float.(=) (float_average 5. 5.) 5.

let%test "Testing float_average..." = Float.equal (float_average 5. 10.) 7.5