Search for blocks/addresses/...

Proofgold Proof

pf
Let x0 of type ι be given.
Assume H0: x0prim4 1.
Let x1 of type ιι be given.
Assume H1: ∀ x2 . x2x0x1 x2prim4 1.
Apply PowerI with 1, lam x0 (λ x2 . x1 x2).
Let x2 of type ι be given.
Assume H2: x2lam x0 (λ x3 . x1 x3).
Claim L3: x2 = 0
Apply and3E with setsum (proj0 x2) (proj1 x2) = x2, proj0 x2x0, proj1 x2x1 (proj0 x2), x2 = 0 leaving 2 subgoals.
Apply Sigma_eta_proj0_proj1 with x0, x1, x2.
The subproof is completed by applying H2.
Assume H3: setsum (proj0 x2) (proj1 x2) = x2.
Assume H4: proj0 x2x0.
Assume H5: proj1 x2x1 (proj0 x2).
Claim L6: proj0 x2 = 0
Apply SingE with 0, proj0 x2.
Apply Subq_1_Sing0 with proj0 x2.
Apply PowerE with 1, x0, proj0 x2 leaving 2 subgoals.
The subproof is completed by applying H0.
The subproof is completed by applying H4.
Claim L7: proj1 x2 = 0
Apply SingE with 0, proj1 x2.
Apply Subq_1_Sing0 with proj1 x2.
Apply PowerE with 1, x1 (proj0 x2), proj1 x2 leaving 2 subgoals.
Apply H1 with proj0 x2.
The subproof is completed by applying H4.
The subproof is completed by applying H5.
Apply H3 with λ x3 x4 . x3 = 0.
Apply L6 with λ x3 x4 . setsum x4 (proj1 x2) = 0.
Apply L7 with λ x3 x4 . setsum 0 x4 = 0.
The subproof is completed by applying setsum_0_0.
Apply L3 with λ x3 x4 . x41.
The subproof is completed by applying In_0_1.