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 context 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