Search for blocks/addresses/...

Proofgold Proof

pf
Let x0 of type ι be given.
Assume H0: x0complex.
Claim L1: CSNo x0
Apply complex_CSNo with x0.
The subproof is completed by applying H0.
Apply complex_E with x0, recip_CSNo x0complex leaving 2 subgoals.
The subproof is completed by applying H0.
Let x1 of type ι be given.
Assume H2: x1real.
Let x2 of type ι be given.
Assume H3: x2real.
Assume H4: x0 = SNo_pair x1 x2.
Claim L5: CSNo_Re x0real
Apply H4 with λ x3 x4 . CSNo_Re x4real.
Apply complex_Re_eq with x1, x2, λ x3 x4 . x4real leaving 3 subgoals.
The subproof is completed by applying H2.
The subproof is completed by applying H3.
The subproof is completed by applying H2.
Claim L6: CSNo_Im x0real
Apply H4 with λ x3 x4 . CSNo_Im x4real.
Apply complex_Im_eq with x1, x2, λ x3 x4 . x4real leaving 3 subgoals.
The subproof is completed by applying H2.
The subproof is completed by applying H3.
The subproof is completed by applying H3.
Claim L7: exp_SNo_nat (CSNo_Re x0) 2real
Apply exp_SNo_nat_2 with CSNo_Re x0, λ x3 x4 . x4real leaving 2 subgoals.
Apply CSNo_ReR with x0.
The subproof is completed by applying L1.
Apply real_mul_SNo with CSNo_Re x0, CSNo_Re x0 leaving 2 subgoals.
The subproof is completed by applying L5.
The subproof is completed by applying L5.
Claim L8: exp_SNo_nat (CSNo_Im x0) 2real
Apply exp_SNo_nat_2 with CSNo_Im x0, λ x3 x4 . x4real leaving 2 subgoals.
Apply CSNo_ImR with x0.
The subproof is completed by applying L1.
Apply real_mul_SNo with CSNo_Im x0, CSNo_Im x0 leaving 2 subgoals.
The subproof is completed by applying L6.
The subproof is completed by applying L6.
Claim L9: add_SNo (exp_SNo_nat (CSNo_Re x0) 2) (exp_SNo_nat (CSNo_Im x0) 2)real
Apply real_add_SNo with exp_SNo_nat (CSNo_Re x0) 2, exp_SNo_nat (CSNo_Im x0) 2 leaving 2 subgoals.
The subproof is completed by applying L7.
The subproof is completed by applying L8.
Apply complex_I with div_SNo (CSNo_Re x0) (add_SNo (exp_SNo_nat (CSNo_Re x0) 2) (exp_SNo_nat (CSNo_Im x0) 2)), minus_SNo (div_SNo (CSNo_Im x0) (add_SNo (exp_SNo_nat (CSNo_Re x0) 2) (exp_SNo_nat (CSNo_Im x0) 2))) leaving 2 subgoals.
Apply real_div_SNo with CSNo_Re x0, add_SNo (exp_SNo_nat (CSNo_Re x0) 2) (exp_SNo_nat (CSNo_Im x0) 2) leaving 2 subgoals.
The subproof is completed by applying L5.
The subproof is completed by applying L9.
Apply real_minus_SNo with div_SNo (CSNo_Im x0) (add_SNo (exp_SNo_nat (CSNo_Re x0) 2) (exp_SNo_nat (CSNo_Im x0) 2)).
Apply real_div_SNo with CSNo_Im x0, add_SNo (exp_SNo_nat (CSNo_Re x0) 2) (exp_SNo_nat (CSNo_Im x0) 2) leaving 2 subgoals.
The subproof is completed by applying L6.
The subproof is completed by applying L9.