lean2/tests/lean/run/one.lean

inductive one.{l} : Type.{max 1 l} :=
unit : one.{l}

set_option pp.universes true
check one


inductive one2.{l} : Type.{max 1 l} :=
unit : one2

check one2

section foo
  universe l2
  parameter A : Type.{l2}

  inductive wrapper.{l} : Type.{max 1 l l2} :=
  mk : A → wrapper.{l2 l}
  check wrapper
end foo

check wrapper