43 lines
856 B
Text
43 lines
856 B
Text
constants f g h : ℕ → ℕ
|
||
axiom H_f_g : ∀ n, f (g n) = n
|
||
|
||
example (m : ℕ) : h m = h m :=
|
||
begin
|
||
definev n : ℕ := g m,
|
||
assertv H : f n = m := begin dsimp, rw H_f_g end,
|
||
subst H, -- Error here
|
||
end
|
||
|
||
set_option pp.instantiate_mvars false
|
||
|
||
example (m : ℕ) : h m = h m :=
|
||
begin
|
||
define n : ℕ, -- add metavar
|
||
exact g m,
|
||
assertv H : f n = m := begin dsimp, rw H_f_g end,
|
||
subst H, -- Error here
|
||
end
|
||
|
||
example (m : ℕ) : h m = h m :=
|
||
begin
|
||
definev n : ℕ := g m,
|
||
assertv H : f n = m := begin dsimp, rw H_f_g end,
|
||
subst m, -- Error here
|
||
end
|
||
|
||
set_option pp.instantiate_mvars false
|
||
|
||
example (m : ℕ) : h m = h m :=
|
||
begin
|
||
define n : ℕ, -- add metavar
|
||
exact g m,
|
||
assertv H : f n = m := begin dsimp, rw H_f_g end,
|
||
subst m, -- Error here
|
||
end
|
||
|
||
example (m p: ℕ) : h m = h m :=
|
||
begin
|
||
definev a : ℕ := g p,
|
||
definev n : ℕ := g a,
|
||
clear p -- Error here
|
||
end
|