Metamath Proof Explorer


Theorem noinfbnd1lem3

Description: Lemma for noinfbnd1 . If U is a prolongment of T and in B , then ( Udom T ) is not 1o . (Contributed by Scott Fenton, 9-Aug-2024)

Ref Expression
Hypothesis noinfbnd1.1 T=ifxByB¬y<sxιxB|yB¬y<sxdomιxB|yB¬y<sx1𝑜gy|uBydomuvB¬u<svusucy=vsucyιx|uBgdomuvB¬u<svusucg=vsucgug=x
Assertion noinfbnd1lem3 ¬xByB¬y<sxBNoBVUBUdomT=TUdomT1𝑜

Proof

Step Hyp Ref Expression
1 noinfbnd1.1 T=ifxByB¬y<sxιxB|yB¬y<sxdomιxB|yB¬y<sx1𝑜gy|uBydomuvB¬u<svusucy=vsucyιx|uBgdomuvB¬u<svusucg=vsucgug=x
2 1 noinfno BNoBVTNo
3 2 3ad2ant2 ¬xByB¬y<sxBNoBVUBUdomT=TTNo
4 nodmord TNoOrddomT
5 ordirr OrddomT¬domTdomT
6 3 4 5 3syl ¬xByB¬y<sxBNoBVUBUdomT=T¬domTdomT
7 simpl3l ¬xByB¬y<sxBNoBVUBUdomT=TUdomT=1𝑜UB
8 ndmfv ¬domTdomUUdomT=
9 1n0 1𝑜
10 9 necomi 1𝑜
11 neeq1 UdomT=UdomT1𝑜1𝑜
12 10 11 mpbiri UdomT=UdomT1𝑜
13 12 neneqd UdomT=¬UdomT=1𝑜
14 8 13 syl ¬domTdomU¬UdomT=1𝑜
15 14 con4i UdomT=1𝑜domTdomU
16 15 adantl ¬xByB¬y<sxBNoBVUBUdomT=TUdomT=1𝑜domTdomU
17 simpl2l ¬xByB¬y<sxBNoBVUBUdomT=TUdomT=1𝑜BNo
18 17 7 sseldd ¬xByB¬y<sxBNoBVUBUdomT=TUdomT=1𝑜UNo
19 18 adantr ¬xByB¬y<sxBNoBVUBUdomT=TUdomT=1𝑜qB¬U<sqUNo
20 17 adantr ¬xByB¬y<sxBNoBVUBUdomT=TUdomT=1𝑜qB¬U<sqBNo
21 simprl ¬xByB¬y<sxBNoBVUBUdomT=TUdomT=1𝑜qB¬U<sqqB
22 20 21 sseldd ¬xByB¬y<sxBNoBVUBUdomT=TUdomT=1𝑜qB¬U<sqqNo
23 3 adantr ¬xByB¬y<sxBNoBVUBUdomT=TUdomT=1𝑜TNo
24 nodmon TNodomTOn
25 23 24 syl ¬xByB¬y<sxBNoBVUBUdomT=TUdomT=1𝑜domTOn
26 25 adantr ¬xByB¬y<sxBNoBVUBUdomT=TUdomT=1𝑜qB¬U<sqdomTOn
27 simpl3r ¬xByB¬y<sxBNoBVUBUdomT=TUdomT=1𝑜UdomT=T
28 27 adantr ¬xByB¬y<sxBNoBVUBUdomT=TUdomT=1𝑜qB¬U<sqUdomT=T
29 simpll1 ¬xByB¬y<sxBNoBVUBUdomT=TUdomT=1𝑜qB¬U<sq¬xByB¬y<sx
30 simpll2 ¬xByB¬y<sxBNoBVUBUdomT=TUdomT=1𝑜qB¬U<sqBNoBV
31 simpll3 ¬xByB¬y<sxBNoBVUBUdomT=TUdomT=1𝑜qB¬U<sqUBUdomT=T
32 simpr ¬xByB¬y<sxBNoBVUBUdomT=TUdomT=1𝑜qB¬U<sqqB¬U<sq
33 1 noinfbnd1lem2 ¬xByB¬y<sxBNoBVUBUdomT=TqB¬U<sqqdomT=T
34 29 30 31 32 33 syl112anc ¬xByB¬y<sxBNoBVUBUdomT=TUdomT=1𝑜qB¬U<sqqdomT=T
35 28 34 eqtr4d ¬xByB¬y<sxBNoBVUBUdomT=TUdomT=1𝑜qB¬U<sqUdomT=qdomT
36 simplr ¬xByB¬y<sxBNoBVUBUdomT=TUdomT=1𝑜qB¬U<sqUdomT=1𝑜
37 simprr ¬xByB¬y<sxBNoBVUBUdomT=TUdomT=1𝑜qB¬U<sq¬U<sq
38 nogesgn1ores UNoqNodomTOnUdomT=qdomTUdomT=1𝑜¬U<sqUsucdomT=qsucdomT
39 19 22 26 35 36 37 38 syl321anc ¬xByB¬y<sxBNoBVUBUdomT=TUdomT=1𝑜qB¬U<sqUsucdomT=qsucdomT
40 39 expr ¬xByB¬y<sxBNoBVUBUdomT=TUdomT=1𝑜qB¬U<sqUsucdomT=qsucdomT
41 40 ralrimiva ¬xByB¬y<sxBNoBVUBUdomT=TUdomT=1𝑜qB¬U<sqUsucdomT=qsucdomT
42 dmeq p=Udomp=domU
43 42 eleq2d p=UdomTdompdomTdomU
44 breq1 p=Up<sqU<sq
45 44 notbid p=U¬p<sq¬U<sq
46 reseq1 p=UpsucdomT=UsucdomT
47 46 eqeq1d p=UpsucdomT=qsucdomTUsucdomT=qsucdomT
48 45 47 imbi12d p=U¬p<sqpsucdomT=qsucdomT¬U<sqUsucdomT=qsucdomT
49 48 ralbidv p=UqB¬p<sqpsucdomT=qsucdomTqB¬U<sqUsucdomT=qsucdomT
50 43 49 anbi12d p=UdomTdompqB¬p<sqpsucdomT=qsucdomTdomTdomUqB¬U<sqUsucdomT=qsucdomT
51 50 rspcev UBdomTdomUqB¬U<sqUsucdomT=qsucdomTpBdomTdompqB¬p<sqpsucdomT=qsucdomT
52 7 16 41 51 syl12anc ¬xByB¬y<sxBNoBVUBUdomT=TUdomT=1𝑜pBdomTdompqB¬p<sqpsucdomT=qsucdomT
53 1 noinfdm ¬xByB¬y<sxdomT=z|pBzdompqB¬p<sqpsucz=qsucz
54 53 eleq2d ¬xByB¬y<sxdomTdomTdomTz|pBzdompqB¬p<sqpsucz=qsucz
55 54 3ad2ant1 ¬xByB¬y<sxBNoBVUBUdomT=TdomTdomTdomTz|pBzdompqB¬p<sqpsucz=qsucz
56 eleq1 z=domTzdompdomTdomp
57 suceq z=domTsucz=sucdomT
58 57 reseq2d z=domTpsucz=psucdomT
59 57 reseq2d z=domTqsucz=qsucdomT
60 58 59 eqeq12d z=domTpsucz=qsuczpsucdomT=qsucdomT
61 60 imbi2d z=domT¬p<sqpsucz=qsucz¬p<sqpsucdomT=qsucdomT
62 61 ralbidv z=domTqB¬p<sqpsucz=qsuczqB¬p<sqpsucdomT=qsucdomT
63 56 62 anbi12d z=domTzdompqB¬p<sqpsucz=qsuczdomTdompqB¬p<sqpsucdomT=qsucdomT
64 63 rexbidv z=domTpBzdompqB¬p<sqpsucz=qsuczpBdomTdompqB¬p<sqpsucdomT=qsucdomT
65 64 elabg domTOndomTz|pBzdompqB¬p<sqpsucz=qsuczpBdomTdompqB¬p<sqpsucdomT=qsucdomT
66 3 24 65 3syl ¬xByB¬y<sxBNoBVUBUdomT=TdomTz|pBzdompqB¬p<sqpsucz=qsuczpBdomTdompqB¬p<sqpsucdomT=qsucdomT
67 55 66 bitrd ¬xByB¬y<sxBNoBVUBUdomT=TdomTdomTpBdomTdompqB¬p<sqpsucdomT=qsucdomT
68 67 adantr ¬xByB¬y<sxBNoBVUBUdomT=TUdomT=1𝑜domTdomTpBdomTdompqB¬p<sqpsucdomT=qsucdomT
69 52 68 mpbird ¬xByB¬y<sxBNoBVUBUdomT=TUdomT=1𝑜domTdomT
70 6 69 mtand ¬xByB¬y<sxBNoBVUBUdomT=T¬UdomT=1𝑜
71 70 neqned ¬xByB¬y<sxBNoBVUBUdomT=TUdomT1𝑜