Metamath Proof Explorer


Theorem dif1enlem

Description: Lemma for rexdif1en and dif1en . (Contributed by BTernaryTau, 18-Aug-2024)

Ref Expression
Assertion dif1enlem FVMωF:A1-1 ontosucMAF-1MM

Proof

Step Hyp Ref Expression
1 simp1 FVMωF:A1-1 ontosucMFV
2 sucidg MωMsucM
3 dff1o3 F:A1-1 ontosucMF:AontosucMFunF-1
4 3 simprbi F:A1-1 ontosucMFunF-1
5 4 adantr F:A1-1 ontosucMMsucMFunF-1
6 f1ofo F:A1-1 ontosucMF:AontosucM
7 f1ofn F:A1-1 ontosucMFFnA
8 fnresdm FFnAFA=F
9 foeq1 FA=FFA:AontosucMF:AontosucM
10 7 8 9 3syl F:A1-1 ontosucMFA:AontosucMF:AontosucM
11 6 10 mpbird F:A1-1 ontosucMFA:AontosucM
12 11 adantr F:A1-1 ontosucMMsucMFA:AontosucM
13 7 adantr F:A1-1 ontosucMMsucMFFnA
14 f1ocnvdm F:A1-1 ontosucMMsucMF-1MA
15 f1ocnvfv2 F:A1-1 ontosucMMsucMFF-1M=M
16 snidg MsucMMM
17 16 adantl F:A1-1 ontosucMMsucMMM
18 15 17 eqeltrd F:A1-1 ontosucMMsucMFF-1MM
19 fressnfv FFnAF-1MAFF-1M:F-1MMFF-1MM
20 19 biimp3ar FFnAF-1MAFF-1MMFF-1M:F-1MM
21 13 14 18 20 syl3anc F:A1-1 ontosucMMsucMFF-1M:F-1MM
22 disjsn AF-1M=¬F-1MA
23 22 con2bii F-1MA¬AF-1M=
24 14 23 sylib F:A1-1 ontosucMMsucM¬AF-1M=
25 fnresdisj FFnAAF-1M=FF-1M=
26 7 25 syl F:A1-1 ontosucMAF-1M=FF-1M=
27 26 adantr F:A1-1 ontosucMMsucMAF-1M=FF-1M=
28 24 27 mtbid F:A1-1 ontosucMMsucM¬FF-1M=
29 28 neqned F:A1-1 ontosucMMsucMFF-1M
30 foconst FF-1M:F-1MMFF-1MFF-1M:F-1MontoM
31 21 29 30 syl2anc F:A1-1 ontosucMMsucMFF-1M:F-1MontoM
32 resdif FunF-1FA:AontosucMFF-1M:F-1MontoMFAF-1M:AF-1M1-1 ontosucMM
33 5 12 31 32 syl3anc F:A1-1 ontosucMMsucMFAF-1M:AF-1M1-1 ontosucMM
34 2 33 sylan2 F:A1-1 ontosucMMωFAF-1M:AF-1M1-1 ontosucMM
35 nnord MωOrdM
36 orddif OrdMM=sucMM
37 35 36 syl MωM=sucMM
38 37 f1oeq3d MωFAF-1M:AF-1M1-1 ontoMFAF-1M:AF-1M1-1 ontosucMM
39 38 adantl F:A1-1 ontosucMMωFAF-1M:AF-1M1-1 ontoMFAF-1M:AF-1M1-1 ontosucMM
40 34 39 mpbird F:A1-1 ontosucMMωFAF-1M:AF-1M1-1 ontoM
41 40 ancoms MωF:A1-1 ontosucMFAF-1M:AF-1M1-1 ontoM
42 41 3adant1 FVMωF:A1-1 ontosucMFAF-1M:AF-1M1-1 ontoM
43 resexg FVFAF-1MV
44 f1oen3g FAF-1MVFAF-1M:AF-1M1-1 ontoMAF-1MM
45 43 44 sylan FVFAF-1M:AF-1M1-1 ontoMAF-1MM
46 1 42 45 syl2anc FVMωF:A1-1 ontosucMAF-1MM