lean4-htt/old_tests/tests/lean/struct_class.lean
2018-04-10 12:56:55 -07:00

12 lines
183 B
Text

prelude
import init.core
class point (A : Type*) (B : Type*) :=
mk :: (x : A) (y : B)
#print point
structure point2 (A : Type*) (B : Type*) :=
mk :: (x : A) (y : B)
#print point2