lean4-htt/tests/lean/run/level.lean
Leonardo de Moura 9c0bd9dd41 chore: fix tests
2020-05-26 15:05:00 -07:00

7 lines
274 B
Text

import Lean.Level
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