Metamath Proof Explorer


Theorem flt4lem7

Description: Convert flt4lem5f into a convenient form for nna4b4nsq . TODO-SN: The change to ( A gcd B ) = 1 points at some inefficiency in the lemmas. (Contributed by SN, 25-Aug-2024)

Ref Expression
Hypotheses flt4lem7.a โŠข ( ๐œ‘ โ†’ ๐ด โˆˆ โ„• )
flt4lem7.b โŠข ( ๐œ‘ โ†’ ๐ต โˆˆ โ„• )
flt4lem7.c โŠข ( ๐œ‘ โ†’ ๐ถ โˆˆ โ„• )
flt4lem7.1 โŠข ( ๐œ‘ โ†’ ยฌ 2 โˆฅ ๐ด )
flt4lem7.2 โŠข ( ๐œ‘ โ†’ ( ๐ด gcd ๐ต ) = 1 )
flt4lem7.3 โŠข ( ๐œ‘ โ†’ ( ( ๐ด โ†‘ 4 ) + ( ๐ต โ†‘ 4 ) ) = ( ๐ถ โ†‘ 2 ) )
Assertion flt4lem7 ( ๐œ‘ โ†’ โˆƒ ๐‘™ โˆˆ โ„• ( โˆƒ ๐‘” โˆˆ โ„• โˆƒ โ„Ž โˆˆ โ„• ( ยฌ 2 โˆฅ ๐‘” โˆง ( ( ๐‘” gcd โ„Ž ) = 1 โˆง ( ( ๐‘” โ†‘ 4 ) + ( โ„Ž โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โˆง ๐‘™ < ๐ถ ) )

Proof

Step Hyp Ref Expression
1 flt4lem7.a โŠข ( ๐œ‘ โ†’ ๐ด โˆˆ โ„• )
2 flt4lem7.b โŠข ( ๐œ‘ โ†’ ๐ต โˆˆ โ„• )
3 flt4lem7.c โŠข ( ๐œ‘ โ†’ ๐ถ โˆˆ โ„• )
4 flt4lem7.1 โŠข ( ๐œ‘ โ†’ ยฌ 2 โˆฅ ๐ด )
5 flt4lem7.2 โŠข ( ๐œ‘ โ†’ ( ๐ด gcd ๐ต ) = 1 )
6 flt4lem7.3 โŠข ( ๐œ‘ โ†’ ( ( ๐ด โ†‘ 4 ) + ( ๐ต โ†‘ 4 ) ) = ( ๐ถ โ†‘ 2 ) )
7 breq1 โŠข ( ๐‘™ = ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โ†’ ( ๐‘™ < ๐ถ โ†” ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) < ๐ถ ) )
8 oveq1 โŠข ( ๐‘™ = ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โ†’ ( ๐‘™ โ†‘ 2 ) = ( ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โ†‘ 2 ) )
9 8 eqeq2d โŠข ( ๐‘™ = ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โ†’ ( ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) โ†” ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โ†‘ 2 ) ) )
10 9 anbi2d โŠข ( ๐‘™ = ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โ†’ ( ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) โ†” ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โ†‘ 2 ) ) ) )
11 10 2rexbidv โŠข ( ๐‘™ = ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โ†’ ( โˆƒ ๐‘š โˆˆ โ„• โˆƒ ๐‘› โˆˆ โ„• ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) โ†” โˆƒ ๐‘š โˆˆ โ„• โˆƒ ๐‘› โˆˆ โ„• ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โ†‘ 2 ) ) ) )
12 7 11 anbi12d โŠข ( ๐‘™ = ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โ†’ ( ( ๐‘™ < ๐ถ โˆง โˆƒ ๐‘š โˆˆ โ„• โˆƒ ๐‘› โˆˆ โ„• ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โ†” ( ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) < ๐ถ โˆง โˆƒ ๐‘š โˆˆ โ„• โˆƒ ๐‘› โˆˆ โ„• ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โ†‘ 2 ) ) ) ) )
13 eqid โŠข ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) = ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 )
14 eqid โŠข ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) = ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 )
15 eqid โŠข ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) + ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) = ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) + ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 )
16 eqid โŠข ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) = ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 )
17 1 nnsqcld โŠข ( ๐œ‘ โ†’ ( ๐ด โ†‘ 2 ) โˆˆ โ„• )
18 2 nnsqcld โŠข ( ๐œ‘ โ†’ ( ๐ต โ†‘ 2 ) โˆˆ โ„• )
19 2nn0 โŠข 2 โˆˆ โ„•0
20 19 a1i โŠข ( ๐œ‘ โ†’ 2 โˆˆ โ„•0 )
21 1 nncnd โŠข ( ๐œ‘ โ†’ ๐ด โˆˆ โ„‚ )
22 21 flt4lem โŠข ( ๐œ‘ โ†’ ( ๐ด โ†‘ 4 ) = ( ( ๐ด โ†‘ 2 ) โ†‘ 2 ) )
23 2 nncnd โŠข ( ๐œ‘ โ†’ ๐ต โˆˆ โ„‚ )
24 23 flt4lem โŠข ( ๐œ‘ โ†’ ( ๐ต โ†‘ 4 ) = ( ( ๐ต โ†‘ 2 ) โ†‘ 2 ) )
25 22 24 oveq12d โŠข ( ๐œ‘ โ†’ ( ( ๐ด โ†‘ 4 ) + ( ๐ต โ†‘ 4 ) ) = ( ( ( ๐ด โ†‘ 2 ) โ†‘ 2 ) + ( ( ๐ต โ†‘ 2 ) โ†‘ 2 ) ) )
26 25 6 eqtr3d โŠข ( ๐œ‘ โ†’ ( ( ( ๐ด โ†‘ 2 ) โ†‘ 2 ) + ( ( ๐ต โ†‘ 2 ) โ†‘ 2 ) ) = ( ๐ถ โ†‘ 2 ) )
27 2nn โŠข 2 โˆˆ โ„•
28 27 a1i โŠข ( ๐œ‘ โ†’ 2 โˆˆ โ„• )
29 rppwr โŠข ( ( ๐ด โˆˆ โ„• โˆง ๐ต โˆˆ โ„• โˆง 2 โˆˆ โ„• ) โ†’ ( ( ๐ด gcd ๐ต ) = 1 โ†’ ( ( ๐ด โ†‘ 2 ) gcd ( ๐ต โ†‘ 2 ) ) = 1 ) )
30 1 2 28 29 syl3anc โŠข ( ๐œ‘ โ†’ ( ( ๐ด gcd ๐ต ) = 1 โ†’ ( ( ๐ด โ†‘ 2 ) gcd ( ๐ต โ†‘ 2 ) ) = 1 ) )
31 5 30 mpd โŠข ( ๐œ‘ โ†’ ( ( ๐ด โ†‘ 2 ) gcd ( ๐ต โ†‘ 2 ) ) = 1 )
32 17 18 3 20 26 31 fltaccoprm โŠข ( ๐œ‘ โ†’ ( ( ๐ด โ†‘ 2 ) gcd ๐ถ ) = 1 )
33 1 nnzd โŠข ( ๐œ‘ โ†’ ๐ด โˆˆ โ„ค )
34 3 nnzd โŠข ( ๐œ‘ โ†’ ๐ถ โˆˆ โ„ค )
35 rpexp โŠข ( ( ๐ด โˆˆ โ„ค โˆง ๐ถ โˆˆ โ„ค โˆง 2 โˆˆ โ„• ) โ†’ ( ( ( ๐ด โ†‘ 2 ) gcd ๐ถ ) = 1 โ†” ( ๐ด gcd ๐ถ ) = 1 ) )
36 33 34 28 35 syl3anc โŠข ( ๐œ‘ โ†’ ( ( ( ๐ด โ†‘ 2 ) gcd ๐ถ ) = 1 โ†” ( ๐ด gcd ๐ถ ) = 1 ) )
37 32 36 mpbid โŠข ( ๐œ‘ โ†’ ( ๐ด gcd ๐ถ ) = 1 )
38 13 14 15 16 1 2 3 4 37 6 flt4lem5e โŠข ( ๐œ‘ โ†’ ( ( ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) + ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) ) = 1 โˆง ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) + ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) = 1 โˆง ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) = 1 ) โˆง ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) + ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) โˆˆ โ„• โˆง ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) โˆˆ โ„• โˆง ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆˆ โ„• ) โˆง ( ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ยท ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) + ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) ยท ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) ) ) = ( ( ๐ต / 2 ) โ†‘ 2 ) โˆง ( ๐ต / 2 ) โˆˆ โ„• ) ) )
39 38 simp2d โŠข ( ๐œ‘ โ†’ ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) + ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) โˆˆ โ„• โˆง ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) โˆˆ โ„• โˆง ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆˆ โ„• ) )
40 39 simp3d โŠข ( ๐œ‘ โ†’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆˆ โ„• )
41 38 simp3d โŠข ( ๐œ‘ โ†’ ( ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ยท ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) + ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) ยท ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) ) ) = ( ( ๐ต / 2 ) โ†‘ 2 ) โˆง ( ๐ต / 2 ) โˆˆ โ„• ) )
42 41 simprd โŠข ( ๐œ‘ โ†’ ( ๐ต / 2 ) โˆˆ โ„• )
43 gcdnncl โŠข ( ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆˆ โ„• โˆง ( ๐ต / 2 ) โˆˆ โ„• ) โ†’ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โˆˆ โ„• )
44 40 42 43 syl2anc โŠข ( ๐œ‘ โ†’ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โˆˆ โ„• )
45 44 nnred โŠข ( ๐œ‘ โ†’ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โˆˆ โ„ )
46 42 nnred โŠข ( ๐œ‘ โ†’ ( ๐ต / 2 ) โˆˆ โ„ )
47 3 nnred โŠข ( ๐œ‘ โ†’ ๐ถ โˆˆ โ„ )
48 40 nnzd โŠข ( ๐œ‘ โ†’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆˆ โ„ค )
49 48 42 gcdle2d โŠข ( ๐œ‘ โ†’ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โ‰ค ( ๐ต / 2 ) )
50 2 nnred โŠข ( ๐œ‘ โ†’ ๐ต โˆˆ โ„ )
51 2 nnrpd โŠข ( ๐œ‘ โ†’ ๐ต โˆˆ โ„+ )
52 rphalflt โŠข ( ๐ต โˆˆ โ„+ โ†’ ( ๐ต / 2 ) < ๐ต )
53 51 52 syl โŠข ( ๐œ‘ โ†’ ( ๐ต / 2 ) < ๐ต )
54 18 nnred โŠข ( ๐œ‘ โ†’ ( ๐ต โ†‘ 2 ) โˆˆ โ„ )
55 4nn0 โŠข 4 โˆˆ โ„•0
56 55 a1i โŠข ( ๐œ‘ โ†’ 4 โˆˆ โ„•0 )
57 2 56 nnexpcld โŠข ( ๐œ‘ โ†’ ( ๐ต โ†‘ 4 ) โˆˆ โ„• )
58 57 nnred โŠข ( ๐œ‘ โ†’ ( ๐ต โ†‘ 4 ) โˆˆ โ„ )
59 3 nnsqcld โŠข ( ๐œ‘ โ†’ ( ๐ถ โ†‘ 2 ) โˆˆ โ„• )
60 59 nnred โŠข ( ๐œ‘ โ†’ ( ๐ถ โ†‘ 2 ) โˆˆ โ„ )
61 2lt4 โŠข 2 < 4
62 2z โŠข 2 โˆˆ โ„ค
63 62 a1i โŠข ( ๐œ‘ โ†’ 2 โˆˆ โ„ค )
64 4z โŠข 4 โˆˆ โ„ค
65 64 a1i โŠข ( ๐œ‘ โ†’ 4 โˆˆ โ„ค )
66 1red โŠข ( ๐œ‘ โ†’ 1 โˆˆ โ„ )
67 2re โŠข 2 โˆˆ โ„
68 67 a1i โŠข ( ๐œ‘ โ†’ 2 โˆˆ โ„ )
69 1lt2 โŠข 1 < 2
70 69 a1i โŠข ( ๐œ‘ โ†’ 1 < 2 )
71 2t1e2 โŠข ( 2 ยท 1 ) = 2
72 42 nnge1d โŠข ( ๐œ‘ โ†’ 1 โ‰ค ( ๐ต / 2 ) )
73 2rp โŠข 2 โˆˆ โ„+
74 73 a1i โŠข ( ๐œ‘ โ†’ 2 โˆˆ โ„+ )
75 66 50 74 lemuldiv2d โŠข ( ๐œ‘ โ†’ ( ( 2 ยท 1 ) โ‰ค ๐ต โ†” 1 โ‰ค ( ๐ต / 2 ) ) )
76 72 75 mpbird โŠข ( ๐œ‘ โ†’ ( 2 ยท 1 ) โ‰ค ๐ต )
77 71 76 eqbrtrrid โŠข ( ๐œ‘ โ†’ 2 โ‰ค ๐ต )
78 66 68 50 70 77 ltletrd โŠข ( ๐œ‘ โ†’ 1 < ๐ต )
79 50 63 65 78 ltexp2d โŠข ( ๐œ‘ โ†’ ( 2 < 4 โ†” ( ๐ต โ†‘ 2 ) < ( ๐ต โ†‘ 4 ) ) )
80 61 79 mpbii โŠข ( ๐œ‘ โ†’ ( ๐ต โ†‘ 2 ) < ( ๐ต โ†‘ 4 ) )
81 1 56 nnexpcld โŠข ( ๐œ‘ โ†’ ( ๐ด โ†‘ 4 ) โˆˆ โ„• )
82 81 nngt0d โŠข ( ๐œ‘ โ†’ 0 < ( ๐ด โ†‘ 4 ) )
83 81 nnred โŠข ( ๐œ‘ โ†’ ( ๐ด โ†‘ 4 ) โˆˆ โ„ )
84 83 58 ltaddpos2d โŠข ( ๐œ‘ โ†’ ( 0 < ( ๐ด โ†‘ 4 ) โ†” ( ๐ต โ†‘ 4 ) < ( ( ๐ด โ†‘ 4 ) + ( ๐ต โ†‘ 4 ) ) ) )
85 82 84 mpbid โŠข ( ๐œ‘ โ†’ ( ๐ต โ†‘ 4 ) < ( ( ๐ด โ†‘ 4 ) + ( ๐ต โ†‘ 4 ) ) )
86 85 6 breqtrd โŠข ( ๐œ‘ โ†’ ( ๐ต โ†‘ 4 ) < ( ๐ถ โ†‘ 2 ) )
87 54 58 60 80 86 lttrd โŠข ( ๐œ‘ โ†’ ( ๐ต โ†‘ 2 ) < ( ๐ถ โ†‘ 2 ) )
88 3 nnrpd โŠข ( ๐œ‘ โ†’ ๐ถ โˆˆ โ„+ )
89 51 88 28 ltexp1d โŠข ( ๐œ‘ โ†’ ( ๐ต < ๐ถ โ†” ( ๐ต โ†‘ 2 ) < ( ๐ถ โ†‘ 2 ) ) )
90 87 89 mpbird โŠข ( ๐œ‘ โ†’ ๐ต < ๐ถ )
91 46 50 47 53 90 lttrd โŠข ( ๐œ‘ โ†’ ( ๐ต / 2 ) < ๐ถ )
92 45 46 47 49 91 lelttrd โŠข ( ๐œ‘ โ†’ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) < ๐ถ )
93 oveq1 โŠข ( ๐‘š = ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) + ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โ†’ ( ๐‘š gcd ๐‘› ) = ( ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) + ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) gcd ๐‘› ) )
94 93 eqeq1d โŠข ( ๐‘š = ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) + ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โ†’ ( ( ๐‘š gcd ๐‘› ) = 1 โ†” ( ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) + ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) gcd ๐‘› ) = 1 ) )
95 oveq1 โŠข ( ๐‘š = ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) + ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โ†’ ( ๐‘š โ†‘ 4 ) = ( ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) + ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โ†‘ 4 ) )
96 95 oveq1d โŠข ( ๐‘š = ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) + ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โ†’ ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ( ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) + ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) )
97 96 eqeq1d โŠข ( ๐‘š = ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) + ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โ†’ ( ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โ†‘ 2 ) โ†” ( ( ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) + ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โ†‘ 2 ) ) )
98 94 97 anbi12d โŠข ( ๐‘š = ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) + ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โ†’ ( ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โ†‘ 2 ) ) โ†” ( ( ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) + ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) gcd ๐‘› ) = 1 โˆง ( ( ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) + ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โ†‘ 2 ) ) ) )
99 oveq2 โŠข ( ๐‘› = ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โ†’ ( ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) + ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) gcd ๐‘› ) = ( ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) + ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) gcd ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) ) )
100 99 eqeq1d โŠข ( ๐‘› = ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โ†’ ( ( ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) + ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) gcd ๐‘› ) = 1 โ†” ( ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) + ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) gcd ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) ) = 1 ) )
101 oveq1 โŠข ( ๐‘› = ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โ†’ ( ๐‘› โ†‘ 4 ) = ( ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โ†‘ 4 ) )
102 101 oveq2d โŠข ( ๐‘› = ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โ†’ ( ( ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) + ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ( ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) + ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โ†‘ 4 ) + ( ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โ†‘ 4 ) ) )
103 102 eqeq1d โŠข ( ๐‘› = ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โ†’ ( ( ( ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) + ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โ†‘ 2 ) โ†” ( ( ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) + ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โ†‘ 4 ) + ( ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โ†‘ 4 ) ) = ( ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โ†‘ 2 ) ) )
104 100 103 anbi12d โŠข ( ๐‘› = ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โ†’ ( ( ( ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) + ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) gcd ๐‘› ) = 1 โˆง ( ( ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) + ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โ†‘ 2 ) ) โ†” ( ( ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) + ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) gcd ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) ) = 1 โˆง ( ( ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) + ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โ†‘ 4 ) + ( ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โ†‘ 4 ) ) = ( ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โ†‘ 2 ) ) ) )
105 39 simp1d โŠข ( ๐œ‘ โ†’ ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) + ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) โˆˆ โ„• )
106 gcdnncl โŠข ( ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) + ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) โˆˆ โ„• โˆง ( ๐ต / 2 ) โˆˆ โ„• ) โ†’ ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) + ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โˆˆ โ„• )
107 105 42 106 syl2anc โŠข ( ๐œ‘ โ†’ ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) + ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โˆˆ โ„• )
108 39 simp2d โŠข ( ๐œ‘ โ†’ ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) โˆˆ โ„• )
109 gcdnncl โŠข ( ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) โˆˆ โ„• โˆง ( ๐ต / 2 ) โˆˆ โ„• ) โ†’ ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โˆˆ โ„• )
110 108 42 109 syl2anc โŠข ( ๐œ‘ โ†’ ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โˆˆ โ„• )
111 105 nnzd โŠข ( ๐œ‘ โ†’ ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) + ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) โˆˆ โ„ค )
112 42 nnzd โŠข ( ๐œ‘ โ†’ ( ๐ต / 2 ) โˆˆ โ„ค )
113 110 nnzd โŠข ( ๐œ‘ โ†’ ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โˆˆ โ„ค )
114 gcdass โŠข ( ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) + ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) โˆˆ โ„ค โˆง ( ๐ต / 2 ) โˆˆ โ„ค โˆง ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โˆˆ โ„ค ) โ†’ ( ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) + ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) gcd ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) ) = ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) + ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ( ๐ต / 2 ) gcd ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) ) ) )
115 111 112 113 114 syl3anc โŠข ( ๐œ‘ โ†’ ( ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) + ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) gcd ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) ) = ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) + ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ( ๐ต / 2 ) gcd ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) ) ) )
116 108 nnzd โŠข ( ๐œ‘ โ†’ ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) โˆˆ โ„ค )
117 gcdass โŠข ( ( ( ๐ต / 2 ) โˆˆ โ„ค โˆง ( ๐ต / 2 ) โˆˆ โ„ค โˆง ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) โˆˆ โ„ค ) โ†’ ( ( ( ๐ต / 2 ) gcd ( ๐ต / 2 ) ) gcd ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) ) = ( ( ๐ต / 2 ) gcd ( ( ๐ต / 2 ) gcd ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) ) ) )
118 112 112 116 117 syl3anc โŠข ( ๐œ‘ โ†’ ( ( ( ๐ต / 2 ) gcd ( ๐ต / 2 ) ) gcd ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) ) = ( ( ๐ต / 2 ) gcd ( ( ๐ต / 2 ) gcd ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) ) ) )
119 42 nnnn0d โŠข ( ๐œ‘ โ†’ ( ๐ต / 2 ) โˆˆ โ„•0 )
120 gcdnn0id โŠข ( ( ๐ต / 2 ) โˆˆ โ„•0 โ†’ ( ( ๐ต / 2 ) gcd ( ๐ต / 2 ) ) = ( ๐ต / 2 ) )
121 119 120 syl โŠข ( ๐œ‘ โ†’ ( ( ๐ต / 2 ) gcd ( ๐ต / 2 ) ) = ( ๐ต / 2 ) )
122 121 oveq1d โŠข ( ๐œ‘ โ†’ ( ( ( ๐ต / 2 ) gcd ( ๐ต / 2 ) ) gcd ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) ) = ( ( ๐ต / 2 ) gcd ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) ) )
123 112 116 gcdcomd โŠข ( ๐œ‘ โ†’ ( ( ๐ต / 2 ) gcd ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) ) = ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) )
124 122 123 eqtr2d โŠข ( ๐œ‘ โ†’ ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) = ( ( ( ๐ต / 2 ) gcd ( ๐ต / 2 ) ) gcd ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) ) )
125 116 112 gcdcomd โŠข ( ๐œ‘ โ†’ ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) = ( ( ๐ต / 2 ) gcd ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) ) )
126 125 oveq2d โŠข ( ๐œ‘ โ†’ ( ( ๐ต / 2 ) gcd ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) ) = ( ( ๐ต / 2 ) gcd ( ( ๐ต / 2 ) gcd ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) ) ) )
127 118 124 126 3eqtr4rd โŠข ( ๐œ‘ โ†’ ( ( ๐ต / 2 ) gcd ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) ) = ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) )
128 127 oveq2d โŠข ( ๐œ‘ โ†’ ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) + ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ( ๐ต / 2 ) gcd ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) ) ) = ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) + ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) ) )
129 38 simp1d โŠข ( ๐œ‘ โ†’ ( ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) + ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) ) = 1 โˆง ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) + ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) = 1 โˆง ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) = 1 ) )
130 129 simp1d โŠข ( ๐œ‘ โ†’ ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) + ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) ) = 1 )
131 130 oveq1d โŠข ( ๐œ‘ โ†’ ( ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) + ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) ) gcd ( ๐ต / 2 ) ) = ( 1 gcd ( ๐ต / 2 ) ) )
132 gcdass โŠข ( ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) + ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) โˆˆ โ„ค โˆง ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) โˆˆ โ„ค โˆง ( ๐ต / 2 ) โˆˆ โ„ค ) โ†’ ( ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) + ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) ) gcd ( ๐ต / 2 ) ) = ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) + ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) ) )
133 111 116 112 132 syl3anc โŠข ( ๐œ‘ โ†’ ( ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) + ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) ) gcd ( ๐ต / 2 ) ) = ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) + ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) ) )
134 1gcd โŠข ( ( ๐ต / 2 ) โˆˆ โ„ค โ†’ ( 1 gcd ( ๐ต / 2 ) ) = 1 )
135 112 134 syl โŠข ( ๐œ‘ โ†’ ( 1 gcd ( ๐ต / 2 ) ) = 1 )
136 131 133 135 3eqtr3d โŠข ( ๐œ‘ โ†’ ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) + ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) ) = 1 )
137 115 128 136 3eqtrd โŠข ( ๐œ‘ โ†’ ( ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) + ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) gcd ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) ) = 1 )
138 13 14 15 16 1 2 3 4 37 6 flt4lem5f โŠข ( ๐œ‘ โ†’ ( ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โ†‘ 2 ) = ( ( ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) + ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โ†‘ 4 ) + ( ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โ†‘ 4 ) ) )
139 138 eqcomd โŠข ( ๐œ‘ โ†’ ( ( ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) + ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โ†‘ 4 ) + ( ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โ†‘ 4 ) ) = ( ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โ†‘ 2 ) )
140 137 139 jca โŠข ( ๐œ‘ โ†’ ( ( ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) + ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) gcd ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) ) = 1 โˆง ( ( ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) + ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โ†‘ 4 ) + ( ( ( ( ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) + ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) โˆ’ ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) โˆ’ ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โ†‘ 4 ) ) = ( ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โ†‘ 2 ) ) )
141 98 104 107 110 140 2rspcedvdw โŠข ( ๐œ‘ โ†’ โˆƒ ๐‘š โˆˆ โ„• โˆƒ ๐‘› โˆˆ โ„• ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โ†‘ 2 ) ) )
142 92 141 jca โŠข ( ๐œ‘ โ†’ ( ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) < ๐ถ โˆง โˆƒ ๐‘š โˆˆ โ„• โˆƒ ๐‘› โˆˆ โ„• ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ( ( ( ( โˆš โ€˜ ( ๐ถ + ( ๐ต โ†‘ 2 ) ) ) + ( โˆš โ€˜ ( ๐ถ โˆ’ ( ๐ต โ†‘ 2 ) ) ) ) / 2 ) gcd ( ๐ต / 2 ) ) โ†‘ 2 ) ) ) )
143 12 44 142 rspcedvdw โŠข ( ๐œ‘ โ†’ โˆƒ ๐‘™ โˆˆ โ„• ( ๐‘™ < ๐ถ โˆง โˆƒ ๐‘š โˆˆ โ„• โˆƒ ๐‘› โˆˆ โ„• ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) )
144 breq2 โŠข ( ๐‘” = ๐‘š โ†’ ( 2 โˆฅ ๐‘” โ†” 2 โˆฅ ๐‘š ) )
145 144 notbid โŠข ( ๐‘” = ๐‘š โ†’ ( ยฌ 2 โˆฅ ๐‘” โ†” ยฌ 2 โˆฅ ๐‘š ) )
146 oveq1 โŠข ( ๐‘” = ๐‘š โ†’ ( ๐‘” gcd โ„Ž ) = ( ๐‘š gcd โ„Ž ) )
147 146 eqeq1d โŠข ( ๐‘” = ๐‘š โ†’ ( ( ๐‘” gcd โ„Ž ) = 1 โ†” ( ๐‘š gcd โ„Ž ) = 1 ) )
148 oveq1 โŠข ( ๐‘” = ๐‘š โ†’ ( ๐‘” โ†‘ 4 ) = ( ๐‘š โ†‘ 4 ) )
149 148 oveq1d โŠข ( ๐‘” = ๐‘š โ†’ ( ( ๐‘” โ†‘ 4 ) + ( โ„Ž โ†‘ 4 ) ) = ( ( ๐‘š โ†‘ 4 ) + ( โ„Ž โ†‘ 4 ) ) )
150 149 eqeq1d โŠข ( ๐‘” = ๐‘š โ†’ ( ( ( ๐‘” โ†‘ 4 ) + ( โ„Ž โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) โ†” ( ( ๐‘š โ†‘ 4 ) + ( โ„Ž โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) )
151 147 150 anbi12d โŠข ( ๐‘” = ๐‘š โ†’ ( ( ( ๐‘” gcd โ„Ž ) = 1 โˆง ( ( ๐‘” โ†‘ 4 ) + ( โ„Ž โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) โ†” ( ( ๐‘š gcd โ„Ž ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( โ„Ž โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) )
152 145 151 anbi12d โŠข ( ๐‘” = ๐‘š โ†’ ( ( ยฌ 2 โˆฅ ๐‘” โˆง ( ( ๐‘” gcd โ„Ž ) = 1 โˆง ( ( ๐‘” โ†‘ 4 ) + ( โ„Ž โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โ†” ( ยฌ 2 โˆฅ ๐‘š โˆง ( ( ๐‘š gcd โ„Ž ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( โ„Ž โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) ) )
153 oveq2 โŠข ( โ„Ž = ๐‘› โ†’ ( ๐‘š gcd โ„Ž ) = ( ๐‘š gcd ๐‘› ) )
154 153 eqeq1d โŠข ( โ„Ž = ๐‘› โ†’ ( ( ๐‘š gcd โ„Ž ) = 1 โ†” ( ๐‘š gcd ๐‘› ) = 1 ) )
155 oveq1 โŠข ( โ„Ž = ๐‘› โ†’ ( โ„Ž โ†‘ 4 ) = ( ๐‘› โ†‘ 4 ) )
156 155 oveq2d โŠข ( โ„Ž = ๐‘› โ†’ ( ( ๐‘š โ†‘ 4 ) + ( โ„Ž โ†‘ 4 ) ) = ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) )
157 156 eqeq1d โŠข ( โ„Ž = ๐‘› โ†’ ( ( ( ๐‘š โ†‘ 4 ) + ( โ„Ž โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) โ†” ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) )
158 154 157 anbi12d โŠข ( โ„Ž = ๐‘› โ†’ ( ( ( ๐‘š gcd โ„Ž ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( โ„Ž โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) โ†” ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) )
159 158 anbi2d โŠข ( โ„Ž = ๐‘› โ†’ ( ( ยฌ 2 โˆฅ ๐‘š โˆง ( ( ๐‘š gcd โ„Ž ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( โ„Ž โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โ†” ( ยฌ 2 โˆฅ ๐‘š โˆง ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) ) )
160 simplrl โŠข ( ( ( ( ( ๐œ‘ โˆง ๐‘™ โˆˆ โ„• ) โˆง ๐‘™ < ๐ถ ) โˆง ( ๐‘š โˆˆ โ„• โˆง ๐‘› โˆˆ โ„• ) ) โˆง ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โ†’ ๐‘š โˆˆ โ„• )
161 160 adantr โŠข ( ( ( ( ( ( ๐œ‘ โˆง ๐‘™ โˆˆ โ„• ) โˆง ๐‘™ < ๐ถ ) โˆง ( ๐‘š โˆˆ โ„• โˆง ๐‘› โˆˆ โ„• ) ) โˆง ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โˆง ยฌ 2 โˆฅ ๐‘š ) โ†’ ๐‘š โˆˆ โ„• )
162 simprr โŠข ( ( ( ( ๐œ‘ โˆง ๐‘™ โˆˆ โ„• ) โˆง ๐‘™ < ๐ถ ) โˆง ( ๐‘š โˆˆ โ„• โˆง ๐‘› โˆˆ โ„• ) ) โ†’ ๐‘› โˆˆ โ„• )
163 162 ad2antrr โŠข ( ( ( ( ( ( ๐œ‘ โˆง ๐‘™ โˆˆ โ„• ) โˆง ๐‘™ < ๐ถ ) โˆง ( ๐‘š โˆˆ โ„• โˆง ๐‘› โˆˆ โ„• ) ) โˆง ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โˆง ยฌ 2 โˆฅ ๐‘š ) โ†’ ๐‘› โˆˆ โ„• )
164 simpr โŠข ( ( ( ( ( ( ๐œ‘ โˆง ๐‘™ โˆˆ โ„• ) โˆง ๐‘™ < ๐ถ ) โˆง ( ๐‘š โˆˆ โ„• โˆง ๐‘› โˆˆ โ„• ) ) โˆง ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โˆง ยฌ 2 โˆฅ ๐‘š ) โ†’ ยฌ 2 โˆฅ ๐‘š )
165 simplr โŠข ( ( ( ( ( ( ๐œ‘ โˆง ๐‘™ โˆˆ โ„• ) โˆง ๐‘™ < ๐ถ ) โˆง ( ๐‘š โˆˆ โ„• โˆง ๐‘› โˆˆ โ„• ) ) โˆง ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โˆง ยฌ 2 โˆฅ ๐‘š ) โ†’ ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) )
166 164 165 jca โŠข ( ( ( ( ( ( ๐œ‘ โˆง ๐‘™ โˆˆ โ„• ) โˆง ๐‘™ < ๐ถ ) โˆง ( ๐‘š โˆˆ โ„• โˆง ๐‘› โˆˆ โ„• ) ) โˆง ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โˆง ยฌ 2 โˆฅ ๐‘š ) โ†’ ( ยฌ 2 โˆฅ ๐‘š โˆง ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) )
167 152 159 161 163 166 2rspcedvdw โŠข ( ( ( ( ( ( ๐œ‘ โˆง ๐‘™ โˆˆ โ„• ) โˆง ๐‘™ < ๐ถ ) โˆง ( ๐‘š โˆˆ โ„• โˆง ๐‘› โˆˆ โ„• ) ) โˆง ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โˆง ยฌ 2 โˆฅ ๐‘š ) โ†’ โˆƒ ๐‘” โˆˆ โ„• โˆƒ โ„Ž โˆˆ โ„• ( ยฌ 2 โˆฅ ๐‘” โˆง ( ( ๐‘” gcd โ„Ž ) = 1 โˆง ( ( ๐‘” โ†‘ 4 ) + ( โ„Ž โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) )
168 simp-4r โŠข ( ( ( ( ( ( ๐œ‘ โˆง ๐‘™ โˆˆ โ„• ) โˆง ๐‘™ < ๐ถ ) โˆง ( ๐‘š โˆˆ โ„• โˆง ๐‘› โˆˆ โ„• ) ) โˆง ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โˆง ยฌ 2 โˆฅ ๐‘š ) โ†’ ๐‘™ < ๐ถ )
169 167 168 jca โŠข ( ( ( ( ( ( ๐œ‘ โˆง ๐‘™ โˆˆ โ„• ) โˆง ๐‘™ < ๐ถ ) โˆง ( ๐‘š โˆˆ โ„• โˆง ๐‘› โˆˆ โ„• ) ) โˆง ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โˆง ยฌ 2 โˆฅ ๐‘š ) โ†’ ( โˆƒ ๐‘” โˆˆ โ„• โˆƒ โ„Ž โˆˆ โ„• ( ยฌ 2 โˆฅ ๐‘” โˆง ( ( ๐‘” gcd โ„Ž ) = 1 โˆง ( ( ๐‘” โ†‘ 4 ) + ( โ„Ž โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โˆง ๐‘™ < ๐ถ ) )
170 breq2 โŠข ( ๐‘” = ๐‘› โ†’ ( 2 โˆฅ ๐‘” โ†” 2 โˆฅ ๐‘› ) )
171 170 notbid โŠข ( ๐‘” = ๐‘› โ†’ ( ยฌ 2 โˆฅ ๐‘” โ†” ยฌ 2 โˆฅ ๐‘› ) )
172 oveq1 โŠข ( ๐‘” = ๐‘› โ†’ ( ๐‘” gcd โ„Ž ) = ( ๐‘› gcd โ„Ž ) )
173 172 eqeq1d โŠข ( ๐‘” = ๐‘› โ†’ ( ( ๐‘” gcd โ„Ž ) = 1 โ†” ( ๐‘› gcd โ„Ž ) = 1 ) )
174 oveq1 โŠข ( ๐‘” = ๐‘› โ†’ ( ๐‘” โ†‘ 4 ) = ( ๐‘› โ†‘ 4 ) )
175 174 oveq1d โŠข ( ๐‘” = ๐‘› โ†’ ( ( ๐‘” โ†‘ 4 ) + ( โ„Ž โ†‘ 4 ) ) = ( ( ๐‘› โ†‘ 4 ) + ( โ„Ž โ†‘ 4 ) ) )
176 175 eqeq1d โŠข ( ๐‘” = ๐‘› โ†’ ( ( ( ๐‘” โ†‘ 4 ) + ( โ„Ž โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) โ†” ( ( ๐‘› โ†‘ 4 ) + ( โ„Ž โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) )
177 173 176 anbi12d โŠข ( ๐‘” = ๐‘› โ†’ ( ( ( ๐‘” gcd โ„Ž ) = 1 โˆง ( ( ๐‘” โ†‘ 4 ) + ( โ„Ž โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) โ†” ( ( ๐‘› gcd โ„Ž ) = 1 โˆง ( ( ๐‘› โ†‘ 4 ) + ( โ„Ž โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) )
178 171 177 anbi12d โŠข ( ๐‘” = ๐‘› โ†’ ( ( ยฌ 2 โˆฅ ๐‘” โˆง ( ( ๐‘” gcd โ„Ž ) = 1 โˆง ( ( ๐‘” โ†‘ 4 ) + ( โ„Ž โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โ†” ( ยฌ 2 โˆฅ ๐‘› โˆง ( ( ๐‘› gcd โ„Ž ) = 1 โˆง ( ( ๐‘› โ†‘ 4 ) + ( โ„Ž โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) ) )
179 oveq2 โŠข ( โ„Ž = ๐‘š โ†’ ( ๐‘› gcd โ„Ž ) = ( ๐‘› gcd ๐‘š ) )
180 179 eqeq1d โŠข ( โ„Ž = ๐‘š โ†’ ( ( ๐‘› gcd โ„Ž ) = 1 โ†” ( ๐‘› gcd ๐‘š ) = 1 ) )
181 oveq1 โŠข ( โ„Ž = ๐‘š โ†’ ( โ„Ž โ†‘ 4 ) = ( ๐‘š โ†‘ 4 ) )
182 181 oveq2d โŠข ( โ„Ž = ๐‘š โ†’ ( ( ๐‘› โ†‘ 4 ) + ( โ„Ž โ†‘ 4 ) ) = ( ( ๐‘› โ†‘ 4 ) + ( ๐‘š โ†‘ 4 ) ) )
183 182 eqeq1d โŠข ( โ„Ž = ๐‘š โ†’ ( ( ( ๐‘› โ†‘ 4 ) + ( โ„Ž โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) โ†” ( ( ๐‘› โ†‘ 4 ) + ( ๐‘š โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) )
184 180 183 anbi12d โŠข ( โ„Ž = ๐‘š โ†’ ( ( ( ๐‘› gcd โ„Ž ) = 1 โˆง ( ( ๐‘› โ†‘ 4 ) + ( โ„Ž โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) โ†” ( ( ๐‘› gcd ๐‘š ) = 1 โˆง ( ( ๐‘› โ†‘ 4 ) + ( ๐‘š โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) )
185 184 anbi2d โŠข ( โ„Ž = ๐‘š โ†’ ( ( ยฌ 2 โˆฅ ๐‘› โˆง ( ( ๐‘› gcd โ„Ž ) = 1 โˆง ( ( ๐‘› โ†‘ 4 ) + ( โ„Ž โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โ†” ( ยฌ 2 โˆฅ ๐‘› โˆง ( ( ๐‘› gcd ๐‘š ) = 1 โˆง ( ( ๐‘› โ†‘ 4 ) + ( ๐‘š โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) ) )
186 162 ad2antrr โŠข ( ( ( ( ( ( ๐œ‘ โˆง ๐‘™ โˆˆ โ„• ) โˆง ๐‘™ < ๐ถ ) โˆง ( ๐‘š โˆˆ โ„• โˆง ๐‘› โˆˆ โ„• ) ) โˆง ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โˆง ยฌ 2 โˆฅ ๐‘› ) โ†’ ๐‘› โˆˆ โ„• )
187 160 adantr โŠข ( ( ( ( ( ( ๐œ‘ โˆง ๐‘™ โˆˆ โ„• ) โˆง ๐‘™ < ๐ถ ) โˆง ( ๐‘š โˆˆ โ„• โˆง ๐‘› โˆˆ โ„• ) ) โˆง ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โˆง ยฌ 2 โˆฅ ๐‘› ) โ†’ ๐‘š โˆˆ โ„• )
188 simpr โŠข ( ( ( ( ( ( ๐œ‘ โˆง ๐‘™ โˆˆ โ„• ) โˆง ๐‘™ < ๐ถ ) โˆง ( ๐‘š โˆˆ โ„• โˆง ๐‘› โˆˆ โ„• ) ) โˆง ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โˆง ยฌ 2 โˆฅ ๐‘› ) โ†’ ยฌ 2 โˆฅ ๐‘› )
189 186 nnzd โŠข ( ( ( ( ( ( ๐œ‘ โˆง ๐‘™ โˆˆ โ„• ) โˆง ๐‘™ < ๐ถ ) โˆง ( ๐‘š โˆˆ โ„• โˆง ๐‘› โˆˆ โ„• ) ) โˆง ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โˆง ยฌ 2 โˆฅ ๐‘› ) โ†’ ๐‘› โˆˆ โ„ค )
190 187 nnzd โŠข ( ( ( ( ( ( ๐œ‘ โˆง ๐‘™ โˆˆ โ„• ) โˆง ๐‘™ < ๐ถ ) โˆง ( ๐‘š โˆˆ โ„• โˆง ๐‘› โˆˆ โ„• ) ) โˆง ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โˆง ยฌ 2 โˆฅ ๐‘› ) โ†’ ๐‘š โˆˆ โ„ค )
191 189 190 gcdcomd โŠข ( ( ( ( ( ( ๐œ‘ โˆง ๐‘™ โˆˆ โ„• ) โˆง ๐‘™ < ๐ถ ) โˆง ( ๐‘š โˆˆ โ„• โˆง ๐‘› โˆˆ โ„• ) ) โˆง ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โˆง ยฌ 2 โˆฅ ๐‘› ) โ†’ ( ๐‘› gcd ๐‘š ) = ( ๐‘š gcd ๐‘› ) )
192 simplrl โŠข ( ( ( ( ( ( ๐œ‘ โˆง ๐‘™ โˆˆ โ„• ) โˆง ๐‘™ < ๐ถ ) โˆง ( ๐‘š โˆˆ โ„• โˆง ๐‘› โˆˆ โ„• ) ) โˆง ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โˆง ยฌ 2 โˆฅ ๐‘› ) โ†’ ( ๐‘š gcd ๐‘› ) = 1 )
193 191 192 eqtrd โŠข ( ( ( ( ( ( ๐œ‘ โˆง ๐‘™ โˆˆ โ„• ) โˆง ๐‘™ < ๐ถ ) โˆง ( ๐‘š โˆˆ โ„• โˆง ๐‘› โˆˆ โ„• ) ) โˆง ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โˆง ยฌ 2 โˆฅ ๐‘› ) โ†’ ( ๐‘› gcd ๐‘š ) = 1 )
194 55 a1i โŠข ( ( ( ( ( ( ๐œ‘ โˆง ๐‘™ โˆˆ โ„• ) โˆง ๐‘™ < ๐ถ ) โˆง ( ๐‘š โˆˆ โ„• โˆง ๐‘› โˆˆ โ„• ) ) โˆง ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โˆง ยฌ 2 โˆฅ ๐‘› ) โ†’ 4 โˆˆ โ„•0 )
195 186 194 nnexpcld โŠข ( ( ( ( ( ( ๐œ‘ โˆง ๐‘™ โˆˆ โ„• ) โˆง ๐‘™ < ๐ถ ) โˆง ( ๐‘š โˆˆ โ„• โˆง ๐‘› โˆˆ โ„• ) ) โˆง ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โˆง ยฌ 2 โˆฅ ๐‘› ) โ†’ ( ๐‘› โ†‘ 4 ) โˆˆ โ„• )
196 195 nncnd โŠข ( ( ( ( ( ( ๐œ‘ โˆง ๐‘™ โˆˆ โ„• ) โˆง ๐‘™ < ๐ถ ) โˆง ( ๐‘š โˆˆ โ„• โˆง ๐‘› โˆˆ โ„• ) ) โˆง ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โˆง ยฌ 2 โˆฅ ๐‘› ) โ†’ ( ๐‘› โ†‘ 4 ) โˆˆ โ„‚ )
197 187 194 nnexpcld โŠข ( ( ( ( ( ( ๐œ‘ โˆง ๐‘™ โˆˆ โ„• ) โˆง ๐‘™ < ๐ถ ) โˆง ( ๐‘š โˆˆ โ„• โˆง ๐‘› โˆˆ โ„• ) ) โˆง ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โˆง ยฌ 2 โˆฅ ๐‘› ) โ†’ ( ๐‘š โ†‘ 4 ) โˆˆ โ„• )
198 197 nncnd โŠข ( ( ( ( ( ( ๐œ‘ โˆง ๐‘™ โˆˆ โ„• ) โˆง ๐‘™ < ๐ถ ) โˆง ( ๐‘š โˆˆ โ„• โˆง ๐‘› โˆˆ โ„• ) ) โˆง ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โˆง ยฌ 2 โˆฅ ๐‘› ) โ†’ ( ๐‘š โ†‘ 4 ) โˆˆ โ„‚ )
199 196 198 addcomd โŠข ( ( ( ( ( ( ๐œ‘ โˆง ๐‘™ โˆˆ โ„• ) โˆง ๐‘™ < ๐ถ ) โˆง ( ๐‘š โˆˆ โ„• โˆง ๐‘› โˆˆ โ„• ) ) โˆง ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โˆง ยฌ 2 โˆฅ ๐‘› ) โ†’ ( ( ๐‘› โ†‘ 4 ) + ( ๐‘š โ†‘ 4 ) ) = ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) )
200 simplrr โŠข ( ( ( ( ( ( ๐œ‘ โˆง ๐‘™ โˆˆ โ„• ) โˆง ๐‘™ < ๐ถ ) โˆง ( ๐‘š โˆˆ โ„• โˆง ๐‘› โˆˆ โ„• ) ) โˆง ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โˆง ยฌ 2 โˆฅ ๐‘› ) โ†’ ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) )
201 199 200 eqtrd โŠข ( ( ( ( ( ( ๐œ‘ โˆง ๐‘™ โˆˆ โ„• ) โˆง ๐‘™ < ๐ถ ) โˆง ( ๐‘š โˆˆ โ„• โˆง ๐‘› โˆˆ โ„• ) ) โˆง ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โˆง ยฌ 2 โˆฅ ๐‘› ) โ†’ ( ( ๐‘› โ†‘ 4 ) + ( ๐‘š โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) )
202 188 193 201 jca32 โŠข ( ( ( ( ( ( ๐œ‘ โˆง ๐‘™ โˆˆ โ„• ) โˆง ๐‘™ < ๐ถ ) โˆง ( ๐‘š โˆˆ โ„• โˆง ๐‘› โˆˆ โ„• ) ) โˆง ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โˆง ยฌ 2 โˆฅ ๐‘› ) โ†’ ( ยฌ 2 โˆฅ ๐‘› โˆง ( ( ๐‘› gcd ๐‘š ) = 1 โˆง ( ( ๐‘› โ†‘ 4 ) + ( ๐‘š โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) )
203 178 185 186 187 202 2rspcedvdw โŠข ( ( ( ( ( ( ๐œ‘ โˆง ๐‘™ โˆˆ โ„• ) โˆง ๐‘™ < ๐ถ ) โˆง ( ๐‘š โˆˆ โ„• โˆง ๐‘› โˆˆ โ„• ) ) โˆง ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โˆง ยฌ 2 โˆฅ ๐‘› ) โ†’ โˆƒ ๐‘” โˆˆ โ„• โˆƒ โ„Ž โˆˆ โ„• ( ยฌ 2 โˆฅ ๐‘” โˆง ( ( ๐‘” gcd โ„Ž ) = 1 โˆง ( ( ๐‘” โ†‘ 4 ) + ( โ„Ž โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) )
204 simp-4r โŠข ( ( ( ( ( ( ๐œ‘ โˆง ๐‘™ โˆˆ โ„• ) โˆง ๐‘™ < ๐ถ ) โˆง ( ๐‘š โˆˆ โ„• โˆง ๐‘› โˆˆ โ„• ) ) โˆง ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โˆง ยฌ 2 โˆฅ ๐‘› ) โ†’ ๐‘™ < ๐ถ )
205 203 204 jca โŠข ( ( ( ( ( ( ๐œ‘ โˆง ๐‘™ โˆˆ โ„• ) โˆง ๐‘™ < ๐ถ ) โˆง ( ๐‘š โˆˆ โ„• โˆง ๐‘› โˆˆ โ„• ) ) โˆง ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โˆง ยฌ 2 โˆฅ ๐‘› ) โ†’ ( โˆƒ ๐‘” โˆˆ โ„• โˆƒ โ„Ž โˆˆ โ„• ( ยฌ 2 โˆฅ ๐‘” โˆง ( ( ๐‘” gcd โ„Ž ) = 1 โˆง ( ( ๐‘” โ†‘ 4 ) + ( โ„Ž โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โˆง ๐‘™ < ๐ถ ) )
206 simprl โŠข ( ( ( ( ๐œ‘ โˆง ๐‘™ โˆˆ โ„• ) โˆง ๐‘™ < ๐ถ ) โˆง ( ๐‘š โˆˆ โ„• โˆง ๐‘› โˆˆ โ„• ) ) โ†’ ๐‘š โˆˆ โ„• )
207 206 ad2antrr โŠข ( ( ( ( ( ( ๐œ‘ โˆง ๐‘™ โˆˆ โ„• ) โˆง ๐‘™ < ๐ถ ) โˆง ( ๐‘š โˆˆ โ„• โˆง ๐‘› โˆˆ โ„• ) ) โˆง ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โˆง 2 โˆฅ ๐‘š ) โ†’ ๐‘š โˆˆ โ„• )
208 207 nnsqcld โŠข ( ( ( ( ( ( ๐œ‘ โˆง ๐‘™ โˆˆ โ„• ) โˆง ๐‘™ < ๐ถ ) โˆง ( ๐‘š โˆˆ โ„• โˆง ๐‘› โˆˆ โ„• ) ) โˆง ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โˆง 2 โˆฅ ๐‘š ) โ†’ ( ๐‘š โ†‘ 2 ) โˆˆ โ„• )
209 162 ad2antrr โŠข ( ( ( ( ( ( ๐œ‘ โˆง ๐‘™ โˆˆ โ„• ) โˆง ๐‘™ < ๐ถ ) โˆง ( ๐‘š โˆˆ โ„• โˆง ๐‘› โˆˆ โ„• ) ) โˆง ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โˆง 2 โˆฅ ๐‘š ) โ†’ ๐‘› โˆˆ โ„• )
210 209 nnsqcld โŠข ( ( ( ( ( ( ๐œ‘ โˆง ๐‘™ โˆˆ โ„• ) โˆง ๐‘™ < ๐ถ ) โˆง ( ๐‘š โˆˆ โ„• โˆง ๐‘› โˆˆ โ„• ) ) โˆง ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โˆง 2 โˆฅ ๐‘š ) โ†’ ( ๐‘› โ†‘ 2 ) โˆˆ โ„• )
211 simp-5r โŠข ( ( ( ( ( ( ๐œ‘ โˆง ๐‘™ โˆˆ โ„• ) โˆง ๐‘™ < ๐ถ ) โˆง ( ๐‘š โˆˆ โ„• โˆง ๐‘› โˆˆ โ„• ) ) โˆง ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โˆง 2 โˆฅ ๐‘š ) โ†’ ๐‘™ โˆˆ โ„• )
212 160 nnzd โŠข ( ( ( ( ( ๐œ‘ โˆง ๐‘™ โˆˆ โ„• ) โˆง ๐‘™ < ๐ถ ) โˆง ( ๐‘š โˆˆ โ„• โˆง ๐‘› โˆˆ โ„• ) ) โˆง ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โ†’ ๐‘š โˆˆ โ„ค )
213 27 a1i โŠข ( ( ( ( ( ๐œ‘ โˆง ๐‘™ โˆˆ โ„• ) โˆง ๐‘™ < ๐ถ ) โˆง ( ๐‘š โˆˆ โ„• โˆง ๐‘› โˆˆ โ„• ) ) โˆง ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โ†’ 2 โˆˆ โ„• )
214 dvdsexp2im โŠข ( ( 2 โˆˆ โ„ค โˆง ๐‘š โˆˆ โ„ค โˆง 2 โˆˆ โ„• ) โ†’ ( 2 โˆฅ ๐‘š โ†’ 2 โˆฅ ( ๐‘š โ†‘ 2 ) ) )
215 62 212 213 214 mp3an2i โŠข ( ( ( ( ( ๐œ‘ โˆง ๐‘™ โˆˆ โ„• ) โˆง ๐‘™ < ๐ถ ) โˆง ( ๐‘š โˆˆ โ„• โˆง ๐‘› โˆˆ โ„• ) ) โˆง ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โ†’ ( 2 โˆฅ ๐‘š โ†’ 2 โˆฅ ( ๐‘š โ†‘ 2 ) ) )
216 215 imp โŠข ( ( ( ( ( ( ๐œ‘ โˆง ๐‘™ โˆˆ โ„• ) โˆง ๐‘™ < ๐ถ ) โˆง ( ๐‘š โˆˆ โ„• โˆง ๐‘› โˆˆ โ„• ) ) โˆง ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โˆง 2 โˆฅ ๐‘š ) โ†’ 2 โˆฅ ( ๐‘š โ†‘ 2 ) )
217 19 a1i โŠข ( ( ( ( ( ( ๐œ‘ โˆง ๐‘™ โˆˆ โ„• ) โˆง ๐‘™ < ๐ถ ) โˆง ( ๐‘š โˆˆ โ„• โˆง ๐‘› โˆˆ โ„• ) ) โˆง ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โˆง 2 โˆฅ ๐‘š ) โ†’ 2 โˆˆ โ„•0 )
218 207 nncnd โŠข ( ( ( ( ( ( ๐œ‘ โˆง ๐‘™ โˆˆ โ„• ) โˆง ๐‘™ < ๐ถ ) โˆง ( ๐‘š โˆˆ โ„• โˆง ๐‘› โˆˆ โ„• ) ) โˆง ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โˆง 2 โˆฅ ๐‘š ) โ†’ ๐‘š โˆˆ โ„‚ )
219 218 flt4lem โŠข ( ( ( ( ( ( ๐œ‘ โˆง ๐‘™ โˆˆ โ„• ) โˆง ๐‘™ < ๐ถ ) โˆง ( ๐‘š โˆˆ โ„• โˆง ๐‘› โˆˆ โ„• ) ) โˆง ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โˆง 2 โˆฅ ๐‘š ) โ†’ ( ๐‘š โ†‘ 4 ) = ( ( ๐‘š โ†‘ 2 ) โ†‘ 2 ) )
220 209 nncnd โŠข ( ( ( ( ( ( ๐œ‘ โˆง ๐‘™ โˆˆ โ„• ) โˆง ๐‘™ < ๐ถ ) โˆง ( ๐‘š โˆˆ โ„• โˆง ๐‘› โˆˆ โ„• ) ) โˆง ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โˆง 2 โˆฅ ๐‘š ) โ†’ ๐‘› โˆˆ โ„‚ )
221 220 flt4lem โŠข ( ( ( ( ( ( ๐œ‘ โˆง ๐‘™ โˆˆ โ„• ) โˆง ๐‘™ < ๐ถ ) โˆง ( ๐‘š โˆˆ โ„• โˆง ๐‘› โˆˆ โ„• ) ) โˆง ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โˆง 2 โˆฅ ๐‘š ) โ†’ ( ๐‘› โ†‘ 4 ) = ( ( ๐‘› โ†‘ 2 ) โ†‘ 2 ) )
222 219 221 oveq12d โŠข ( ( ( ( ( ( ๐œ‘ โˆง ๐‘™ โˆˆ โ„• ) โˆง ๐‘™ < ๐ถ ) โˆง ( ๐‘š โˆˆ โ„• โˆง ๐‘› โˆˆ โ„• ) ) โˆง ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โˆง 2 โˆฅ ๐‘š ) โ†’ ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ( ( ๐‘š โ†‘ 2 ) โ†‘ 2 ) + ( ( ๐‘› โ†‘ 2 ) โ†‘ 2 ) ) )
223 simplrr โŠข ( ( ( ( ( ( ๐œ‘ โˆง ๐‘™ โˆˆ โ„• ) โˆง ๐‘™ < ๐ถ ) โˆง ( ๐‘š โˆˆ โ„• โˆง ๐‘› โˆˆ โ„• ) ) โˆง ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โˆง 2 โˆฅ ๐‘š ) โ†’ ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) )
224 222 223 eqtr3d โŠข ( ( ( ( ( ( ๐œ‘ โˆง ๐‘™ โˆˆ โ„• ) โˆง ๐‘™ < ๐ถ ) โˆง ( ๐‘š โˆˆ โ„• โˆง ๐‘› โˆˆ โ„• ) ) โˆง ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โˆง 2 โˆฅ ๐‘š ) โ†’ ( ( ( ๐‘š โ†‘ 2 ) โ†‘ 2 ) + ( ( ๐‘› โ†‘ 2 ) โ†‘ 2 ) ) = ( ๐‘™ โ†‘ 2 ) )
225 simplrl โŠข ( ( ( ( ( ( ๐œ‘ โˆง ๐‘™ โˆˆ โ„• ) โˆง ๐‘™ < ๐ถ ) โˆง ( ๐‘š โˆˆ โ„• โˆง ๐‘› โˆˆ โ„• ) ) โˆง ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โˆง 2 โˆฅ ๐‘š ) โ†’ ( ๐‘š gcd ๐‘› ) = 1 )
226 27 a1i โŠข ( ( ( ( ( ( ๐œ‘ โˆง ๐‘™ โˆˆ โ„• ) โˆง ๐‘™ < ๐ถ ) โˆง ( ๐‘š โˆˆ โ„• โˆง ๐‘› โˆˆ โ„• ) ) โˆง ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โˆง 2 โˆฅ ๐‘š ) โ†’ 2 โˆˆ โ„• )
227 rppwr โŠข ( ( ๐‘š โˆˆ โ„• โˆง ๐‘› โˆˆ โ„• โˆง 2 โˆˆ โ„• ) โ†’ ( ( ๐‘š gcd ๐‘› ) = 1 โ†’ ( ( ๐‘š โ†‘ 2 ) gcd ( ๐‘› โ†‘ 2 ) ) = 1 ) )
228 207 209 226 227 syl3anc โŠข ( ( ( ( ( ( ๐œ‘ โˆง ๐‘™ โˆˆ โ„• ) โˆง ๐‘™ < ๐ถ ) โˆง ( ๐‘š โˆˆ โ„• โˆง ๐‘› โˆˆ โ„• ) ) โˆง ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โˆง 2 โˆฅ ๐‘š ) โ†’ ( ( ๐‘š gcd ๐‘› ) = 1 โ†’ ( ( ๐‘š โ†‘ 2 ) gcd ( ๐‘› โ†‘ 2 ) ) = 1 ) )
229 225 228 mpd โŠข ( ( ( ( ( ( ๐œ‘ โˆง ๐‘™ โˆˆ โ„• ) โˆง ๐‘™ < ๐ถ ) โˆง ( ๐‘š โˆˆ โ„• โˆง ๐‘› โˆˆ โ„• ) ) โˆง ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โˆง 2 โˆฅ ๐‘š ) โ†’ ( ( ๐‘š โ†‘ 2 ) gcd ( ๐‘› โ†‘ 2 ) ) = 1 )
230 208 210 211 217 224 229 fltaccoprm โŠข ( ( ( ( ( ( ๐œ‘ โˆง ๐‘™ โˆˆ โ„• ) โˆง ๐‘™ < ๐ถ ) โˆง ( ๐‘š โˆˆ โ„• โˆง ๐‘› โˆˆ โ„• ) ) โˆง ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โˆง 2 โˆฅ ๐‘š ) โ†’ ( ( ๐‘š โ†‘ 2 ) gcd ๐‘™ ) = 1 )
231 208 210 211 216 230 224 flt4lem2 โŠข ( ( ( ( ( ( ๐œ‘ โˆง ๐‘™ โˆˆ โ„• ) โˆง ๐‘™ < ๐ถ ) โˆง ( ๐‘š โˆˆ โ„• โˆง ๐‘› โˆˆ โ„• ) ) โˆง ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โˆง 2 โˆฅ ๐‘š ) โ†’ ยฌ 2 โˆฅ ( ๐‘› โ†‘ 2 ) )
232 209 nnzd โŠข ( ( ( ( ( ( ๐œ‘ โˆง ๐‘™ โˆˆ โ„• ) โˆง ๐‘™ < ๐ถ ) โˆง ( ๐‘š โˆˆ โ„• โˆง ๐‘› โˆˆ โ„• ) ) โˆง ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โˆง 2 โˆฅ ๐‘š ) โ†’ ๐‘› โˆˆ โ„ค )
233 dvdsexp2im โŠข ( ( 2 โˆˆ โ„ค โˆง ๐‘› โˆˆ โ„ค โˆง 2 โˆˆ โ„• ) โ†’ ( 2 โˆฅ ๐‘› โ†’ 2 โˆฅ ( ๐‘› โ†‘ 2 ) ) )
234 62 232 226 233 mp3an2i โŠข ( ( ( ( ( ( ๐œ‘ โˆง ๐‘™ โˆˆ โ„• ) โˆง ๐‘™ < ๐ถ ) โˆง ( ๐‘š โˆˆ โ„• โˆง ๐‘› โˆˆ โ„• ) ) โˆง ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โˆง 2 โˆฅ ๐‘š ) โ†’ ( 2 โˆฅ ๐‘› โ†’ 2 โˆฅ ( ๐‘› โ†‘ 2 ) ) )
235 231 234 mtod โŠข ( ( ( ( ( ( ๐œ‘ โˆง ๐‘™ โˆˆ โ„• ) โˆง ๐‘™ < ๐ถ ) โˆง ( ๐‘š โˆˆ โ„• โˆง ๐‘› โˆˆ โ„• ) ) โˆง ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โˆง 2 โˆฅ ๐‘š ) โ†’ ยฌ 2 โˆฅ ๐‘› )
236 235 ex โŠข ( ( ( ( ( ๐œ‘ โˆง ๐‘™ โˆˆ โ„• ) โˆง ๐‘™ < ๐ถ ) โˆง ( ๐‘š โˆˆ โ„• โˆง ๐‘› โˆˆ โ„• ) ) โˆง ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โ†’ ( 2 โˆฅ ๐‘š โ†’ ยฌ 2 โˆฅ ๐‘› ) )
237 imor โŠข ( ( 2 โˆฅ ๐‘š โ†’ ยฌ 2 โˆฅ ๐‘› ) โ†” ( ยฌ 2 โˆฅ ๐‘š โˆจ ยฌ 2 โˆฅ ๐‘› ) )
238 236 237 sylib โŠข ( ( ( ( ( ๐œ‘ โˆง ๐‘™ โˆˆ โ„• ) โˆง ๐‘™ < ๐ถ ) โˆง ( ๐‘š โˆˆ โ„• โˆง ๐‘› โˆˆ โ„• ) ) โˆง ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โ†’ ( ยฌ 2 โˆฅ ๐‘š โˆจ ยฌ 2 โˆฅ ๐‘› ) )
239 169 205 238 mpjaodan โŠข ( ( ( ( ( ๐œ‘ โˆง ๐‘™ โˆˆ โ„• ) โˆง ๐‘™ < ๐ถ ) โˆง ( ๐‘š โˆˆ โ„• โˆง ๐‘› โˆˆ โ„• ) ) โˆง ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โ†’ ( โˆƒ ๐‘” โˆˆ โ„• โˆƒ โ„Ž โˆˆ โ„• ( ยฌ 2 โˆฅ ๐‘” โˆง ( ( ๐‘” gcd โ„Ž ) = 1 โˆง ( ( ๐‘” โ†‘ 4 ) + ( โ„Ž โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โˆง ๐‘™ < ๐ถ ) )
240 239 ex โŠข ( ( ( ( ๐œ‘ โˆง ๐‘™ โˆˆ โ„• ) โˆง ๐‘™ < ๐ถ ) โˆง ( ๐‘š โˆˆ โ„• โˆง ๐‘› โˆˆ โ„• ) ) โ†’ ( ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) โ†’ ( โˆƒ ๐‘” โˆˆ โ„• โˆƒ โ„Ž โˆˆ โ„• ( ยฌ 2 โˆฅ ๐‘” โˆง ( ( ๐‘” gcd โ„Ž ) = 1 โˆง ( ( ๐‘” โ†‘ 4 ) + ( โ„Ž โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โˆง ๐‘™ < ๐ถ ) ) )
241 240 rexlimdvva โŠข ( ( ( ๐œ‘ โˆง ๐‘™ โˆˆ โ„• ) โˆง ๐‘™ < ๐ถ ) โ†’ ( โˆƒ ๐‘š โˆˆ โ„• โˆƒ ๐‘› โˆˆ โ„• ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) โ†’ ( โˆƒ ๐‘” โˆˆ โ„• โˆƒ โ„Ž โˆˆ โ„• ( ยฌ 2 โˆฅ ๐‘” โˆง ( ( ๐‘” gcd โ„Ž ) = 1 โˆง ( ( ๐‘” โ†‘ 4 ) + ( โ„Ž โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โˆง ๐‘™ < ๐ถ ) ) )
242 241 expimpd โŠข ( ( ๐œ‘ โˆง ๐‘™ โˆˆ โ„• ) โ†’ ( ( ๐‘™ < ๐ถ โˆง โˆƒ ๐‘š โˆˆ โ„• โˆƒ ๐‘› โˆˆ โ„• ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โ†’ ( โˆƒ ๐‘” โˆˆ โ„• โˆƒ โ„Ž โˆˆ โ„• ( ยฌ 2 โˆฅ ๐‘” โˆง ( ( ๐‘” gcd โ„Ž ) = 1 โˆง ( ( ๐‘” โ†‘ 4 ) + ( โ„Ž โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โˆง ๐‘™ < ๐ถ ) ) )
243 242 reximdva โŠข ( ๐œ‘ โ†’ ( โˆƒ ๐‘™ โˆˆ โ„• ( ๐‘™ < ๐ถ โˆง โˆƒ ๐‘š โˆˆ โ„• โˆƒ ๐‘› โˆˆ โ„• ( ( ๐‘š gcd ๐‘› ) = 1 โˆง ( ( ๐‘š โ†‘ 4 ) + ( ๐‘› โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โ†’ โˆƒ ๐‘™ โˆˆ โ„• ( โˆƒ ๐‘” โˆˆ โ„• โˆƒ โ„Ž โˆˆ โ„• ( ยฌ 2 โˆฅ ๐‘” โˆง ( ( ๐‘” gcd โ„Ž ) = 1 โˆง ( ( ๐‘” โ†‘ 4 ) + ( โ„Ž โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โˆง ๐‘™ < ๐ถ ) ) )
244 143 243 mpd โŠข ( ๐œ‘ โ†’ โˆƒ ๐‘™ โˆˆ โ„• ( โˆƒ ๐‘” โˆˆ โ„• โˆƒ โ„Ž โˆˆ โ„• ( ยฌ 2 โˆฅ ๐‘” โˆง ( ( ๐‘” gcd โ„Ž ) = 1 โˆง ( ( ๐‘” โ†‘ 4 ) + ( โ„Ž โ†‘ 4 ) ) = ( ๐‘™ โ†‘ 2 ) ) ) โˆง ๐‘™ < ๐ถ ) )