lean2/tests/lean/run/record2.lean

import logic data.unit

set_option pp.universes true

section
  parameter (A : Type)

  section
    parameter (B : Type)

    structure point :=
    mk :: (x : A) (y : B)

    check point
    check point.mk
    check point.x
  end

  check point
  check point.mk
  check point.x
end