(** Test harness entry point. Suites are ordered as the modules layer: vocabulary, then what is prescribed, then what was performed, then what it means, then the application service that orchestrates them, then serialization, durable storage, and the web tier. *) let () = Alcotest.run "hito" (Test_exercise.suite @ Test_recovery.suite @ Test_prescription.suite @ Test_evidence.suite @ Test_progression.suite @ Test_service.suite @ Test_codec.suite @ Test_sqlite_repo.suite @ Test_decode.suite @ Test_web.suite)