2014-08-25 02:58:48 +00:00
|
|
|
import logic
|
2014-07-14 04:04:01 +00:00
|
|
|
using tactic
|
|
|
|
|
|
|
|
|
|
section
|
|
|
|
|
set_option pp.universes true
|
|
|
|
|
set_option pp.implicit true
|
|
|
|
|
parameter {A : Type}
|
|
|
|
|
parameters {a b : A}
|
|
|
|
|
parameter H : a = b
|
|
|
|
|
parameters H1 H2 : b = a
|
|
|
|
|
check H1
|
|
|
|
|
check H
|
|
|
|
|
check H2
|
|
|
|
|
end
|
