lean4-htt/tests/lean/run/1805.lean
2017-09-05 14:20:22 -07:00

20 lines
467 B
Text
Raw Blame History

This file contains ambiguous Unicode characters

This file contains Unicode characters that might be confused with other characters. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

example (x y z x' y' z': ) (h : (x, y, z) = (x', y', z')) : false :=
begin
injection h,
guard_hyp h_1 := x = x',
guard_hyp h_2 := (y, z) = (y', z'),
injection h_2,
guard_hyp h_3 := y = y',
guard_hyp h_4 := z = z',
admit
end
example (x y z x' y' z': ) (h : (x, y, z) = (x', y', z')) : false :=
begin
injections,
guard_hyp h_1 := x = x',
guard_hyp h_2 := (y, z) = (y', z'),
guard_hyp h_3 := y = y',
guard_hyp h_4 := z = z',
admit
end