lean4-htt/tests/lean/unsolved_proof_qed.lean
2016-06-10 18:29:41 -07:00

7 lines
227 B
Text

exit
example (a b c : nat) (H₁ : a = b) (H₂ : b = c) : a = c :=
proof eq.trans H₁ _ qed
example (a b c : nat) (H₁ : a = b) (H₂ : b = c) : a = c :=
have aux : c = a, proof eq.trans _ (eq.symm H₁) qed,
(eq.symm aux)