lean4-htt/tests/lean/run/level.lean
2020-09-11 15:31:14 -07:00

8 lines
287 B
Text

import Lean.Level
new_frontend
open Lean
#eval levelZero == levelZero
#eval levelZero == mkLevelSucc levelZero
#eval mkLevelMax (mkLevelSucc levelZero) levelZero == mkLevelSucc levelZero
#eval mkLevelMax (mkLevelSucc levelZero) levelZero == mkLevelMax (mkLevelSucc levelZero) levelZero