Write Nat/Unit/Empty/Id Eliminators Through NbE and Bidir Elaboration

This commit is contained in:
2026-04-19 13:55:05 +00:00
parent a154e2b98c
commit 85be37b1d6
8 changed files with 374 additions and 2 deletions
+7
View File
@@ -23,8 +23,15 @@ def main : IO Unit := do
runOne "depPair" Examples.depPairAnn
runOne "depPair.1" Examples.fstDepPair
runOne "depPair.2" Examples.sndDepPair
runOne "nat fold id" Examples.natFoldId
runOne "unit elim" Examples.unitToNat
runOne "empty absurd" Examples.absurdNat
runOne "refl zero" Examples.reflZero
runOne "id elim" Examples.idElimNat
runOne "let universe" Examples.letUniverse
runOne "omega (bad)" Examples.omegaAnn
runOne "unknown var" Examples.unknownVar
runOne "pair mismatch" Examples.pairMismatch
runOne "bad fst" Examples.badFst
runOne "bad succ" Examples.badSucc
runOne "bad refl" Examples.badRefl