inital commit

2026-02-11 17:24:09 +00:00
commit 42cde2128a
32 changed files with 1997 additions and 0 deletions
@@ -0,0 +1,37 @@
+type failure_mode =
+  | Preserved
+  | Representation_exposure
+  | Strictness_shift
+  | Type_error of string
+  | Other_failure of string
+
+type obligation_status =
+  | Discharged
+  | Assumed
+  | Refuted
+
+type obligation_result = {
+  obligation : Pipeline.obligation;
+  status : obligation_status;
+  note : string;
+}
+
+type case_audit = {
+  case : Corpus.case;
+  compiled : Pipeline.compiled;
+  comparison : Relation.comparison;
+  source_trace : Source.trace;
+  specialised_trace : Source.trace;
+  inlined_trace : Source.trace;
+  target_trace : Target.trace;
+  typecheck : (unit, string) result;
+  failure_mode : failure_mode;
+  obligations : obligation_result list;
+}
+
+val audit_case : Corpus.case -> case_audit
+val failure_mode_to_string : failure_mode -> string
+val obligation_status_to_string : obligation_status -> string
+val emit_case_audit : case_audit -> string
+val emit_matrix : case_audit list -> string
+