ILE Home Intuitionistic Logic Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  ILE Home  >  Th. List  >  pythagtrip GIF version

Theorem pythagtrip 12919
Description: Parameterize the Pythagorean triples. If 𝐴, 𝐵, and 𝐶 are naturals, then they obey the Pythagorean triple formula iff they are parameterized by three naturals. This proof follows the Isabelle proof at http://afp.sourceforge.net/entries/Fermat3_4.shtml. This is Metamath 100 proof #23. (Contributed by Scott Fenton, 19-Apr-2014.)
Assertion
Ref Expression
pythagtrip ((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) → (((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ↔ ∃𝑛 ∈ ℕ ∃𝑚 ∈ ℕ ∃𝑘 ∈ ℕ ({𝐴, 𝐵} = {(𝑘 · ((𝑚↑2) − (𝑛↑2))), (𝑘 · (2 · (𝑚 · 𝑛)))} ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2))))))
Distinct variable groups:   𝐴,𝑘,𝑚,𝑛   𝐵,𝑘,𝑚,𝑛   𝐶,𝑘,𝑚,𝑛

Proof of Theorem pythagtrip
StepHypRef Expression
1 divgcdodd 12778 . . . . . . 7 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ) → (¬ 2 ∥ (𝐴 / (𝐴 gcd 𝐵)) ∨ ¬ 2 ∥ (𝐵 / (𝐴 gcd 𝐵))))
213adant3 1044 . . . . . 6 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) → (¬ 2 ∥ (𝐴 / (𝐴 gcd 𝐵)) ∨ ¬ 2 ∥ (𝐵 / (𝐴 gcd 𝐵))))
32adantr 276 . . . . 5 (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2)) → (¬ 2 ∥ (𝐴 / (𝐴 gcd 𝐵)) ∨ ¬ 2 ∥ (𝐵 / (𝐴 gcd 𝐵))))
4 pythagtriplem19 12918 . . . . . . 7 (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ∧ ¬ 2 ∥ (𝐴 / (𝐴 gcd 𝐵))) → ∃𝑛 ∈ ℕ ∃𝑚 ∈ ℕ ∃𝑘 ∈ ℕ (𝐴 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐵 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2)))))
543expia 1232 . . . . . 6 (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2)) → (¬ 2 ∥ (𝐴 / (𝐴 gcd 𝐵)) → ∃𝑛 ∈ ℕ ∃𝑚 ∈ ℕ ∃𝑘 ∈ ℕ (𝐴 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐵 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2))))))
6 simp12 1055 . . . . . . . 8 (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ∧ ¬ 2 ∥ (𝐵 / (𝐴 gcd 𝐵))) → 𝐵 ∈ ℕ)
7 simp11 1054 . . . . . . . 8 (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ∧ ¬ 2 ∥ (𝐵 / (𝐴 gcd 𝐵))) → 𝐴 ∈ ℕ)
8 simp13 1056 . . . . . . . 8 (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ∧ ¬ 2 ∥ (𝐵 / (𝐴 gcd 𝐵))) → 𝐶 ∈ ℕ)
9 nnsqcl 10917 . . . . . . . . . . . . . 14 (𝐴 ∈ ℕ → (𝐴↑2) ∈ ℕ)
109nncnd 9199 . . . . . . . . . . . . 13 (𝐴 ∈ ℕ → (𝐴↑2) ∈ ℂ)
11103ad2ant1 1045 . . . . . . . . . . . 12 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) → (𝐴↑2) ∈ ℂ)
12 nnsqcl 10917 . . . . . . . . . . . . . 14 (𝐵 ∈ ℕ → (𝐵↑2) ∈ ℕ)
1312nncnd 9199 . . . . . . . . . . . . 13 (𝐵 ∈ ℕ → (𝐵↑2) ∈ ℂ)
14133ad2ant2 1046 . . . . . . . . . . . 12 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) → (𝐵↑2) ∈ ℂ)
1511, 14addcomd 8372 . . . . . . . . . . 11 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) → ((𝐴↑2) + (𝐵↑2)) = ((𝐵↑2) + (𝐴↑2)))
1615eqeq1d 2240 . . . . . . . . . 10 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) → (((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ↔ ((𝐵↑2) + (𝐴↑2)) = (𝐶↑2)))
1716biimpa 296 . . . . . . . . 9 (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2)) → ((𝐵↑2) + (𝐴↑2)) = (𝐶↑2))
18173adant3 1044 . . . . . . . 8 (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ∧ ¬ 2 ∥ (𝐵 / (𝐴 gcd 𝐵))) → ((𝐵↑2) + (𝐴↑2)) = (𝐶↑2))
19 nnz 9542 . . . . . . . . . . . . . 14 (𝐴 ∈ ℕ → 𝐴 ∈ ℤ)
20193ad2ant1 1045 . . . . . . . . . . . . 13 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) → 𝐴 ∈ ℤ)
21 nnz 9542 . . . . . . . . . . . . . . 15 (𝐵 ∈ ℕ → 𝐵 ∈ ℤ)
22213ad2ant2 1046 . . . . . . . . . . . . . 14 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) → 𝐵 ∈ ℤ)
2322adantr 276 . . . . . . . . . . . . 13 (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2)) → 𝐵 ∈ ℤ)
24 gcdcom 12607 . . . . . . . . . . . . 13 ((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) → (𝐴 gcd 𝐵) = (𝐵 gcd 𝐴))
2520, 23, 24syl2an2r 599 . . . . . . . . . . . 12 (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2)) → (𝐴 gcd 𝐵) = (𝐵 gcd 𝐴))
2625oveq2d 6044 . . . . . . . . . . 11 (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2)) → (𝐵 / (𝐴 gcd 𝐵)) = (𝐵 / (𝐵 gcd 𝐴)))
2726breq2d 4105 . . . . . . . . . 10 (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2)) → (2 ∥ (𝐵 / (𝐴 gcd 𝐵)) ↔ 2 ∥ (𝐵 / (𝐵 gcd 𝐴))))
2827notbid 673 . . . . . . . . 9 (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2)) → (¬ 2 ∥ (𝐵 / (𝐴 gcd 𝐵)) ↔ ¬ 2 ∥ (𝐵 / (𝐵 gcd 𝐴))))
2928biimp3a 1382 . . . . . . . 8 (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ∧ ¬ 2 ∥ (𝐵 / (𝐴 gcd 𝐵))) → ¬ 2 ∥ (𝐵 / (𝐵 gcd 𝐴)))
30 pythagtriplem19 12918 . . . . . . . 8 (((𝐵 ∈ ℕ ∧ 𝐴 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐵↑2) + (𝐴↑2)) = (𝐶↑2) ∧ ¬ 2 ∥ (𝐵 / (𝐵 gcd 𝐴))) → ∃𝑛 ∈ ℕ ∃𝑚 ∈ ℕ ∃𝑘 ∈ ℕ (𝐵 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐴 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2)))))
316, 7, 8, 18, 29, 30syl311anc 1288 . . . . . . 7 (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ∧ ¬ 2 ∥ (𝐵 / (𝐴 gcd 𝐵))) → ∃𝑛 ∈ ℕ ∃𝑚 ∈ ℕ ∃𝑘 ∈ ℕ (𝐵 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐴 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2)))))
32313expia 1232 . . . . . 6 (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2)) → (¬ 2 ∥ (𝐵 / (𝐴 gcd 𝐵)) → ∃𝑛 ∈ ℕ ∃𝑚 ∈ ℕ ∃𝑘 ∈ ℕ (𝐵 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐴 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2))))))
335, 32orim12d 794 . . . . 5 (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2)) → ((¬ 2 ∥ (𝐴 / (𝐴 gcd 𝐵)) ∨ ¬ 2 ∥ (𝐵 / (𝐴 gcd 𝐵))) → (∃𝑛 ∈ ℕ ∃𝑚 ∈ ℕ ∃𝑘 ∈ ℕ (𝐴 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐵 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2)))) ∨ ∃𝑛 ∈ ℕ ∃𝑚 ∈ ℕ ∃𝑘 ∈ ℕ (𝐵 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐴 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2)))))))
343, 33mpd 13 . . . 4 (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2)) → (∃𝑛 ∈ ℕ ∃𝑚 ∈ ℕ ∃𝑘 ∈ ℕ (𝐴 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐵 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2)))) ∨ ∃𝑛 ∈ ℕ ∃𝑚 ∈ ℕ ∃𝑘 ∈ ℕ (𝐵 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐴 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2))))))
35 simplll 535 . . . . . . . . . . 11 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ) ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑘 ∈ ℕ) → 𝐴 ∈ ℕ)
36 simpllr 536 . . . . . . . . . . 11 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ) ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑘 ∈ ℕ) → 𝐵 ∈ ℕ)
37 nnz 9542 . . . . . . . . . . . . 13 (𝑘 ∈ ℕ → 𝑘 ∈ ℤ)
3837adantl 277 . . . . . . . . . . . 12 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ) ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑘 ∈ ℕ) → 𝑘 ∈ ℤ)
39 simplrr 538 . . . . . . . . . . . . . . 15 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ) ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑘 ∈ ℕ) → 𝑚 ∈ ℕ)
4039nnzd 9645 . . . . . . . . . . . . . 14 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ) ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑘 ∈ ℕ) → 𝑚 ∈ ℤ)
41 zsqcl 10918 . . . . . . . . . . . . . 14 (𝑚 ∈ ℤ → (𝑚↑2) ∈ ℤ)
4240, 41syl 14 . . . . . . . . . . . . 13 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ) ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑘 ∈ ℕ) → (𝑚↑2) ∈ ℤ)
43 simplrl 537 . . . . . . . . . . . . . . 15 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ) ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑘 ∈ ℕ) → 𝑛 ∈ ℕ)
4443nnzd 9645 . . . . . . . . . . . . . 14 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ) ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑘 ∈ ℕ) → 𝑛 ∈ ℤ)
45 zsqcl 10918 . . . . . . . . . . . . . 14 (𝑛 ∈ ℤ → (𝑛↑2) ∈ ℤ)
4644, 45syl 14 . . . . . . . . . . . . 13 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ) ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑘 ∈ ℕ) → (𝑛↑2) ∈ ℤ)
4742, 46zsubcld 9651 . . . . . . . . . . . 12 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ) ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑘 ∈ ℕ) → ((𝑚↑2) − (𝑛↑2)) ∈ ℤ)
4838, 47zmulcld 9652 . . . . . . . . . . 11 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ) ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑘 ∈ ℕ) → (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∈ ℤ)
49 2z 9551 . . . . . . . . . . . . . 14 2 ∈ ℤ
5049a1i 9 . . . . . . . . . . . . 13 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ) ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑘 ∈ ℕ) → 2 ∈ ℤ)
5140, 44zmulcld 9652 . . . . . . . . . . . . 13 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ) ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑘 ∈ ℕ) → (𝑚 · 𝑛) ∈ ℤ)
5250, 51zmulcld 9652 . . . . . . . . . . . 12 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ) ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑘 ∈ ℕ) → (2 · (𝑚 · 𝑛)) ∈ ℤ)
5338, 52zmulcld 9652 . . . . . . . . . . 11 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ) ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑘 ∈ ℕ) → (𝑘 · (2 · (𝑚 · 𝑛))) ∈ ℤ)
54 preq12bg 3861 . . . . . . . . . . 11 (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ) ∧ ((𝑘 · ((𝑚↑2) − (𝑛↑2))) ∈ ℤ ∧ (𝑘 · (2 · (𝑚 · 𝑛))) ∈ ℤ)) → ({𝐴, 𝐵} = {(𝑘 · ((𝑚↑2) − (𝑛↑2))), (𝑘 · (2 · (𝑚 · 𝑛)))} ↔ ((𝐴 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐵 = (𝑘 · (2 · (𝑚 · 𝑛)))) ∨ (𝐴 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐵 = (𝑘 · ((𝑚↑2) − (𝑛↑2)))))))
5535, 36, 48, 53, 54syl22anc 1275 . . . . . . . . . 10 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ) ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑘 ∈ ℕ) → ({𝐴, 𝐵} = {(𝑘 · ((𝑚↑2) − (𝑛↑2))), (𝑘 · (2 · (𝑚 · 𝑛)))} ↔ ((𝐴 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐵 = (𝑘 · (2 · (𝑚 · 𝑛)))) ∨ (𝐴 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐵 = (𝑘 · ((𝑚↑2) − (𝑛↑2)))))))
5655anbi1d 465 . . . . . . . . 9 ((((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ) ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑘 ∈ ℕ) → (({𝐴, 𝐵} = {(𝑘 · ((𝑚↑2) − (𝑛↑2))), (𝑘 · (2 · (𝑚 · 𝑛)))} ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2)))) ↔ (((𝐴 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐵 = (𝑘 · (2 · (𝑚 · 𝑛)))) ∨ (𝐴 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐵 = (𝑘 · ((𝑚↑2) − (𝑛↑2))))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2))))))
5756rexbidva 2530 . . . . . . . 8 (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ) ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) → (∃𝑘 ∈ ℕ ({𝐴, 𝐵} = {(𝑘 · ((𝑚↑2) − (𝑛↑2))), (𝑘 · (2 · (𝑚 · 𝑛)))} ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2)))) ↔ ∃𝑘 ∈ ℕ (((𝐴 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐵 = (𝑘 · (2 · (𝑚 · 𝑛)))) ∨ (𝐴 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐵 = (𝑘 · ((𝑚↑2) − (𝑛↑2))))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2))))))
58572rexbidva 2556 . . . . . . 7 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ) → (∃𝑛 ∈ ℕ ∃𝑚 ∈ ℕ ∃𝑘 ∈ ℕ ({𝐴, 𝐵} = {(𝑘 · ((𝑚↑2) − (𝑛↑2))), (𝑘 · (2 · (𝑚 · 𝑛)))} ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2)))) ↔ ∃𝑛 ∈ ℕ ∃𝑚 ∈ ℕ ∃𝑘 ∈ ℕ (((𝐴 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐵 = (𝑘 · (2 · (𝑚 · 𝑛)))) ∨ (𝐴 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐵 = (𝑘 · ((𝑚↑2) − (𝑛↑2))))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2))))))
59 andir 827 . . . . . . . . . . 11 ((((𝐴 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐵 = (𝑘 · (2 · (𝑚 · 𝑛)))) ∨ (𝐴 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐵 = (𝑘 · ((𝑚↑2) − (𝑛↑2))))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2)))) ↔ (((𝐴 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐵 = (𝑘 · (2 · (𝑚 · 𝑛)))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2)))) ∨ ((𝐴 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐵 = (𝑘 · ((𝑚↑2) − (𝑛↑2)))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2))))))
60 df-3an 1007 . . . . . . . . . . . 12 ((𝐴 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐵 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2)))) ↔ ((𝐴 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐵 = (𝑘 · (2 · (𝑚 · 𝑛)))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2)))))
61 df-3an 1007 . . . . . . . . . . . 12 ((𝐴 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐵 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2)))) ↔ ((𝐴 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐵 = (𝑘 · ((𝑚↑2) − (𝑛↑2)))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2)))))
6260, 61orbi12i 772 . . . . . . . . . . 11 (((𝐴 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐵 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2)))) ∨ (𝐴 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐵 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2))))) ↔ (((𝐴 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐵 = (𝑘 · (2 · (𝑚 · 𝑛)))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2)))) ∨ ((𝐴 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐵 = (𝑘 · ((𝑚↑2) − (𝑛↑2)))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2))))))
63 3ancoma 1012 . . . . . . . . . . . 12 ((𝐴 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐵 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2)))) ↔ (𝐵 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐴 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2)))))
6463orbi2i 770 . . . . . . . . . . 11 (((𝐴 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐵 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2)))) ∨ (𝐴 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐵 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2))))) ↔ ((𝐴 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐵 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2)))) ∨ (𝐵 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐴 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2))))))
6559, 62, 643bitr2i 208 . . . . . . . . . 10 ((((𝐴 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐵 = (𝑘 · (2 · (𝑚 · 𝑛)))) ∨ (𝐴 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐵 = (𝑘 · ((𝑚↑2) − (𝑛↑2))))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2)))) ↔ ((𝐴 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐵 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2)))) ∨ (𝐵 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐴 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2))))))
6665rexbii 2540 . . . . . . . . 9 (∃𝑘 ∈ ℕ (((𝐴 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐵 = (𝑘 · (2 · (𝑚 · 𝑛)))) ∨ (𝐴 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐵 = (𝑘 · ((𝑚↑2) − (𝑛↑2))))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2)))) ↔ ∃𝑘 ∈ ℕ ((𝐴 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐵 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2)))) ∨ (𝐵 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐴 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2))))))
67662rexbii 2542 . . . . . . . 8 (∃𝑛 ∈ ℕ ∃𝑚 ∈ ℕ ∃𝑘 ∈ ℕ (((𝐴 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐵 = (𝑘 · (2 · (𝑚 · 𝑛)))) ∨ (𝐴 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐵 = (𝑘 · ((𝑚↑2) − (𝑛↑2))))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2)))) ↔ ∃𝑛 ∈ ℕ ∃𝑚 ∈ ℕ ∃𝑘 ∈ ℕ ((𝐴 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐵 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2)))) ∨ (𝐵 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐴 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2))))))
68 r19.43 2692 . . . . . . . . . 10 (∃𝑘 ∈ ℕ ((𝐴 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐵 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2)))) ∨ (𝐵 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐴 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2))))) ↔ (∃𝑘 ∈ ℕ (𝐴 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐵 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2)))) ∨ ∃𝑘 ∈ ℕ (𝐵 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐴 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2))))))
69682rexbii 2542 . . . . . . . . 9 (∃𝑛 ∈ ℕ ∃𝑚 ∈ ℕ ∃𝑘 ∈ ℕ ((𝐴 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐵 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2)))) ∨ (𝐵 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐴 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2))))) ↔ ∃𝑛 ∈ ℕ ∃𝑚 ∈ ℕ (∃𝑘 ∈ ℕ (𝐴 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐵 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2)))) ∨ ∃𝑘 ∈ ℕ (𝐵 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐴 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2))))))
70 r19.43 2692 . . . . . . . . . . 11 (∃𝑚 ∈ ℕ (∃𝑘 ∈ ℕ (𝐴 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐵 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2)))) ∨ ∃𝑘 ∈ ℕ (𝐵 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐴 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2))))) ↔ (∃𝑚 ∈ ℕ ∃𝑘 ∈ ℕ (𝐴 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐵 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2)))) ∨ ∃𝑚 ∈ ℕ ∃𝑘 ∈ ℕ (𝐵 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐴 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2))))))
7170rexbii 2540 . . . . . . . . . 10 (∃𝑛 ∈ ℕ ∃𝑚 ∈ ℕ (∃𝑘 ∈ ℕ (𝐴 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐵 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2)))) ∨ ∃𝑘 ∈ ℕ (𝐵 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐴 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2))))) ↔ ∃𝑛 ∈ ℕ (∃𝑚 ∈ ℕ ∃𝑘 ∈ ℕ (𝐴 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐵 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2)))) ∨ ∃𝑚 ∈ ℕ ∃𝑘 ∈ ℕ (𝐵 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐴 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2))))))
72 r19.43 2692 . . . . . . . . . 10 (∃𝑛 ∈ ℕ (∃𝑚 ∈ ℕ ∃𝑘 ∈ ℕ (𝐴 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐵 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2)))) ∨ ∃𝑚 ∈ ℕ ∃𝑘 ∈ ℕ (𝐵 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐴 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2))))) ↔ (∃𝑛 ∈ ℕ ∃𝑚 ∈ ℕ ∃𝑘 ∈ ℕ (𝐴 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐵 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2)))) ∨ ∃𝑛 ∈ ℕ ∃𝑚 ∈ ℕ ∃𝑘 ∈ ℕ (𝐵 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐴 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2))))))
7371, 72bitri 184 . . . . . . . . 9 (∃𝑛 ∈ ℕ ∃𝑚 ∈ ℕ (∃𝑘 ∈ ℕ (𝐴 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐵 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2)))) ∨ ∃𝑘 ∈ ℕ (𝐵 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐴 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2))))) ↔ (∃𝑛 ∈ ℕ ∃𝑚 ∈ ℕ ∃𝑘 ∈ ℕ (𝐴 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐵 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2)))) ∨ ∃𝑛 ∈ ℕ ∃𝑚 ∈ ℕ ∃𝑘 ∈ ℕ (𝐵 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐴 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2))))))
7469, 73bitri 184 . . . . . . . 8 (∃𝑛 ∈ ℕ ∃𝑚 ∈ ℕ ∃𝑘 ∈ ℕ ((𝐴 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐵 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2)))) ∨ (𝐵 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐴 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2))))) ↔ (∃𝑛 ∈ ℕ ∃𝑚 ∈ ℕ ∃𝑘 ∈ ℕ (𝐴 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐵 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2)))) ∨ ∃𝑛 ∈ ℕ ∃𝑚 ∈ ℕ ∃𝑘 ∈ ℕ (𝐵 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐴 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2))))))
7567, 74bitri 184 . . . . . . 7 (∃𝑛 ∈ ℕ ∃𝑚 ∈ ℕ ∃𝑘 ∈ ℕ (((𝐴 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐵 = (𝑘 · (2 · (𝑚 · 𝑛)))) ∨ (𝐴 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐵 = (𝑘 · ((𝑚↑2) − (𝑛↑2))))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2)))) ↔ (∃𝑛 ∈ ℕ ∃𝑚 ∈ ℕ ∃𝑘 ∈ ℕ (𝐴 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐵 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2)))) ∨ ∃𝑛 ∈ ℕ ∃𝑚 ∈ ℕ ∃𝑘 ∈ ℕ (𝐵 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐴 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2))))))
7658, 75bitrdi 196 . . . . . 6 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ) → (∃𝑛 ∈ ℕ ∃𝑚 ∈ ℕ ∃𝑘 ∈ ℕ ({𝐴, 𝐵} = {(𝑘 · ((𝑚↑2) − (𝑛↑2))), (𝑘 · (2 · (𝑚 · 𝑛)))} ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2)))) ↔ (∃𝑛 ∈ ℕ ∃𝑚 ∈ ℕ ∃𝑘 ∈ ℕ (𝐴 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐵 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2)))) ∨ ∃𝑛 ∈ ℕ ∃𝑚 ∈ ℕ ∃𝑘 ∈ ℕ (𝐵 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐴 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2)))))))
77763adant3 1044 . . . . 5 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) → (∃𝑛 ∈ ℕ ∃𝑚 ∈ ℕ ∃𝑘 ∈ ℕ ({𝐴, 𝐵} = {(𝑘 · ((𝑚↑2) − (𝑛↑2))), (𝑘 · (2 · (𝑚 · 𝑛)))} ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2)))) ↔ (∃𝑛 ∈ ℕ ∃𝑚 ∈ ℕ ∃𝑘 ∈ ℕ (𝐴 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐵 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2)))) ∨ ∃𝑛 ∈ ℕ ∃𝑚 ∈ ℕ ∃𝑘 ∈ ℕ (𝐵 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐴 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2)))))))
7877adantr 276 . . . 4 (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2)) → (∃𝑛 ∈ ℕ ∃𝑚 ∈ ℕ ∃𝑘 ∈ ℕ ({𝐴, 𝐵} = {(𝑘 · ((𝑚↑2) − (𝑛↑2))), (𝑘 · (2 · (𝑚 · 𝑛)))} ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2)))) ↔ (∃𝑛 ∈ ℕ ∃𝑚 ∈ ℕ ∃𝑘 ∈ ℕ (𝐴 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐵 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2)))) ∨ ∃𝑛 ∈ ℕ ∃𝑚 ∈ ℕ ∃𝑘 ∈ ℕ (𝐵 = (𝑘 · ((𝑚↑2) − (𝑛↑2))) ∧ 𝐴 = (𝑘 · (2 · (𝑚 · 𝑛))) ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2)))))))
7934, 78mpbird 167 . . 3 (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2)) → ∃𝑛 ∈ ℕ ∃𝑚 ∈ ℕ ∃𝑘 ∈ ℕ ({𝐴, 𝐵} = {(𝑘 · ((𝑚↑2) − (𝑛↑2))), (𝑘 · (2 · (𝑚 · 𝑛)))} ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2)))))
8079ex 115 . 2 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) → (((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) → ∃𝑛 ∈ ℕ ∃𝑚 ∈ ℕ ∃𝑘 ∈ ℕ ({𝐴, 𝐵} = {(𝑘 · ((𝑚↑2) − (𝑛↑2))), (𝑘 · (2 · (𝑚 · 𝑛)))} ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2))))))
81 pythagtriplem2 12902 . . 3 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ) → (∃𝑛 ∈ ℕ ∃𝑚 ∈ ℕ ∃𝑘 ∈ ℕ ({𝐴, 𝐵} = {(𝑘 · ((𝑚↑2) − (𝑛↑2))), (𝑘 · (2 · (𝑚 · 𝑛)))} ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2)))) → ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2)))
82813adant3 1044 . 2 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) → (∃𝑛 ∈ ℕ ∃𝑚 ∈ ℕ ∃𝑘 ∈ ℕ ({𝐴, 𝐵} = {(𝑘 · ((𝑚↑2) − (𝑛↑2))), (𝑘 · (2 · (𝑚 · 𝑛)))} ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2)))) → ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2)))
8380, 82impbid 129 1 ((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) → (((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ↔ ∃𝑛 ∈ ℕ ∃𝑚 ∈ ℕ ∃𝑘 ∈ ℕ ({𝐴, 𝐵} = {(𝑘 · ((𝑚↑2) − (𝑛↑2))), (𝑘 · (2 · (𝑚 · 𝑛)))} ∧ 𝐶 = (𝑘 · ((𝑚↑2) + (𝑛↑2))))))
Colors of variables: wff set class
Syntax hints:  ¬ wn 3  wi 4  wa 104  wb 105  wo 716  w3a 1005   = wceq 1398  wcel 2202  wrex 2512  {cpr 3674   class class class wbr 4093  (class class class)co 6028  cc 8073   + caddc 8078   · cmul 8080  cmin 8392   / cdiv 8894  cn 9185  2c2 9236  cz 9523  cexp 10846  cdvds 12411   gcd cgcd 12587
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-in1 619  ax-in2 620  ax-io 717  ax-5 1496  ax-7 1497  ax-gen 1498  ax-ie1 1542  ax-ie2 1543  ax-8 1553  ax-10 1554  ax-11 1555  ax-i12 1556  ax-bndl 1558  ax-4 1559  ax-17 1575  ax-i9 1579  ax-ial 1583  ax-i5r 1584  ax-13 2204  ax-14 2205  ax-ext 2213  ax-coll 4209  ax-sep 4212  ax-nul 4220  ax-pow 4270  ax-pr 4305  ax-un 4536  ax-setind 4641  ax-iinf 4692  ax-cnex 8166  ax-resscn 8167  ax-1cn 8168  ax-1re 8169  ax-icn 8170  ax-addcl 8171  ax-addrcl 8172  ax-mulcl 8173  ax-mulrcl 8174  ax-addcom 8175  ax-mulcom 8176  ax-addass 8177  ax-mulass 8178  ax-distr 8179  ax-i2m1 8180  ax-0lt1 8181  ax-1rid 8182  ax-0id 8183  ax-rnegex 8184  ax-precex 8185  ax-cnre 8186  ax-pre-ltirr 8187  ax-pre-ltwlin 8188  ax-pre-lttrn 8189  ax-pre-apti 8190  ax-pre-ltadd 8191  ax-pre-mulgt0 8192  ax-pre-mulext 8193  ax-arch 8194  ax-caucvg 8195
This theorem depends on definitions:  df-bi 117  df-stab 839  df-dc 843  df-3or 1006  df-3an 1007  df-tru 1401  df-fal 1404  df-xor 1421  df-nf 1510  df-sb 1811  df-eu 2082  df-mo 2083  df-clab 2218  df-cleq 2224  df-clel 2227  df-nfc 2364  df-ne 2404  df-nel 2499  df-ral 2516  df-rex 2517  df-reu 2518  df-rmo 2519  df-rab 2520  df-v 2805  df-sbc 3033  df-csb 3129  df-dif 3203  df-un 3205  df-in 3207  df-ss 3214  df-nul 3497  df-if 3608  df-pw 3658  df-sn 3679  df-pr 3680  df-op 3682  df-uni 3899  df-int 3934  df-iun 3977  df-br 4094  df-opab 4156  df-mpt 4157  df-tr 4193  df-id 4396  df-po 4399  df-iso 4400  df-iord 4469  df-on 4471  df-ilim 4472  df-suc 4474  df-iom 4695  df-xp 4737  df-rel 4738  df-cnv 4739  df-co 4740  df-dm 4741  df-rn 4742  df-res 4743  df-ima 4744  df-iota 5293  df-fun 5335  df-fn 5336  df-f 5337  df-f1 5338  df-fo 5339  df-f1o 5340  df-fv 5341  df-riota 5981  df-ov 6031  df-oprab 6032  df-mpo 6033  df-1st 6312  df-2nd 6313  df-recs 6514  df-frec 6600  df-1o 6625  df-2o 6626  df-er 6745  df-en 6953  df-sup 7226  df-pnf 8258  df-mnf 8259  df-xr 8260  df-ltxr 8261  df-le 8262  df-sub 8394  df-neg 8395  df-reap 8797  df-ap 8804  df-div 8895  df-inn 9186  df-2 9244  df-3 9245  df-4 9246  df-n0 9445  df-z 9524  df-uz 9800  df-q 9898  df-rp 9933  df-fz 10289  df-fzo 10423  df-fl 10576  df-mod 10631  df-seqfrec 10756  df-exp 10847  df-cj 11465  df-re 11466  df-im 11467  df-rsqrt 11621  df-abs 11622  df-dvds 12412  df-gcd 12588  df-prm 12743
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator