Search for blocks/addresses/...

Proofgold Proof

pf
Let x0 of type ι be given.
Let x1 of type ιο be given.
Assume H0: ∀ x2 . x1 x2∀ x3 . x3x2nIn x0 x3.
Let x2 of type ι be given.
Let x3 of type ι be given.
Assume H1: x1 x2.
Assume H2: x1 x3.
Let x4 of type ο be given.
Assume H3: ∀ x5 . and (x1 x5) (∃ x6 . and (x1 x6) (pair_tag x0 x2 x3 = pair_tag x0 x5 x6))x4.
Apply H3 with x2.
Apply andI with x1 x2, ∃ x5 . and (x1 x5) (pair_tag x0 x2 x3 = pair_tag x0 x2 x5) leaving 2 subgoals.
The subproof is completed by applying H1.
Let x5 of type ο be given.
Assume H4: ∀ x6 . and (x1 x6) (pair_tag x0 x2 x3 = pair_tag x0 x2 x6)x5.
Apply H4 with x3.
Apply andI with x1 x3, pair_tag x0 x2 x3 = pair_tag x0 x2 x3 leaving 2 subgoals.
The subproof is completed by applying H2.
Let x6 of type ιιο be given.
Assume H5: x6 (pair_tag x0 x2 x3) (pair_tag x0 x2 x3).
The subproof is completed by applying H5.