lean4-htt/tests/lean/elab9.lean.expected.out
2016-07-27 16:08:33 -07:00

7 lines
628 B
Text

λ (A : Type) [_inst_1 : has_add A] [_inst_2 : has_zero A] (a : A) (H : @eq A (@add A _inst_1 a (@zero A _inst_2)) a)
[_inst_3 : has_add A] (H : @eq A a (@add A _inst_3 (@zero A _inst_2) (@zero A _inst_2))), @add A _inst_3 a a :
Π (A : Type) [_inst_1 : has_add A] [_inst_2 : has_zero A] (a : A),
@eq A (@add A _inst_1 a (@zero A _inst_2)) a →
(Π [_inst_3 : has_add A], @eq A a (@add A _inst_3 (@zero A _inst_2) (@zero A _inst_2)) → A)
λ (a b : nat) (H : @gt nat nat.nat_has_lt a b) [_inst_4 : has_lt nat], @lt nat _inst_4 a b :
Π (a b : nat), @gt nat nat.nat_has_lt a b → (Π [_inst_4 : has_lt nat], Prop)