Metamath Proof Explorer


Theorem nosupbnd1lem4

Description: Lemma for nosupbnd1 . If U is a prolongment of S and in A , then ( Udom S ) is not undefined. (Contributed by Scott Fenton, 6-Dec-2021)

Ref Expression
Hypothesis nosupbnd1.1 S=ifxAyA¬x<syιxA|yA¬x<sydomιxA|yA¬x<sy2𝑜gy|uAydomuvA¬v<suusucy=vsucyιx|uAgdomuvA¬v<suusucg=vsucgug=x
Assertion nosupbnd1lem4 ¬xAyA¬x<syANoAVUAUdomS=SUdomS

Proof

Step Hyp Ref Expression
1 nosupbnd1.1 S=ifxAyA¬x<syιxA|yA¬x<sydomιxA|yA¬x<sy2𝑜gy|uAydomuvA¬v<suusucy=vsucyιx|uAgdomuvA¬v<suusucg=vsucgug=x
2 simpl1 ¬xAyA¬x<syANoAVUAUdomS=SwAU<sw¬xAyA¬x<sy
3 simpl2 ¬xAyA¬x<syANoAVUAUdomS=SwAU<swANoAV
4 simprl ¬xAyA¬x<syANoAVUAUdomS=SwAU<swwA
5 simpl3 ¬xAyA¬x<syANoAVUAUdomS=SwAU<swUAUdomS=S
6 simprr ¬xAyA¬x<syANoAVUAUdomS=SwAU<swU<sw
7 simp2l ¬xAyA¬x<syANoAVUAUdomS=SANo
8 simp3l ¬xAyA¬x<syANoAVUAUdomS=SUA
9 7 8 sseldd ¬xAyA¬x<syANoAVUAUdomS=SUNo
10 simpl2l ¬xAyA¬x<syANoAVUAUdomS=SwAU<swANo
11 10 4 sseldd ¬xAyA¬x<syANoAVUAUdomS=SwAU<swwNo
12 sltso <sOrNo
13 soasym <sOrNoUNowNoU<sw¬w<sU
14 12 13 mpan UNowNoU<sw¬w<sU
15 9 11 14 syl2an2r ¬xAyA¬x<syANoAVUAUdomS=SwAU<swU<sw¬w<sU
16 6 15 mpd ¬xAyA¬x<syANoAVUAUdomS=SwAU<sw¬w<sU
17 4 16 jca ¬xAyA¬x<syANoAVUAUdomS=SwAU<swwA¬w<sU
18 1 nosupbnd1lem2 ¬xAyA¬x<syANoAVUAUdomS=SwA¬w<sUwdomS=S
19 2 3 5 17 18 syl112anc ¬xAyA¬x<syANoAVUAUdomS=SwAU<swwdomS=S
20 1 nosupbnd1lem3 ¬xAyA¬x<syANoAVwAwdomS=SwdomS2𝑜
21 2 3 4 19 20 syl112anc ¬xAyA¬x<syANoAVUAUdomS=SwAU<swwdomS2𝑜
22 21 neneqd ¬xAyA¬x<syANoAVUAUdomS=SwAU<sw¬wdomS=2𝑜
23 22 expr ¬xAyA¬x<syANoAVUAUdomS=SwAU<sw¬wdomS=2𝑜
24 imnan U<sw¬wdomS=2𝑜¬U<swwdomS=2𝑜
25 23 24 sylib ¬xAyA¬x<syANoAVUAUdomS=SwA¬U<swwdomS=2𝑜
26 25 nrexdv ¬xAyA¬x<syANoAVUAUdomS=S¬wAU<swwdomS=2𝑜
27 simpl3l ¬xAyA¬x<syANoAVUAUdomS=SUdomS=UA
28 simpl1 ¬xAyA¬x<syANoAVUAUdomS=SUdomS=¬xAyA¬x<sy
29 breq2 w=yu<swu<sy
30 29 cbvrexvw wAu<swyAu<sy
31 breq1 u=xu<syx<sy
32 31 rexbidv u=xyAu<syyAx<sy
33 30 32 bitrid u=xwAu<swyAx<sy
34 33 cbvralvw uAwAu<swxAyAx<sy
35 dfrex2 yAx<sy¬yA¬x<sy
36 35 ralbii xAyAx<syxA¬yA¬x<sy
37 ralnex xA¬yA¬x<sy¬xAyA¬x<sy
38 34 36 37 3bitri uAwAu<sw¬xAyA¬x<sy
39 28 38 sylibr ¬xAyA¬x<syANoAVUAUdomS=SUdomS=uAwAu<sw
40 breq1 u=Uu<swU<sw
41 40 rexbidv u=UwAu<swwAU<sw
42 41 rspcv UAuAwAu<swwAU<sw
43 27 39 42 sylc ¬xAyA¬x<syANoAVUAUdomS=SUdomS=wAU<sw
44 simpl2l ¬xAyA¬x<syANoAVUAUdomS=SUdomS=ANo
45 44 27 sseldd ¬xAyA¬x<syANoAVUAUdomS=SUdomS=UNo
46 45 adantr ¬xAyA¬x<syANoAVUAUdomS=SUdomS=wAU<swUNo
47 44 adantr ¬xAyA¬x<syANoAVUAUdomS=SUdomS=wAU<swANo
48 simprl ¬xAyA¬x<syANoAVUAUdomS=SUdomS=wAU<swwA
49 47 48 sseldd ¬xAyA¬x<syANoAVUAUdomS=SUdomS=wAU<swwNo
50 1 nosupno ANoAVSNo
51 50 3ad2ant2 ¬xAyA¬x<syANoAVUAUdomS=SSNo
52 51 adantr ¬xAyA¬x<syANoAVUAUdomS=SUdomS=SNo
53 52 adantr ¬xAyA¬x<syANoAVUAUdomS=SUdomS=wAU<swSNo
54 nodmon SNodomSOn
55 53 54 syl ¬xAyA¬x<syANoAVUAUdomS=SUdomS=wAU<swdomSOn
56 simpl3r ¬xAyA¬x<syANoAVUAUdomS=SUdomS=UdomS=S
57 56 adantr ¬xAyA¬x<syANoAVUAUdomS=SUdomS=wAU<swUdomS=S
58 simpll1 ¬xAyA¬x<syANoAVUAUdomS=SUdomS=wAU<sw¬xAyA¬x<sy
59 simpll2 ¬xAyA¬x<syANoAVUAUdomS=SUdomS=wAU<swANoAV
60 simpll3 ¬xAyA¬x<syANoAVUAUdomS=SUdomS=wAU<swUAUdomS=S
61 simprr ¬xAyA¬x<syANoAVUAUdomS=SUdomS=wAU<swU<sw
62 45 49 14 syl2an2r ¬xAyA¬x<syANoAVUAUdomS=SUdomS=wAU<swU<sw¬w<sU
63 61 62 mpd ¬xAyA¬x<syANoAVUAUdomS=SUdomS=wAU<sw¬w<sU
64 48 63 jca ¬xAyA¬x<syANoAVUAUdomS=SUdomS=wAU<swwA¬w<sU
65 58 59 60 64 18 syl112anc ¬xAyA¬x<syANoAVUAUdomS=SUdomS=wAU<swwdomS=S
66 57 65 eqtr4d ¬xAyA¬x<syANoAVUAUdomS=SUdomS=wAU<swUdomS=wdomS
67 simplr ¬xAyA¬x<syANoAVUAUdomS=SUdomS=wAU<swUdomS=
68 nolt02o UNowNodomSOnUdomS=wdomSU<swUdomS=wdomS=2𝑜
69 46 49 55 66 61 67 68 syl321anc ¬xAyA¬x<syANoAVUAUdomS=SUdomS=wAU<swwdomS=2𝑜
70 69 expr ¬xAyA¬x<syANoAVUAUdomS=SUdomS=wAU<swwdomS=2𝑜
71 70 ancld ¬xAyA¬x<syANoAVUAUdomS=SUdomS=wAU<swU<swwdomS=2𝑜
72 71 reximdva ¬xAyA¬x<syANoAVUAUdomS=SUdomS=wAU<swwAU<swwdomS=2𝑜
73 43 72 mpd ¬xAyA¬x<syANoAVUAUdomS=SUdomS=wAU<swwdomS=2𝑜
74 26 73 mtand ¬xAyA¬x<syANoAVUAUdomS=S¬UdomS=
75 74 neqned ¬xAyA¬x<syANoAVUAUdomS=SUdomS