7 lines
279 B
Text
7 lines
279 B
Text
import Init.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
|