lean4-htt/tests/compiler/uset.lean
2023-01-09 12:25:37 +00:00

10 lines
189 B
Text

structure Point where
x : USize
y : UInt32
@[noinline] def Point.right (p : Point) : Point :=
{ p with x := p.x + 1 }
def main : IO Unit :=
IO.println (Point.right ⟨0, 0⟩).x