19 lines
329 B
Text
19 lines
329 B
Text
example (p : Prop) (h : p) : tt → p :=
|
|
begin
|
|
simp, assumption
|
|
end
|
|
|
|
local attribute [semireducible] coe_sort_bool
|
|
|
|
example (p : Prop) (h : p) : tt → p :=
|
|
begin
|
|
fail_if_success {simp},
|
|
intro, assumption
|
|
end
|
|
|
|
local attribute [reducible] coe_sort_bool
|
|
|
|
example (p : Prop) (h : p) : tt → p :=
|
|
begin
|
|
simp, assumption
|
|
end
|