1(** Unit tests for the Types module *) 2 3val suite : string * unit Alcotest.test_case list 4(** [suite] is the test suite for Types module functions. *)