Metamath Proof Explorer


Theorem isinfOLD

Description: Obsolete version of isinf as of 2-Jan-2025. (Contributed by Mario Carneiro, 15-Jan-2013) (Proof modification is discouraged.) (New usage is discouraged.)

Ref Expression
Assertion isinfOLD ¬AFinnωxxAxn

Proof

Step Hyp Ref Expression
1 breq2 n=xnx
2 1 anbi2d n=xAxnxAx
3 2 exbidv n=xxAxnxxAx
4 breq2 n=mxnxm
5 4 anbi2d n=mxAxnxAxm
6 5 exbidv n=mxxAxnxxAxm
7 sseq1 x=yxAyA
8 7 adantl n=sucmx=yxAyA
9 breq1 x=yxnyn
10 breq2 n=sucmynysucm
11 9 10 sylan9bbr n=sucmx=yxnysucm
12 8 11 anbi12d n=sucmx=yxAxnyAysucm
13 12 cbvexdvaw n=sucmxxAxnyyAysucm
14 0ss A
15 0ex V
16 15 enref
17 sseq1 x=xAA
18 breq1 x=x
19 17 18 anbi12d x=xAxA
20 15 19 spcev AxxAx
21 14 16 20 mp2an xxAx
22 21 a1i ¬AFinxxAx
23 ssdif0 AxAx=
24 eqss x=AxAAx
25 breq1 x=AxmAm
26 25 biimpa x=AxmAm
27 rspe mωAmmωAm
28 26 27 sylan2 mωx=AxmmωAm
29 isfi AFinmωAm
30 28 29 sylibr mωx=AxmAFin
31 30 expcom x=AxmmωAFin
32 24 31 sylanbr xAAxxmmωAFin
33 32 ex xAAxxmmωAFin
34 23 33 sylan2br xAAx=xmmωAFin
35 34 expcom Ax=xAxmmωAFin
36 35 3impd Ax=xAxmmωAFin
37 36 com12 xAxmmωAx=AFin
38 37 con3d xAxmmω¬AFin¬Ax=
39 bren xmff:x1-1 ontom
40 neq0 ¬Ax=zzAx
41 eldifi zAxzA
42 41 snssd zAxzA
43 unss xAzAxzA
44 43 biimpi xAzAxzA
45 42 44 sylan2 xAzAxxzA
46 45 ad2ant2r xAf:x1-1 ontomzAxmωxzA
47 vex zV
48 vex mV
49 47 48 f1osn zm:z1-1 ontom
50 49 jctr f:x1-1 ontomf:x1-1 ontomzm:z1-1 ontom
51 eldifn zAx¬zx
52 disjsn xz=¬zx
53 51 52 sylibr zAxxz=
54 nnord mωOrdm
55 orddisj Ordmmm=
56 54 55 syl mωmm=
57 53 56 anim12i zAxmωxz=mm=
58 f1oun f:x1-1 ontomzm:z1-1 ontomxz=mm=fzm:xz1-1 ontomm
59 50 57 58 syl2an f:x1-1 ontomzAxmωfzm:xz1-1 ontomm
60 df-suc sucm=mm
61 f1oeq3 sucm=mmfzm:xz1-1 ontosucmfzm:xz1-1 ontomm
62 60 61 ax-mp fzm:xz1-1 ontosucmfzm:xz1-1 ontomm
63 vex fV
64 snex zmV
65 63 64 unex fzmV
66 f1oeq1 g=fzmg:xz1-1 ontosucmfzm:xz1-1 ontosucm
67 65 66 spcev fzm:xz1-1 ontosucmgg:xz1-1 ontosucm
68 bren xzsucmgg:xz1-1 ontosucm
69 67 68 sylibr fzm:xz1-1 ontosucmxzsucm
70 62 69 sylbir fzm:xz1-1 ontommxzsucm
71 59 70 syl f:x1-1 ontomzAxmωxzsucm
72 71 adantll xAf:x1-1 ontomzAxmωxzsucm
73 vex xV
74 snex zV
75 73 74 unex xzV
76 sseq1 y=xzyAxzA
77 breq1 y=xzysucmxzsucm
78 76 77 anbi12d y=xzyAysucmxzAxzsucm
79 75 78 spcev xzAxzsucmyyAysucm
80 46 72 79 syl2anc xAf:x1-1 ontomzAxmωyyAysucm
81 80 expcom zAxmωxAf:x1-1 ontomyyAysucm
82 81 ex zAxmωxAf:x1-1 ontomyyAysucm
83 82 exlimiv zzAxmωxAf:x1-1 ontomyyAysucm
84 40 83 sylbi ¬Ax=mωxAf:x1-1 ontomyyAysucm
85 84 com13 xAf:x1-1 ontommω¬Ax=yyAysucm
86 85 expcom f:x1-1 ontomxAmω¬Ax=yyAysucm
87 86 exlimiv ff:x1-1 ontomxAmω¬Ax=yyAysucm
88 39 87 sylbi xmxAmω¬Ax=yyAysucm
89 88 3imp21 xAxmmω¬Ax=yyAysucm
90 38 89 syld xAxmmω¬AFinyyAysucm
91 90 3expia xAxmmω¬AFinyyAysucm
92 91 exlimiv xxAxmmω¬AFinyyAysucm
93 92 com3l mω¬AFinxxAxmyyAysucm
94 3 6 13 22 93 finds2 nω¬AFinxxAxn
95 94 com12 ¬AFinnωxxAxn
96 95 ralrimiv ¬AFinnωxxAxn