Metamath Proof Explorer


Theorem leexp1a

Description: Weak base ordering relationship for exponentiation of real bases to a fixed nonnegative integer exponent. (Contributed by NM, 18-Dec-2005)

Ref Expression
Assertion leexp1a ( ( ( ๐ด โˆˆ โ„ โˆง ๐ต โˆˆ โ„ โˆง ๐‘ โˆˆ โ„•0 ) โˆง ( 0 โ‰ค ๐ด โˆง ๐ด โ‰ค ๐ต ) ) โ†’ ( ๐ด โ†‘ ๐‘ ) โ‰ค ( ๐ต โ†‘ ๐‘ ) )

Proof

Step Hyp Ref Expression
1 oveq2 โŠข ( ๐‘— = 0 โ†’ ( ๐ด โ†‘ ๐‘— ) = ( ๐ด โ†‘ 0 ) )
2 oveq2 โŠข ( ๐‘— = 0 โ†’ ( ๐ต โ†‘ ๐‘— ) = ( ๐ต โ†‘ 0 ) )
3 1 2 breq12d โŠข ( ๐‘— = 0 โ†’ ( ( ๐ด โ†‘ ๐‘— ) โ‰ค ( ๐ต โ†‘ ๐‘— ) โ†” ( ๐ด โ†‘ 0 ) โ‰ค ( ๐ต โ†‘ 0 ) ) )
4 3 imbi2d โŠข ( ๐‘— = 0 โ†’ ( ( ( ( ๐ด โˆˆ โ„ โˆง ๐ต โˆˆ โ„ ) โˆง ( 0 โ‰ค ๐ด โˆง ๐ด โ‰ค ๐ต ) ) โ†’ ( ๐ด โ†‘ ๐‘— ) โ‰ค ( ๐ต โ†‘ ๐‘— ) ) โ†” ( ( ( ๐ด โˆˆ โ„ โˆง ๐ต โˆˆ โ„ ) โˆง ( 0 โ‰ค ๐ด โˆง ๐ด โ‰ค ๐ต ) ) โ†’ ( ๐ด โ†‘ 0 ) โ‰ค ( ๐ต โ†‘ 0 ) ) ) )
5 oveq2 โŠข ( ๐‘— = ๐‘˜ โ†’ ( ๐ด โ†‘ ๐‘— ) = ( ๐ด โ†‘ ๐‘˜ ) )
6 oveq2 โŠข ( ๐‘— = ๐‘˜ โ†’ ( ๐ต โ†‘ ๐‘— ) = ( ๐ต โ†‘ ๐‘˜ ) )
7 5 6 breq12d โŠข ( ๐‘— = ๐‘˜ โ†’ ( ( ๐ด โ†‘ ๐‘— ) โ‰ค ( ๐ต โ†‘ ๐‘— ) โ†” ( ๐ด โ†‘ ๐‘˜ ) โ‰ค ( ๐ต โ†‘ ๐‘˜ ) ) )
8 7 imbi2d โŠข ( ๐‘— = ๐‘˜ โ†’ ( ( ( ( ๐ด โˆˆ โ„ โˆง ๐ต โˆˆ โ„ ) โˆง ( 0 โ‰ค ๐ด โˆง ๐ด โ‰ค ๐ต ) ) โ†’ ( ๐ด โ†‘ ๐‘— ) โ‰ค ( ๐ต โ†‘ ๐‘— ) ) โ†” ( ( ( ๐ด โˆˆ โ„ โˆง ๐ต โˆˆ โ„ ) โˆง ( 0 โ‰ค ๐ด โˆง ๐ด โ‰ค ๐ต ) ) โ†’ ( ๐ด โ†‘ ๐‘˜ ) โ‰ค ( ๐ต โ†‘ ๐‘˜ ) ) ) )
9 oveq2 โŠข ( ๐‘— = ( ๐‘˜ + 1 ) โ†’ ( ๐ด โ†‘ ๐‘— ) = ( ๐ด โ†‘ ( ๐‘˜ + 1 ) ) )
10 oveq2 โŠข ( ๐‘— = ( ๐‘˜ + 1 ) โ†’ ( ๐ต โ†‘ ๐‘— ) = ( ๐ต โ†‘ ( ๐‘˜ + 1 ) ) )
11 9 10 breq12d โŠข ( ๐‘— = ( ๐‘˜ + 1 ) โ†’ ( ( ๐ด โ†‘ ๐‘— ) โ‰ค ( ๐ต โ†‘ ๐‘— ) โ†” ( ๐ด โ†‘ ( ๐‘˜ + 1 ) ) โ‰ค ( ๐ต โ†‘ ( ๐‘˜ + 1 ) ) ) )
12 11 imbi2d โŠข ( ๐‘— = ( ๐‘˜ + 1 ) โ†’ ( ( ( ( ๐ด โˆˆ โ„ โˆง ๐ต โˆˆ โ„ ) โˆง ( 0 โ‰ค ๐ด โˆง ๐ด โ‰ค ๐ต ) ) โ†’ ( ๐ด โ†‘ ๐‘— ) โ‰ค ( ๐ต โ†‘ ๐‘— ) ) โ†” ( ( ( ๐ด โˆˆ โ„ โˆง ๐ต โˆˆ โ„ ) โˆง ( 0 โ‰ค ๐ด โˆง ๐ด โ‰ค ๐ต ) ) โ†’ ( ๐ด โ†‘ ( ๐‘˜ + 1 ) ) โ‰ค ( ๐ต โ†‘ ( ๐‘˜ + 1 ) ) ) ) )
13 oveq2 โŠข ( ๐‘— = ๐‘ โ†’ ( ๐ด โ†‘ ๐‘— ) = ( ๐ด โ†‘ ๐‘ ) )
14 oveq2 โŠข ( ๐‘— = ๐‘ โ†’ ( ๐ต โ†‘ ๐‘— ) = ( ๐ต โ†‘ ๐‘ ) )
15 13 14 breq12d โŠข ( ๐‘— = ๐‘ โ†’ ( ( ๐ด โ†‘ ๐‘— ) โ‰ค ( ๐ต โ†‘ ๐‘— ) โ†” ( ๐ด โ†‘ ๐‘ ) โ‰ค ( ๐ต โ†‘ ๐‘ ) ) )
16 15 imbi2d โŠข ( ๐‘— = ๐‘ โ†’ ( ( ( ( ๐ด โˆˆ โ„ โˆง ๐ต โˆˆ โ„ ) โˆง ( 0 โ‰ค ๐ด โˆง ๐ด โ‰ค ๐ต ) ) โ†’ ( ๐ด โ†‘ ๐‘— ) โ‰ค ( ๐ต โ†‘ ๐‘— ) ) โ†” ( ( ( ๐ด โˆˆ โ„ โˆง ๐ต โˆˆ โ„ ) โˆง ( 0 โ‰ค ๐ด โˆง ๐ด โ‰ค ๐ต ) ) โ†’ ( ๐ด โ†‘ ๐‘ ) โ‰ค ( ๐ต โ†‘ ๐‘ ) ) ) )
17 recn โŠข ( ๐ด โˆˆ โ„ โ†’ ๐ด โˆˆ โ„‚ )
18 recn โŠข ( ๐ต โˆˆ โ„ โ†’ ๐ต โˆˆ โ„‚ )
19 exp0 โŠข ( ๐ด โˆˆ โ„‚ โ†’ ( ๐ด โ†‘ 0 ) = 1 )
20 19 adantr โŠข ( ( ๐ด โˆˆ โ„‚ โˆง ๐ต โˆˆ โ„‚ ) โ†’ ( ๐ด โ†‘ 0 ) = 1 )
21 1le1 โŠข 1 โ‰ค 1
22 20 21 eqbrtrdi โŠข ( ( ๐ด โˆˆ โ„‚ โˆง ๐ต โˆˆ โ„‚ ) โ†’ ( ๐ด โ†‘ 0 ) โ‰ค 1 )
23 exp0 โŠข ( ๐ต โˆˆ โ„‚ โ†’ ( ๐ต โ†‘ 0 ) = 1 )
24 23 adantl โŠข ( ( ๐ด โˆˆ โ„‚ โˆง ๐ต โˆˆ โ„‚ ) โ†’ ( ๐ต โ†‘ 0 ) = 1 )
25 22 24 breqtrrd โŠข ( ( ๐ด โˆˆ โ„‚ โˆง ๐ต โˆˆ โ„‚ ) โ†’ ( ๐ด โ†‘ 0 ) โ‰ค ( ๐ต โ†‘ 0 ) )
26 17 18 25 syl2an โŠข ( ( ๐ด โˆˆ โ„ โˆง ๐ต โˆˆ โ„ ) โ†’ ( ๐ด โ†‘ 0 ) โ‰ค ( ๐ต โ†‘ 0 ) )
27 26 adantr โŠข ( ( ( ๐ด โˆˆ โ„ โˆง ๐ต โˆˆ โ„ ) โˆง ( 0 โ‰ค ๐ด โˆง ๐ด โ‰ค ๐ต ) ) โ†’ ( ๐ด โ†‘ 0 ) โ‰ค ( ๐ต โ†‘ 0 ) )
28 reexpcl โŠข ( ( ๐ด โˆˆ โ„ โˆง ๐‘˜ โˆˆ โ„•0 ) โ†’ ( ๐ด โ†‘ ๐‘˜ ) โˆˆ โ„ )
29 28 ad4ant14 โŠข ( ( ( ( ๐ด โˆˆ โ„ โˆง ๐ต โˆˆ โ„ ) โˆง ( 0 โ‰ค ๐ด โˆง ๐ด โ‰ค ๐ต ) ) โˆง ๐‘˜ โˆˆ โ„•0 ) โ†’ ( ๐ด โ†‘ ๐‘˜ ) โˆˆ โ„ )
30 simplll โŠข ( ( ( ( ๐ด โˆˆ โ„ โˆง ๐ต โˆˆ โ„ ) โˆง ( 0 โ‰ค ๐ด โˆง ๐ด โ‰ค ๐ต ) ) โˆง ๐‘˜ โˆˆ โ„•0 ) โ†’ ๐ด โˆˆ โ„ )
31 simpr โŠข ( ( ( ( ๐ด โˆˆ โ„ โˆง ๐ต โˆˆ โ„ ) โˆง ( 0 โ‰ค ๐ด โˆง ๐ด โ‰ค ๐ต ) ) โˆง ๐‘˜ โˆˆ โ„•0 ) โ†’ ๐‘˜ โˆˆ โ„•0 )
32 simplrl โŠข ( ( ( ( ๐ด โˆˆ โ„ โˆง ๐ต โˆˆ โ„ ) โˆง ( 0 โ‰ค ๐ด โˆง ๐ด โ‰ค ๐ต ) ) โˆง ๐‘˜ โˆˆ โ„•0 ) โ†’ 0 โ‰ค ๐ด )
33 expge0 โŠข ( ( ๐ด โˆˆ โ„ โˆง ๐‘˜ โˆˆ โ„•0 โˆง 0 โ‰ค ๐ด ) โ†’ 0 โ‰ค ( ๐ด โ†‘ ๐‘˜ ) )
34 30 31 32 33 syl3anc โŠข ( ( ( ( ๐ด โˆˆ โ„ โˆง ๐ต โˆˆ โ„ ) โˆง ( 0 โ‰ค ๐ด โˆง ๐ด โ‰ค ๐ต ) ) โˆง ๐‘˜ โˆˆ โ„•0 ) โ†’ 0 โ‰ค ( ๐ด โ†‘ ๐‘˜ ) )
35 reexpcl โŠข ( ( ๐ต โˆˆ โ„ โˆง ๐‘˜ โˆˆ โ„•0 ) โ†’ ( ๐ต โ†‘ ๐‘˜ ) โˆˆ โ„ )
36 35 ad4ant24 โŠข ( ( ( ( ๐ด โˆˆ โ„ โˆง ๐ต โˆˆ โ„ ) โˆง ( 0 โ‰ค ๐ด โˆง ๐ด โ‰ค ๐ต ) ) โˆง ๐‘˜ โˆˆ โ„•0 ) โ†’ ( ๐ต โ†‘ ๐‘˜ ) โˆˆ โ„ )
37 29 34 36 jca31 โŠข ( ( ( ( ๐ด โˆˆ โ„ โˆง ๐ต โˆˆ โ„ ) โˆง ( 0 โ‰ค ๐ด โˆง ๐ด โ‰ค ๐ต ) ) โˆง ๐‘˜ โˆˆ โ„•0 ) โ†’ ( ( ( ๐ด โ†‘ ๐‘˜ ) โˆˆ โ„ โˆง 0 โ‰ค ( ๐ด โ†‘ ๐‘˜ ) ) โˆง ( ๐ต โ†‘ ๐‘˜ ) โˆˆ โ„ ) )
38 simpl โŠข ( ( ๐ด โˆˆ โ„ โˆง ๐ต โˆˆ โ„ ) โ†’ ๐ด โˆˆ โ„ )
39 simpl โŠข ( ( 0 โ‰ค ๐ด โˆง ๐ด โ‰ค ๐ต ) โ†’ 0 โ‰ค ๐ด )
40 38 39 anim12i โŠข ( ( ( ๐ด โˆˆ โ„ โˆง ๐ต โˆˆ โ„ ) โˆง ( 0 โ‰ค ๐ด โˆง ๐ด โ‰ค ๐ต ) ) โ†’ ( ๐ด โˆˆ โ„ โˆง 0 โ‰ค ๐ด ) )
41 40 adantr โŠข ( ( ( ( ๐ด โˆˆ โ„ โˆง ๐ต โˆˆ โ„ ) โˆง ( 0 โ‰ค ๐ด โˆง ๐ด โ‰ค ๐ต ) ) โˆง ๐‘˜ โˆˆ โ„•0 ) โ†’ ( ๐ด โˆˆ โ„ โˆง 0 โ‰ค ๐ด ) )
42 simpllr โŠข ( ( ( ( ๐ด โˆˆ โ„ โˆง ๐ต โˆˆ โ„ ) โˆง ( 0 โ‰ค ๐ด โˆง ๐ด โ‰ค ๐ต ) ) โˆง ๐‘˜ โˆˆ โ„•0 ) โ†’ ๐ต โˆˆ โ„ )
43 37 41 42 jca32 โŠข ( ( ( ( ๐ด โˆˆ โ„ โˆง ๐ต โˆˆ โ„ ) โˆง ( 0 โ‰ค ๐ด โˆง ๐ด โ‰ค ๐ต ) ) โˆง ๐‘˜ โˆˆ โ„•0 ) โ†’ ( ( ( ( ๐ด โ†‘ ๐‘˜ ) โˆˆ โ„ โˆง 0 โ‰ค ( ๐ด โ†‘ ๐‘˜ ) ) โˆง ( ๐ต โ†‘ ๐‘˜ ) โˆˆ โ„ ) โˆง ( ( ๐ด โˆˆ โ„ โˆง 0 โ‰ค ๐ด ) โˆง ๐ต โˆˆ โ„ ) ) )
44 43 adantr โŠข ( ( ( ( ( ๐ด โˆˆ โ„ โˆง ๐ต โˆˆ โ„ ) โˆง ( 0 โ‰ค ๐ด โˆง ๐ด โ‰ค ๐ต ) ) โˆง ๐‘˜ โˆˆ โ„•0 ) โˆง ( ๐ด โ†‘ ๐‘˜ ) โ‰ค ( ๐ต โ†‘ ๐‘˜ ) ) โ†’ ( ( ( ( ๐ด โ†‘ ๐‘˜ ) โˆˆ โ„ โˆง 0 โ‰ค ( ๐ด โ†‘ ๐‘˜ ) ) โˆง ( ๐ต โ†‘ ๐‘˜ ) โˆˆ โ„ ) โˆง ( ( ๐ด โˆˆ โ„ โˆง 0 โ‰ค ๐ด ) โˆง ๐ต โˆˆ โ„ ) ) )
45 simplrr โŠข ( ( ( ( ๐ด โˆˆ โ„ โˆง ๐ต โˆˆ โ„ ) โˆง ( 0 โ‰ค ๐ด โˆง ๐ด โ‰ค ๐ต ) ) โˆง ๐‘˜ โˆˆ โ„•0 ) โ†’ ๐ด โ‰ค ๐ต )
46 45 anim1ci โŠข ( ( ( ( ( ๐ด โˆˆ โ„ โˆง ๐ต โˆˆ โ„ ) โˆง ( 0 โ‰ค ๐ด โˆง ๐ด โ‰ค ๐ต ) ) โˆง ๐‘˜ โˆˆ โ„•0 ) โˆง ( ๐ด โ†‘ ๐‘˜ ) โ‰ค ( ๐ต โ†‘ ๐‘˜ ) ) โ†’ ( ( ๐ด โ†‘ ๐‘˜ ) โ‰ค ( ๐ต โ†‘ ๐‘˜ ) โˆง ๐ด โ‰ค ๐ต ) )
47 lemul12a โŠข ( ( ( ( ( ๐ด โ†‘ ๐‘˜ ) โˆˆ โ„ โˆง 0 โ‰ค ( ๐ด โ†‘ ๐‘˜ ) ) โˆง ( ๐ต โ†‘ ๐‘˜ ) โˆˆ โ„ ) โˆง ( ( ๐ด โˆˆ โ„ โˆง 0 โ‰ค ๐ด ) โˆง ๐ต โˆˆ โ„ ) ) โ†’ ( ( ( ๐ด โ†‘ ๐‘˜ ) โ‰ค ( ๐ต โ†‘ ๐‘˜ ) โˆง ๐ด โ‰ค ๐ต ) โ†’ ( ( ๐ด โ†‘ ๐‘˜ ) ยท ๐ด ) โ‰ค ( ( ๐ต โ†‘ ๐‘˜ ) ยท ๐ต ) ) )
48 44 46 47 sylc โŠข ( ( ( ( ( ๐ด โˆˆ โ„ โˆง ๐ต โˆˆ โ„ ) โˆง ( 0 โ‰ค ๐ด โˆง ๐ด โ‰ค ๐ต ) ) โˆง ๐‘˜ โˆˆ โ„•0 ) โˆง ( ๐ด โ†‘ ๐‘˜ ) โ‰ค ( ๐ต โ†‘ ๐‘˜ ) ) โ†’ ( ( ๐ด โ†‘ ๐‘˜ ) ยท ๐ด ) โ‰ค ( ( ๐ต โ†‘ ๐‘˜ ) ยท ๐ต ) )
49 expp1 โŠข ( ( ๐ด โˆˆ โ„‚ โˆง ๐‘˜ โˆˆ โ„•0 ) โ†’ ( ๐ด โ†‘ ( ๐‘˜ + 1 ) ) = ( ( ๐ด โ†‘ ๐‘˜ ) ยท ๐ด ) )
50 17 49 sylan โŠข ( ( ๐ด โˆˆ โ„ โˆง ๐‘˜ โˆˆ โ„•0 ) โ†’ ( ๐ด โ†‘ ( ๐‘˜ + 1 ) ) = ( ( ๐ด โ†‘ ๐‘˜ ) ยท ๐ด ) )
51 50 ad5ant14 โŠข ( ( ( ( ( ๐ด โˆˆ โ„ โˆง ๐ต โˆˆ โ„ ) โˆง ( 0 โ‰ค ๐ด โˆง ๐ด โ‰ค ๐ต ) ) โˆง ๐‘˜ โˆˆ โ„•0 ) โˆง ( ๐ด โ†‘ ๐‘˜ ) โ‰ค ( ๐ต โ†‘ ๐‘˜ ) ) โ†’ ( ๐ด โ†‘ ( ๐‘˜ + 1 ) ) = ( ( ๐ด โ†‘ ๐‘˜ ) ยท ๐ด ) )
52 expp1 โŠข ( ( ๐ต โˆˆ โ„‚ โˆง ๐‘˜ โˆˆ โ„•0 ) โ†’ ( ๐ต โ†‘ ( ๐‘˜ + 1 ) ) = ( ( ๐ต โ†‘ ๐‘˜ ) ยท ๐ต ) )
53 18 52 sylan โŠข ( ( ๐ต โˆˆ โ„ โˆง ๐‘˜ โˆˆ โ„•0 ) โ†’ ( ๐ต โ†‘ ( ๐‘˜ + 1 ) ) = ( ( ๐ต โ†‘ ๐‘˜ ) ยท ๐ต ) )
54 53 ad5ant24 โŠข ( ( ( ( ( ๐ด โˆˆ โ„ โˆง ๐ต โˆˆ โ„ ) โˆง ( 0 โ‰ค ๐ด โˆง ๐ด โ‰ค ๐ต ) ) โˆง ๐‘˜ โˆˆ โ„•0 ) โˆง ( ๐ด โ†‘ ๐‘˜ ) โ‰ค ( ๐ต โ†‘ ๐‘˜ ) ) โ†’ ( ๐ต โ†‘ ( ๐‘˜ + 1 ) ) = ( ( ๐ต โ†‘ ๐‘˜ ) ยท ๐ต ) )
55 48 51 54 3brtr4d โŠข ( ( ( ( ( ๐ด โˆˆ โ„ โˆง ๐ต โˆˆ โ„ ) โˆง ( 0 โ‰ค ๐ด โˆง ๐ด โ‰ค ๐ต ) ) โˆง ๐‘˜ โˆˆ โ„•0 ) โˆง ( ๐ด โ†‘ ๐‘˜ ) โ‰ค ( ๐ต โ†‘ ๐‘˜ ) ) โ†’ ( ๐ด โ†‘ ( ๐‘˜ + 1 ) ) โ‰ค ( ๐ต โ†‘ ( ๐‘˜ + 1 ) ) )
56 55 ex โŠข ( ( ( ( ๐ด โˆˆ โ„ โˆง ๐ต โˆˆ โ„ ) โˆง ( 0 โ‰ค ๐ด โˆง ๐ด โ‰ค ๐ต ) ) โˆง ๐‘˜ โˆˆ โ„•0 ) โ†’ ( ( ๐ด โ†‘ ๐‘˜ ) โ‰ค ( ๐ต โ†‘ ๐‘˜ ) โ†’ ( ๐ด โ†‘ ( ๐‘˜ + 1 ) ) โ‰ค ( ๐ต โ†‘ ( ๐‘˜ + 1 ) ) ) )
57 56 expcom โŠข ( ๐‘˜ โˆˆ โ„•0 โ†’ ( ( ( ๐ด โˆˆ โ„ โˆง ๐ต โˆˆ โ„ ) โˆง ( 0 โ‰ค ๐ด โˆง ๐ด โ‰ค ๐ต ) ) โ†’ ( ( ๐ด โ†‘ ๐‘˜ ) โ‰ค ( ๐ต โ†‘ ๐‘˜ ) โ†’ ( ๐ด โ†‘ ( ๐‘˜ + 1 ) ) โ‰ค ( ๐ต โ†‘ ( ๐‘˜ + 1 ) ) ) ) )
58 57 a2d โŠข ( ๐‘˜ โˆˆ โ„•0 โ†’ ( ( ( ( ๐ด โˆˆ โ„ โˆง ๐ต โˆˆ โ„ ) โˆง ( 0 โ‰ค ๐ด โˆง ๐ด โ‰ค ๐ต ) ) โ†’ ( ๐ด โ†‘ ๐‘˜ ) โ‰ค ( ๐ต โ†‘ ๐‘˜ ) ) โ†’ ( ( ( ๐ด โˆˆ โ„ โˆง ๐ต โˆˆ โ„ ) โˆง ( 0 โ‰ค ๐ด โˆง ๐ด โ‰ค ๐ต ) ) โ†’ ( ๐ด โ†‘ ( ๐‘˜ + 1 ) ) โ‰ค ( ๐ต โ†‘ ( ๐‘˜ + 1 ) ) ) ) )
59 4 8 12 16 27 58 nn0ind โŠข ( ๐‘ โˆˆ โ„•0 โ†’ ( ( ( ๐ด โˆˆ โ„ โˆง ๐ต โˆˆ โ„ ) โˆง ( 0 โ‰ค ๐ด โˆง ๐ด โ‰ค ๐ต ) ) โ†’ ( ๐ด โ†‘ ๐‘ ) โ‰ค ( ๐ต โ†‘ ๐‘ ) ) )
60 59 exp4c โŠข ( ๐‘ โˆˆ โ„•0 โ†’ ( ๐ด โˆˆ โ„ โ†’ ( ๐ต โˆˆ โ„ โ†’ ( ( 0 โ‰ค ๐ด โˆง ๐ด โ‰ค ๐ต ) โ†’ ( ๐ด โ†‘ ๐‘ ) โ‰ค ( ๐ต โ†‘ ๐‘ ) ) ) ) )
61 60 com3l โŠข ( ๐ด โˆˆ โ„ โ†’ ( ๐ต โˆˆ โ„ โ†’ ( ๐‘ โˆˆ โ„•0 โ†’ ( ( 0 โ‰ค ๐ด โˆง ๐ด โ‰ค ๐ต ) โ†’ ( ๐ด โ†‘ ๐‘ ) โ‰ค ( ๐ต โ†‘ ๐‘ ) ) ) ) )
62 61 3imp1 โŠข ( ( ( ๐ด โˆˆ โ„ โˆง ๐ต โˆˆ โ„ โˆง ๐‘ โˆˆ โ„•0 ) โˆง ( 0 โ‰ค ๐ด โˆง ๐ด โ‰ค ๐ต ) ) โ†’ ( ๐ด โ†‘ ๐‘ ) โ‰ค ( ๐ต โ†‘ ๐‘ ) )