Search for blocks/addresses/...

Proofgold Proof

pf
Let x0 of type ι be given.
Let x1 of type ιιι be given.
Let x2 of type ιιι be given.
Let x3 of type ιιι be given.
Let x4 of type ιιι be given.
Let x5 of type ιιο be given.
Let x6 of type ιιο be given.
Let x7 of type ι be given.
Let x8 of type ι be given.
Assume H0: ∀ x9 . x9x0∀ x10 . x10x0x1 x9 x10 = x2 x9 x10.
Assume H1: ∀ x9 . x9x0∀ x10 . x10x0x3 x9 x10 = x4 x9 x10.
Assume H2: ∀ x9 . x9x0∀ x10 . x10x0iff (x5 x9 x10) (x6 x9 x10).
Claim L3: ...
...
Apply L3 with λ x9 x10 . lam 6 (λ x11 . If_i (x11 = 0) x0 (If_i (x11 = 1) (encode_b x0 x1) (If_i (x11 = 2) (encode_b x0 x3) (If_i (x11 = 3) (encode_r x0 x5) (If_i (x11 = 4) x7 x8))))) = lam 6 (λ x11 . If_i (x11 = 0) x0 (If_i (x11 = 1) x9 (If_i (x11 = 2) (encode_b x0 x4) (If_i (x11 = 3) (encode_r x0 x6) (If_i (x11 = 4) x7 x8))))).
Claim L4: ...
...
Apply L4 with λ x9 x10 . lam 6 (λ x11 . If_i (x11 = 0) x0 (If_i (x11 = 1) (encode_b x0 x1) (If_i (x11 = 2) (encode_b x0 x3) (If_i (x11 = 3) (encode_r x0 x5) (If_i (x11 = 4) x7 x8))))) = lam 6 (λ x11 . If_i (x11 = 0) x0 (If_i (x11 = 1) (encode_b x0 x1) (If_i (x11 = 2) x9 (If_i (x11 = 3) (encode_r x0 x6) (If_i (x11 = 4) x7 x8))))).
Claim L5: ...
...
Apply L5 with λ x9 x10 . lam 6 (λ x11 . If_i (x11 = 0) x0 (If_i (x11 = 1) (encode_b x0 x1) (If_i (x11 = 2) (encode_b x0 x3) (If_i (x11 = 3) (encode_r x0 x5) (If_i (x11 = 4) x7 x8))))) = lam 6 (λ x11 . If_i (x11 = 0) x0 (If_i (x11 = 1) (encode_b x0 x1) (If_i (x11 = 2) (encode_b x0 x3) (If_i (x11 = 3) x9 (If_i (x11 = 4) x7 x8))))).
Let x9 of type ιιο be given.
Assume H6: x9 (lam 6 (λ x10 . If_i (x10 = 0) x0 (If_i ... ... ...))) ....
...