lean4-htt/tests/lean/run/463.lean
2021-08-12 06:18:47 -07:00

7 lines
263 B
Text

structure A := (a b : Nat)
structure B extends A := (c : Nat)
structure C := (a b c : Nat)
structure D := (toA : A) (c : Nat)
def foo (s : C) : B := {s with} -- works in lean 4, works in lean 3
def bar (s : D) : B := {s with} -- works in lean 4, fails in lean 3