Metamath Proof Explorer


Theorem cantnfresb

Description: A Cantor normal form which sums to less than a certain power has only zeros for larger components. (Contributed by RP, 3-Feb-2025)

Ref Expression
Assertion cantnfresb ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ( ๐ถ โˆˆ On โˆง ๐น โˆˆ dom ( ๐ด CNF ๐ต ) ) ) โ†’ ( ( ( ๐ด CNF ๐ต ) โ€˜ ๐น ) โˆˆ ( ๐ด โ†‘o ๐ถ ) โ†” โˆ€ ๐‘ฅ โˆˆ ( ๐ต โˆ– ๐ถ ) ( ๐น โ€˜ ๐‘ฅ ) = โˆ… ) )

Proof

Step Hyp Ref Expression
1 eqid โŠข dom ( ๐ด CNF ๐ต ) = dom ( ๐ด CNF ๐ต )
2 eldifi โŠข ( ๐ด โˆˆ ( On โˆ– 2o ) โ†’ ๐ด โˆˆ On )
3 2 adantr โŠข ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โ†’ ๐ด โˆˆ On )
4 simpr โŠข ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โ†’ ๐ต โˆˆ On )
5 eqid โŠข { โŸจ ๐‘Ž , ๐‘ โŸฉ โˆฃ โˆƒ ๐‘ โˆˆ ๐ต ( ( ๐‘Ž โ€˜ ๐‘ ) โˆˆ ( ๐‘ โ€˜ ๐‘ ) โˆง โˆ€ ๐‘ฅ โˆˆ ๐ต ( ๐‘ โˆˆ ๐‘ฅ โ†’ ( ๐‘Ž โ€˜ ๐‘ฅ ) = ( ๐‘ โ€˜ ๐‘ฅ ) ) ) } = { โŸจ ๐‘Ž , ๐‘ โŸฉ โˆฃ โˆƒ ๐‘ โˆˆ ๐ต ( ( ๐‘Ž โ€˜ ๐‘ ) โˆˆ ( ๐‘ โ€˜ ๐‘ ) โˆง โˆ€ ๐‘ฅ โˆˆ ๐ต ( ๐‘ โˆˆ ๐‘ฅ โ†’ ( ๐‘Ž โ€˜ ๐‘ฅ ) = ( ๐‘ โ€˜ ๐‘ฅ ) ) ) }
6 1 3 4 5 cantnf โŠข ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โ†’ ( ๐ด CNF ๐ต ) Isom { โŸจ ๐‘Ž , ๐‘ โŸฉ โˆฃ โˆƒ ๐‘ โˆˆ ๐ต ( ( ๐‘Ž โ€˜ ๐‘ ) โˆˆ ( ๐‘ โ€˜ ๐‘ ) โˆง โˆ€ ๐‘ฅ โˆˆ ๐ต ( ๐‘ โˆˆ ๐‘ฅ โ†’ ( ๐‘Ž โ€˜ ๐‘ฅ ) = ( ๐‘ โ€˜ ๐‘ฅ ) ) ) } , E ( dom ( ๐ด CNF ๐ต ) , ( ๐ด โ†‘o ๐ต ) ) )
7 6 adantr โŠข ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ๐น โˆˆ dom ( ๐ด CNF ๐ต ) ) โ†’ ( ๐ด CNF ๐ต ) Isom { โŸจ ๐‘Ž , ๐‘ โŸฉ โˆฃ โˆƒ ๐‘ โˆˆ ๐ต ( ( ๐‘Ž โ€˜ ๐‘ ) โˆˆ ( ๐‘ โ€˜ ๐‘ ) โˆง โˆ€ ๐‘ฅ โˆˆ ๐ต ( ๐‘ โˆˆ ๐‘ฅ โ†’ ( ๐‘Ž โ€˜ ๐‘ฅ ) = ( ๐‘ โ€˜ ๐‘ฅ ) ) ) } , E ( dom ( ๐ด CNF ๐ต ) , ( ๐ด โ†‘o ๐ต ) ) )
8 simpr โŠข ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ๐น โˆˆ dom ( ๐ด CNF ๐ต ) ) โ†’ ๐น โˆˆ dom ( ๐ด CNF ๐ต ) )
9 ondif2 โŠข ( ๐ด โˆˆ ( On โˆ– 2o ) โ†” ( ๐ด โˆˆ On โˆง 1o โˆˆ ๐ด ) )
10 9 simprbi โŠข ( ๐ด โˆˆ ( On โˆ– 2o ) โ†’ 1o โˆˆ ๐ด )
11 dif20el โŠข ( ๐ด โˆˆ ( On โˆ– 2o ) โ†’ โˆ… โˆˆ ๐ด )
12 10 11 ifcld โŠข ( ๐ด โˆˆ ( On โˆ– 2o ) โ†’ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) โˆˆ ๐ด )
13 12 ad2antrr โŠข ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ๐‘ฆ โˆˆ ๐ต ) โ†’ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) โˆˆ ๐ด )
14 13 fmpttd โŠข ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โ†’ ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) : ๐ต โŸถ ๐ด )
15 11 adantr โŠข ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โ†’ โˆ… โˆˆ ๐ด )
16 eqid โŠข ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) = ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) )
17 4 15 16 sniffsupp โŠข ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โ†’ ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) finSupp โˆ… )
18 1 3 4 cantnfs โŠข ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โ†’ ( ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โˆˆ dom ( ๐ด CNF ๐ต ) โ†” ( ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) : ๐ต โŸถ ๐ด โˆง ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) finSupp โˆ… ) ) )
19 14 17 18 mpbir2and โŠข ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โ†’ ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โˆˆ dom ( ๐ด CNF ๐ต ) )
20 19 adantr โŠข ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ๐น โˆˆ dom ( ๐ด CNF ๐ต ) ) โ†’ ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โˆˆ dom ( ๐ด CNF ๐ต ) )
21 isorel โŠข ( ( ( ๐ด CNF ๐ต ) Isom { โŸจ ๐‘Ž , ๐‘ โŸฉ โˆฃ โˆƒ ๐‘ โˆˆ ๐ต ( ( ๐‘Ž โ€˜ ๐‘ ) โˆˆ ( ๐‘ โ€˜ ๐‘ ) โˆง โˆ€ ๐‘ฅ โˆˆ ๐ต ( ๐‘ โˆˆ ๐‘ฅ โ†’ ( ๐‘Ž โ€˜ ๐‘ฅ ) = ( ๐‘ โ€˜ ๐‘ฅ ) ) ) } , E ( dom ( ๐ด CNF ๐ต ) , ( ๐ด โ†‘o ๐ต ) ) โˆง ( ๐น โˆˆ dom ( ๐ด CNF ๐ต ) โˆง ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โˆˆ dom ( ๐ด CNF ๐ต ) ) ) โ†’ ( ๐น { โŸจ ๐‘Ž , ๐‘ โŸฉ โˆฃ โˆƒ ๐‘ โˆˆ ๐ต ( ( ๐‘Ž โ€˜ ๐‘ ) โˆˆ ( ๐‘ โ€˜ ๐‘ ) โˆง โˆ€ ๐‘ฅ โˆˆ ๐ต ( ๐‘ โˆˆ ๐‘ฅ โ†’ ( ๐‘Ž โ€˜ ๐‘ฅ ) = ( ๐‘ โ€˜ ๐‘ฅ ) ) ) } ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ†” ( ( ๐ด CNF ๐ต ) โ€˜ ๐น ) E ( ( ๐ด CNF ๐ต ) โ€˜ ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) ) ) )
22 7 8 20 21 syl12anc โŠข ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ๐น โˆˆ dom ( ๐ด CNF ๐ต ) ) โ†’ ( ๐น { โŸจ ๐‘Ž , ๐‘ โŸฉ โˆฃ โˆƒ ๐‘ โˆˆ ๐ต ( ( ๐‘Ž โ€˜ ๐‘ ) โˆˆ ( ๐‘ โ€˜ ๐‘ ) โˆง โˆ€ ๐‘ฅ โˆˆ ๐ต ( ๐‘ โˆˆ ๐‘ฅ โ†’ ( ๐‘Ž โ€˜ ๐‘ฅ ) = ( ๐‘ โ€˜ ๐‘ฅ ) ) ) } ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ†” ( ( ๐ด CNF ๐ต ) โ€˜ ๐น ) E ( ( ๐ด CNF ๐ต ) โ€˜ ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) ) ) )
23 22 adantrl โŠข ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ( ๐ถ โˆˆ On โˆง ๐น โˆˆ dom ( ๐ด CNF ๐ต ) ) ) โ†’ ( ๐น { โŸจ ๐‘Ž , ๐‘ โŸฉ โˆฃ โˆƒ ๐‘ โˆˆ ๐ต ( ( ๐‘Ž โ€˜ ๐‘ ) โˆˆ ( ๐‘ โ€˜ ๐‘ ) โˆง โˆ€ ๐‘ฅ โˆˆ ๐ต ( ๐‘ โˆˆ ๐‘ฅ โ†’ ( ๐‘Ž โ€˜ ๐‘ฅ ) = ( ๐‘ โ€˜ ๐‘ฅ ) ) ) } ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ†” ( ( ๐ด CNF ๐ต ) โ€˜ ๐น ) E ( ( ๐ด CNF ๐ต ) โ€˜ ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) ) ) )
24 23 adantr โŠข ( ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ( ๐ถ โˆˆ On โˆง ๐น โˆˆ dom ( ๐ด CNF ๐ต ) ) ) โˆง ๐ถ โˆˆ ๐ต ) โ†’ ( ๐น { โŸจ ๐‘Ž , ๐‘ โŸฉ โˆฃ โˆƒ ๐‘ โˆˆ ๐ต ( ( ๐‘Ž โ€˜ ๐‘ ) โˆˆ ( ๐‘ โ€˜ ๐‘ ) โˆง โˆ€ ๐‘ฅ โˆˆ ๐ต ( ๐‘ โˆˆ ๐‘ฅ โ†’ ( ๐‘Ž โ€˜ ๐‘ฅ ) = ( ๐‘ โ€˜ ๐‘ฅ ) ) ) } ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ†” ( ( ๐ด CNF ๐ต ) โ€˜ ๐น ) E ( ( ๐ด CNF ๐ต ) โ€˜ ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) ) ) )
25 fvexd โŠข ( ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ( ๐ถ โˆˆ On โˆง ๐น โˆˆ dom ( ๐ด CNF ๐ต ) ) ) โˆง ๐ถ โˆˆ ๐ต ) โ†’ ( ( ๐ด CNF ๐ต ) โ€˜ ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) ) โˆˆ V )
26 epelg โŠข ( ( ( ๐ด CNF ๐ต ) โ€˜ ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) ) โˆˆ V โ†’ ( ( ( ๐ด CNF ๐ต ) โ€˜ ๐น ) E ( ( ๐ด CNF ๐ต ) โ€˜ ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) ) โ†” ( ( ๐ด CNF ๐ต ) โ€˜ ๐น ) โˆˆ ( ( ๐ด CNF ๐ต ) โ€˜ ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) ) ) )
27 25 26 syl โŠข ( ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ( ๐ถ โˆˆ On โˆง ๐น โˆˆ dom ( ๐ด CNF ๐ต ) ) ) โˆง ๐ถ โˆˆ ๐ต ) โ†’ ( ( ( ๐ด CNF ๐ต ) โ€˜ ๐น ) E ( ( ๐ด CNF ๐ต ) โ€˜ ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) ) โ†” ( ( ๐ด CNF ๐ต ) โ€˜ ๐น ) โˆˆ ( ( ๐ด CNF ๐ต ) โ€˜ ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) ) ) )
28 2 ad2antrr โŠข ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ๐ถ โˆˆ ๐ต ) โ†’ ๐ด โˆˆ On )
29 simplr โŠข ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ๐ถ โˆˆ ๐ต ) โ†’ ๐ต โˆˆ On )
30 fconst6g โŠข ( โˆ… โˆˆ ๐ด โ†’ ( ๐ต ร— { โˆ… } ) : ๐ต โŸถ ๐ด )
31 11 30 syl โŠข ( ๐ด โˆˆ ( On โˆ– 2o ) โ†’ ( ๐ต ร— { โˆ… } ) : ๐ต โŸถ ๐ด )
32 31 adantr โŠข ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โ†’ ( ๐ต ร— { โˆ… } ) : ๐ต โŸถ ๐ด )
33 4 15 fczfsuppd โŠข ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โ†’ ( ๐ต ร— { โˆ… } ) finSupp โˆ… )
34 1 3 4 cantnfs โŠข ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โ†’ ( ( ๐ต ร— { โˆ… } ) โˆˆ dom ( ๐ด CNF ๐ต ) โ†” ( ( ๐ต ร— { โˆ… } ) : ๐ต โŸถ ๐ด โˆง ( ๐ต ร— { โˆ… } ) finSupp โˆ… ) ) )
35 32 33 34 mpbir2and โŠข ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โ†’ ( ๐ต ร— { โˆ… } ) โˆˆ dom ( ๐ด CNF ๐ต ) )
36 35 adantr โŠข ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ๐ถ โˆˆ ๐ต ) โ†’ ( ๐ต ร— { โˆ… } ) โˆˆ dom ( ๐ด CNF ๐ต ) )
37 simpr โŠข ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ๐ถ โˆˆ ๐ต ) โ†’ ๐ถ โˆˆ ๐ต )
38 10 ad2antrr โŠข ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ๐ถ โˆˆ ๐ต ) โ†’ 1o โˆˆ ๐ด )
39 fczsupp0 โŠข ( ( ๐ต ร— { โˆ… } ) supp โˆ… ) = โˆ…
40 0ss โŠข โˆ… โŠ† ๐ถ
41 39 40 eqsstri โŠข ( ( ๐ต ร— { โˆ… } ) supp โˆ… ) โŠ† ๐ถ
42 41 a1i โŠข ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ๐ถ โˆˆ ๐ต ) โ†’ ( ( ๐ต ร— { โˆ… } ) supp โˆ… ) โŠ† ๐ถ )
43 0ex โŠข โˆ… โˆˆ V
44 43 fvconst2 โŠข ( ๐‘ฆ โˆˆ ๐ต โ†’ ( ( ๐ต ร— { โˆ… } ) โ€˜ ๐‘ฆ ) = โˆ… )
45 44 ifeq2d โŠข ( ๐‘ฆ โˆˆ ๐ต โ†’ if ( ๐‘ฆ = ๐ถ , 1o , ( ( ๐ต ร— { โˆ… } ) โ€˜ ๐‘ฆ ) ) = if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) )
46 45 mpteq2ia โŠข ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , ( ( ๐ต ร— { โˆ… } ) โ€˜ ๐‘ฆ ) ) ) = ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) )
47 46 eqcomi โŠข ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) = ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , ( ( ๐ต ร— { โˆ… } ) โ€˜ ๐‘ฆ ) ) )
48 1 28 29 36 37 38 42 47 cantnfp1 โŠข ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ๐ถ โˆˆ ๐ต ) โ†’ ( ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โˆˆ dom ( ๐ด CNF ๐ต ) โˆง ( ( ๐ด CNF ๐ต ) โ€˜ ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) ) = ( ( ( ๐ด โ†‘o ๐ถ ) ยทo 1o ) +o ( ( ๐ด CNF ๐ต ) โ€˜ ( ๐ต ร— { โˆ… } ) ) ) ) )
49 48 simprd โŠข ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ๐ถ โˆˆ ๐ต ) โ†’ ( ( ๐ด CNF ๐ต ) โ€˜ ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) ) = ( ( ( ๐ด โ†‘o ๐ถ ) ยทo 1o ) +o ( ( ๐ด CNF ๐ต ) โ€˜ ( ๐ต ร— { โˆ… } ) ) ) )
50 49 adantrl โŠข ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ( ๐ถ โˆˆ On โˆง ๐ถ โˆˆ ๐ต ) ) โ†’ ( ( ๐ด CNF ๐ต ) โ€˜ ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) ) = ( ( ( ๐ด โ†‘o ๐ถ ) ยทo 1o ) +o ( ( ๐ด CNF ๐ต ) โ€˜ ( ๐ต ร— { โˆ… } ) ) ) )
51 oecl โŠข ( ( ๐ด โˆˆ On โˆง ๐ถ โˆˆ On ) โ†’ ( ๐ด โ†‘o ๐ถ ) โˆˆ On )
52 3 51 sylan โŠข ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ๐ถ โˆˆ On ) โ†’ ( ๐ด โ†‘o ๐ถ ) โˆˆ On )
53 om1 โŠข ( ( ๐ด โ†‘o ๐ถ ) โˆˆ On โ†’ ( ( ๐ด โ†‘o ๐ถ ) ยทo 1o ) = ( ๐ด โ†‘o ๐ถ ) )
54 52 53 syl โŠข ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ๐ถ โˆˆ On ) โ†’ ( ( ๐ด โ†‘o ๐ถ ) ยทo 1o ) = ( ๐ด โ†‘o ๐ถ ) )
55 1 3 4 15 cantnf0 โŠข ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โ†’ ( ( ๐ด CNF ๐ต ) โ€˜ ( ๐ต ร— { โˆ… } ) ) = โˆ… )
56 55 adantr โŠข ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ๐ถ โˆˆ On ) โ†’ ( ( ๐ด CNF ๐ต ) โ€˜ ( ๐ต ร— { โˆ… } ) ) = โˆ… )
57 54 56 oveq12d โŠข ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ๐ถ โˆˆ On ) โ†’ ( ( ( ๐ด โ†‘o ๐ถ ) ยทo 1o ) +o ( ( ๐ด CNF ๐ต ) โ€˜ ( ๐ต ร— { โˆ… } ) ) ) = ( ( ๐ด โ†‘o ๐ถ ) +o โˆ… ) )
58 oa0 โŠข ( ( ๐ด โ†‘o ๐ถ ) โˆˆ On โ†’ ( ( ๐ด โ†‘o ๐ถ ) +o โˆ… ) = ( ๐ด โ†‘o ๐ถ ) )
59 52 58 syl โŠข ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ๐ถ โˆˆ On ) โ†’ ( ( ๐ด โ†‘o ๐ถ ) +o โˆ… ) = ( ๐ด โ†‘o ๐ถ ) )
60 57 59 eqtrd โŠข ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ๐ถ โˆˆ On ) โ†’ ( ( ( ๐ด โ†‘o ๐ถ ) ยทo 1o ) +o ( ( ๐ด CNF ๐ต ) โ€˜ ( ๐ต ร— { โˆ… } ) ) ) = ( ๐ด โ†‘o ๐ถ ) )
61 60 adantrr โŠข ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ( ๐ถ โˆˆ On โˆง ๐ถ โˆˆ ๐ต ) ) โ†’ ( ( ( ๐ด โ†‘o ๐ถ ) ยทo 1o ) +o ( ( ๐ด CNF ๐ต ) โ€˜ ( ๐ต ร— { โˆ… } ) ) ) = ( ๐ด โ†‘o ๐ถ ) )
62 50 61 eqtrd โŠข ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ( ๐ถ โˆˆ On โˆง ๐ถ โˆˆ ๐ต ) ) โ†’ ( ( ๐ด CNF ๐ต ) โ€˜ ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) ) = ( ๐ด โ†‘o ๐ถ ) )
63 62 eleq2d โŠข ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ( ๐ถ โˆˆ On โˆง ๐ถ โˆˆ ๐ต ) ) โ†’ ( ( ( ๐ด CNF ๐ต ) โ€˜ ๐น ) โˆˆ ( ( ๐ด CNF ๐ต ) โ€˜ ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) ) โ†” ( ( ๐ด CNF ๐ต ) โ€˜ ๐น ) โˆˆ ( ๐ด โ†‘o ๐ถ ) ) )
64 63 exp32 โŠข ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โ†’ ( ๐ถ โˆˆ On โ†’ ( ๐ถ โˆˆ ๐ต โ†’ ( ( ( ๐ด CNF ๐ต ) โ€˜ ๐น ) โˆˆ ( ( ๐ด CNF ๐ต ) โ€˜ ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) ) โ†” ( ( ๐ด CNF ๐ต ) โ€˜ ๐น ) โˆˆ ( ๐ด โ†‘o ๐ถ ) ) ) ) )
65 64 adantrd โŠข ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โ†’ ( ( ๐ถ โˆˆ On โˆง ๐น โˆˆ dom ( ๐ด CNF ๐ต ) ) โ†’ ( ๐ถ โˆˆ ๐ต โ†’ ( ( ( ๐ด CNF ๐ต ) โ€˜ ๐น ) โˆˆ ( ( ๐ด CNF ๐ต ) โ€˜ ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) ) โ†” ( ( ๐ด CNF ๐ต ) โ€˜ ๐น ) โˆˆ ( ๐ด โ†‘o ๐ถ ) ) ) ) )
66 65 imp31 โŠข ( ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ( ๐ถ โˆˆ On โˆง ๐น โˆˆ dom ( ๐ด CNF ๐ต ) ) ) โˆง ๐ถ โˆˆ ๐ต ) โ†’ ( ( ( ๐ด CNF ๐ต ) โ€˜ ๐น ) โˆˆ ( ( ๐ด CNF ๐ต ) โ€˜ ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) ) โ†” ( ( ๐ด CNF ๐ต ) โ€˜ ๐น ) โˆˆ ( ๐ด โ†‘o ๐ถ ) ) )
67 24 27 66 3bitrrd โŠข ( ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ( ๐ถ โˆˆ On โˆง ๐น โˆˆ dom ( ๐ด CNF ๐ต ) ) ) โˆง ๐ถ โˆˆ ๐ต ) โ†’ ( ( ( ๐ด CNF ๐ต ) โ€˜ ๐น ) โˆˆ ( ๐ด โ†‘o ๐ถ ) โ†” ๐น { โŸจ ๐‘Ž , ๐‘ โŸฉ โˆฃ โˆƒ ๐‘ โˆˆ ๐ต ( ( ๐‘Ž โ€˜ ๐‘ ) โˆˆ ( ๐‘ โ€˜ ๐‘ ) โˆง โˆ€ ๐‘ฅ โˆˆ ๐ต ( ๐‘ โˆˆ ๐‘ฅ โ†’ ( ๐‘Ž โ€˜ ๐‘ฅ ) = ( ๐‘ โ€˜ ๐‘ฅ ) ) ) } ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) ) )
68 fveq1 โŠข ( ๐‘Ž = ๐น โ†’ ( ๐‘Ž โ€˜ ๐‘ ) = ( ๐น โ€˜ ๐‘ ) )
69 68 eleq1d โŠข ( ๐‘Ž = ๐น โ†’ ( ( ๐‘Ž โ€˜ ๐‘ ) โˆˆ ( ๐‘ โ€˜ ๐‘ ) โ†” ( ๐น โ€˜ ๐‘ ) โˆˆ ( ๐‘ โ€˜ ๐‘ ) ) )
70 fveq1 โŠข ( ๐‘Ž = ๐น โ†’ ( ๐‘Ž โ€˜ ๐‘ฅ ) = ( ๐น โ€˜ ๐‘ฅ ) )
71 70 eqeq1d โŠข ( ๐‘Ž = ๐น โ†’ ( ( ๐‘Ž โ€˜ ๐‘ฅ ) = ( ๐‘ โ€˜ ๐‘ฅ ) โ†” ( ๐น โ€˜ ๐‘ฅ ) = ( ๐‘ โ€˜ ๐‘ฅ ) ) )
72 71 imbi2d โŠข ( ๐‘Ž = ๐น โ†’ ( ( ๐‘ โˆˆ ๐‘ฅ โ†’ ( ๐‘Ž โ€˜ ๐‘ฅ ) = ( ๐‘ โ€˜ ๐‘ฅ ) ) โ†” ( ๐‘ โˆˆ ๐‘ฅ โ†’ ( ๐น โ€˜ ๐‘ฅ ) = ( ๐‘ โ€˜ ๐‘ฅ ) ) ) )
73 72 ralbidv โŠข ( ๐‘Ž = ๐น โ†’ ( โˆ€ ๐‘ฅ โˆˆ ๐ต ( ๐‘ โˆˆ ๐‘ฅ โ†’ ( ๐‘Ž โ€˜ ๐‘ฅ ) = ( ๐‘ โ€˜ ๐‘ฅ ) ) โ†” โˆ€ ๐‘ฅ โˆˆ ๐ต ( ๐‘ โˆˆ ๐‘ฅ โ†’ ( ๐น โ€˜ ๐‘ฅ ) = ( ๐‘ โ€˜ ๐‘ฅ ) ) ) )
74 69 73 anbi12d โŠข ( ๐‘Ž = ๐น โ†’ ( ( ( ๐‘Ž โ€˜ ๐‘ ) โˆˆ ( ๐‘ โ€˜ ๐‘ ) โˆง โˆ€ ๐‘ฅ โˆˆ ๐ต ( ๐‘ โˆˆ ๐‘ฅ โ†’ ( ๐‘Ž โ€˜ ๐‘ฅ ) = ( ๐‘ โ€˜ ๐‘ฅ ) ) ) โ†” ( ( ๐น โ€˜ ๐‘ ) โˆˆ ( ๐‘ โ€˜ ๐‘ ) โˆง โˆ€ ๐‘ฅ โˆˆ ๐ต ( ๐‘ โˆˆ ๐‘ฅ โ†’ ( ๐น โ€˜ ๐‘ฅ ) = ( ๐‘ โ€˜ ๐‘ฅ ) ) ) ) )
75 74 rexbidv โŠข ( ๐‘Ž = ๐น โ†’ ( โˆƒ ๐‘ โˆˆ ๐ต ( ( ๐‘Ž โ€˜ ๐‘ ) โˆˆ ( ๐‘ โ€˜ ๐‘ ) โˆง โˆ€ ๐‘ฅ โˆˆ ๐ต ( ๐‘ โˆˆ ๐‘ฅ โ†’ ( ๐‘Ž โ€˜ ๐‘ฅ ) = ( ๐‘ โ€˜ ๐‘ฅ ) ) ) โ†” โˆƒ ๐‘ โˆˆ ๐ต ( ( ๐น โ€˜ ๐‘ ) โˆˆ ( ๐‘ โ€˜ ๐‘ ) โˆง โˆ€ ๐‘ฅ โˆˆ ๐ต ( ๐‘ โˆˆ ๐‘ฅ โ†’ ( ๐น โ€˜ ๐‘ฅ ) = ( ๐‘ โ€˜ ๐‘ฅ ) ) ) ) )
76 fveq1 โŠข ( ๐‘ = ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ†’ ( ๐‘ โ€˜ ๐‘ ) = ( ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ€˜ ๐‘ ) )
77 76 eleq2d โŠข ( ๐‘ = ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ†’ ( ( ๐น โ€˜ ๐‘ ) โˆˆ ( ๐‘ โ€˜ ๐‘ ) โ†” ( ๐น โ€˜ ๐‘ ) โˆˆ ( ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ€˜ ๐‘ ) ) )
78 fveq1 โŠข ( ๐‘ = ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ†’ ( ๐‘ โ€˜ ๐‘ฅ ) = ( ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ€˜ ๐‘ฅ ) )
79 78 eqeq2d โŠข ( ๐‘ = ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ†’ ( ( ๐น โ€˜ ๐‘ฅ ) = ( ๐‘ โ€˜ ๐‘ฅ ) โ†” ( ๐น โ€˜ ๐‘ฅ ) = ( ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ€˜ ๐‘ฅ ) ) )
80 79 imbi2d โŠข ( ๐‘ = ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ†’ ( ( ๐‘ โˆˆ ๐‘ฅ โ†’ ( ๐น โ€˜ ๐‘ฅ ) = ( ๐‘ โ€˜ ๐‘ฅ ) ) โ†” ( ๐‘ โˆˆ ๐‘ฅ โ†’ ( ๐น โ€˜ ๐‘ฅ ) = ( ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ€˜ ๐‘ฅ ) ) ) )
81 80 ralbidv โŠข ( ๐‘ = ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ†’ ( โˆ€ ๐‘ฅ โˆˆ ๐ต ( ๐‘ โˆˆ ๐‘ฅ โ†’ ( ๐น โ€˜ ๐‘ฅ ) = ( ๐‘ โ€˜ ๐‘ฅ ) ) โ†” โˆ€ ๐‘ฅ โˆˆ ๐ต ( ๐‘ โˆˆ ๐‘ฅ โ†’ ( ๐น โ€˜ ๐‘ฅ ) = ( ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ€˜ ๐‘ฅ ) ) ) )
82 77 81 anbi12d โŠข ( ๐‘ = ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ†’ ( ( ( ๐น โ€˜ ๐‘ ) โˆˆ ( ๐‘ โ€˜ ๐‘ ) โˆง โˆ€ ๐‘ฅ โˆˆ ๐ต ( ๐‘ โˆˆ ๐‘ฅ โ†’ ( ๐น โ€˜ ๐‘ฅ ) = ( ๐‘ โ€˜ ๐‘ฅ ) ) ) โ†” ( ( ๐น โ€˜ ๐‘ ) โˆˆ ( ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ€˜ ๐‘ ) โˆง โˆ€ ๐‘ฅ โˆˆ ๐ต ( ๐‘ โˆˆ ๐‘ฅ โ†’ ( ๐น โ€˜ ๐‘ฅ ) = ( ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ€˜ ๐‘ฅ ) ) ) ) )
83 82 rexbidv โŠข ( ๐‘ = ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ†’ ( โˆƒ ๐‘ โˆˆ ๐ต ( ( ๐น โ€˜ ๐‘ ) โˆˆ ( ๐‘ โ€˜ ๐‘ ) โˆง โˆ€ ๐‘ฅ โˆˆ ๐ต ( ๐‘ โˆˆ ๐‘ฅ โ†’ ( ๐น โ€˜ ๐‘ฅ ) = ( ๐‘ โ€˜ ๐‘ฅ ) ) ) โ†” โˆƒ ๐‘ โˆˆ ๐ต ( ( ๐น โ€˜ ๐‘ ) โˆˆ ( ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ€˜ ๐‘ ) โˆง โˆ€ ๐‘ฅ โˆˆ ๐ต ( ๐‘ โˆˆ ๐‘ฅ โ†’ ( ๐น โ€˜ ๐‘ฅ ) = ( ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ€˜ ๐‘ฅ ) ) ) ) )
84 75 83 5 bropabg โŠข ( ๐น { โŸจ ๐‘Ž , ๐‘ โŸฉ โˆฃ โˆƒ ๐‘ โˆˆ ๐ต ( ( ๐‘Ž โ€˜ ๐‘ ) โˆˆ ( ๐‘ โ€˜ ๐‘ ) โˆง โˆ€ ๐‘ฅ โˆˆ ๐ต ( ๐‘ โˆˆ ๐‘ฅ โ†’ ( ๐‘Ž โ€˜ ๐‘ฅ ) = ( ๐‘ โ€˜ ๐‘ฅ ) ) ) } ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ†” ( ( ๐น โˆˆ V โˆง ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โˆˆ V ) โˆง โˆƒ ๐‘ โˆˆ ๐ต ( ( ๐น โ€˜ ๐‘ ) โˆˆ ( ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ€˜ ๐‘ ) โˆง โˆ€ ๐‘ฅ โˆˆ ๐ต ( ๐‘ โˆˆ ๐‘ฅ โ†’ ( ๐น โ€˜ ๐‘ฅ ) = ( ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ€˜ ๐‘ฅ ) ) ) ) )
85 fveq2 โŠข ( ๐‘ = ๐ถ โ†’ ( ๐น โ€˜ ๐‘ ) = ( ๐น โ€˜ ๐ถ ) )
86 85 adantr โŠข ( ( ๐‘ = ๐ถ โˆง ๐‘ โˆˆ ๐ต ) โ†’ ( ๐น โ€˜ ๐‘ ) = ( ๐น โ€˜ ๐ถ ) )
87 eqeq1 โŠข ( ๐‘ฆ = ๐‘ โ†’ ( ๐‘ฆ = ๐ถ โ†” ๐‘ = ๐ถ ) )
88 87 ifbid โŠข ( ๐‘ฆ = ๐‘ โ†’ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) = if ( ๐‘ = ๐ถ , 1o , โˆ… ) )
89 1oex โŠข 1o โˆˆ V
90 89 43 ifex โŠข if ( ๐‘ = ๐ถ , 1o , โˆ… ) โˆˆ V
91 88 16 90 fvmpt โŠข ( ๐‘ โˆˆ ๐ต โ†’ ( ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ€˜ ๐‘ ) = if ( ๐‘ = ๐ถ , 1o , โˆ… ) )
92 iftrue โŠข ( ๐‘ = ๐ถ โ†’ if ( ๐‘ = ๐ถ , 1o , โˆ… ) = 1o )
93 91 92 sylan9eqr โŠข ( ( ๐‘ = ๐ถ โˆง ๐‘ โˆˆ ๐ต ) โ†’ ( ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ€˜ ๐‘ ) = 1o )
94 86 93 eleq12d โŠข ( ( ๐‘ = ๐ถ โˆง ๐‘ โˆˆ ๐ต ) โ†’ ( ( ๐น โ€˜ ๐‘ ) โˆˆ ( ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ€˜ ๐‘ ) โ†” ( ๐น โ€˜ ๐ถ ) โˆˆ 1o ) )
95 el1o โŠข ( ( ๐น โ€˜ ๐ถ ) โˆˆ 1o โ†” ( ๐น โ€˜ ๐ถ ) = โˆ… )
96 95 a1i โŠข ( ( ๐‘ = ๐ถ โˆง ๐‘ โˆˆ ๐ต ) โ†’ ( ( ๐น โ€˜ ๐ถ ) โˆˆ 1o โ†” ( ๐น โ€˜ ๐ถ ) = โˆ… ) )
97 96 biimpd โŠข ( ( ๐‘ = ๐ถ โˆง ๐‘ โˆˆ ๐ต ) โ†’ ( ( ๐น โ€˜ ๐ถ ) โˆˆ 1o โ†’ ( ๐น โ€˜ ๐ถ ) = โˆ… ) )
98 simpl โŠข ( ( ๐‘ = ๐ถ โˆง ๐‘ โˆˆ ๐ต ) โ†’ ๐‘ = ๐ถ )
99 97 98 jctild โŠข ( ( ๐‘ = ๐ถ โˆง ๐‘ โˆˆ ๐ต ) โ†’ ( ( ๐น โ€˜ ๐ถ ) โˆˆ 1o โ†’ ( ๐‘ = ๐ถ โˆง ( ๐น โ€˜ ๐ถ ) = โˆ… ) ) )
100 94 99 sylbid โŠข ( ( ๐‘ = ๐ถ โˆง ๐‘ โˆˆ ๐ต ) โ†’ ( ( ๐น โ€˜ ๐‘ ) โˆˆ ( ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ€˜ ๐‘ ) โ†’ ( ๐‘ = ๐ถ โˆง ( ๐น โ€˜ ๐ถ ) = โˆ… ) ) )
101 100 expimpd โŠข ( ๐‘ = ๐ถ โ†’ ( ( ๐‘ โˆˆ ๐ต โˆง ( ๐น โ€˜ ๐‘ ) โˆˆ ( ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ€˜ ๐‘ ) ) โ†’ ( ๐‘ = ๐ถ โˆง ( ๐น โ€˜ ๐ถ ) = โˆ… ) ) )
102 91 adantl โŠข ( ( ๐‘ โ‰  ๐ถ โˆง ๐‘ โˆˆ ๐ต ) โ†’ ( ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ€˜ ๐‘ ) = if ( ๐‘ = ๐ถ , 1o , โˆ… ) )
103 simpl โŠข ( ( ๐‘ โ‰  ๐ถ โˆง ๐‘ โˆˆ ๐ต ) โ†’ ๐‘ โ‰  ๐ถ )
104 103 neneqd โŠข ( ( ๐‘ โ‰  ๐ถ โˆง ๐‘ โˆˆ ๐ต ) โ†’ ยฌ ๐‘ = ๐ถ )
105 104 iffalsed โŠข ( ( ๐‘ โ‰  ๐ถ โˆง ๐‘ โˆˆ ๐ต ) โ†’ if ( ๐‘ = ๐ถ , 1o , โˆ… ) = โˆ… )
106 102 105 eqtrd โŠข ( ( ๐‘ โ‰  ๐ถ โˆง ๐‘ โˆˆ ๐ต ) โ†’ ( ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ€˜ ๐‘ ) = โˆ… )
107 106 eleq2d โŠข ( ( ๐‘ โ‰  ๐ถ โˆง ๐‘ โˆˆ ๐ต ) โ†’ ( ( ๐น โ€˜ ๐‘ ) โˆˆ ( ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ€˜ ๐‘ ) โ†” ( ๐น โ€˜ ๐‘ ) โˆˆ โˆ… ) )
108 107 biimpd โŠข ( ( ๐‘ โ‰  ๐ถ โˆง ๐‘ โˆˆ ๐ต ) โ†’ ( ( ๐น โ€˜ ๐‘ ) โˆˆ ( ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ€˜ ๐‘ ) โ†’ ( ๐น โ€˜ ๐‘ ) โˆˆ โˆ… ) )
109 108 expimpd โŠข ( ๐‘ โ‰  ๐ถ โ†’ ( ( ๐‘ โˆˆ ๐ต โˆง ( ๐น โ€˜ ๐‘ ) โˆˆ ( ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ€˜ ๐‘ ) ) โ†’ ( ๐น โ€˜ ๐‘ ) โˆˆ โˆ… ) )
110 noel โŠข ยฌ ( ๐น โ€˜ ๐‘ ) โˆˆ โˆ…
111 110 pm2.21i โŠข ( ( ๐น โ€˜ ๐‘ ) โˆˆ โˆ… โ†’ ( ๐‘ = ๐ถ โˆง ( ๐น โ€˜ ๐ถ ) = โˆ… ) )
112 109 111 syl6 โŠข ( ๐‘ โ‰  ๐ถ โ†’ ( ( ๐‘ โˆˆ ๐ต โˆง ( ๐น โ€˜ ๐‘ ) โˆˆ ( ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ€˜ ๐‘ ) ) โ†’ ( ๐‘ = ๐ถ โˆง ( ๐น โ€˜ ๐ถ ) = โˆ… ) ) )
113 101 112 pm2.61ine โŠข ( ( ๐‘ โˆˆ ๐ต โˆง ( ๐น โ€˜ ๐‘ ) โˆˆ ( ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ€˜ ๐‘ ) ) โ†’ ( ๐‘ = ๐ถ โˆง ( ๐น โ€˜ ๐ถ ) = โˆ… ) )
114 113 a1i โŠข ( ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ๐ถ โˆˆ On ) โˆง ๐ถ โˆˆ ๐ต ) โ†’ ( ( ๐‘ โˆˆ ๐ต โˆง ( ๐น โ€˜ ๐‘ ) โˆˆ ( ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ€˜ ๐‘ ) ) โ†’ ( ๐‘ = ๐ถ โˆง ( ๐น โ€˜ ๐ถ ) = โˆ… ) ) )
115 fveqeq2 โŠข ( ๐‘ฅ = ๐ถ โ†’ ( ( ๐น โ€˜ ๐‘ฅ ) = โˆ… โ†” ( ๐น โ€˜ ๐ถ ) = โˆ… ) )
116 115 ralsng โŠข ( ๐ถ โˆˆ ๐ต โ†’ ( โˆ€ ๐‘ฅ โˆˆ { ๐ถ } ( ๐น โ€˜ ๐‘ฅ ) = โˆ… โ†” ( ๐น โ€˜ ๐ถ ) = โˆ… ) )
117 116 anbi2d โŠข ( ๐ถ โˆˆ ๐ต โ†’ ( ( ๐‘ = ๐ถ โˆง โˆ€ ๐‘ฅ โˆˆ { ๐ถ } ( ๐น โ€˜ ๐‘ฅ ) = โˆ… ) โ†” ( ๐‘ = ๐ถ โˆง ( ๐น โ€˜ ๐ถ ) = โˆ… ) ) )
118 117 biimprd โŠข ( ๐ถ โˆˆ ๐ต โ†’ ( ( ๐‘ = ๐ถ โˆง ( ๐น โ€˜ ๐ถ ) = โˆ… ) โ†’ ( ๐‘ = ๐ถ โˆง โˆ€ ๐‘ฅ โˆˆ { ๐ถ } ( ๐น โ€˜ ๐‘ฅ ) = โˆ… ) ) )
119 118 adantl โŠข ( ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ๐ถ โˆˆ On ) โˆง ๐ถ โˆˆ ๐ต ) โ†’ ( ( ๐‘ = ๐ถ โˆง ( ๐น โ€˜ ๐ถ ) = โˆ… ) โ†’ ( ๐‘ = ๐ถ โˆง โˆ€ ๐‘ฅ โˆˆ { ๐ถ } ( ๐น โ€˜ ๐‘ฅ ) = โˆ… ) ) )
120 4 anim1i โŠข ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ๐ถ โˆˆ On ) โ†’ ( ๐ต โˆˆ On โˆง ๐ถ โˆˆ On ) )
121 120 adantr โŠข ( ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ๐ถ โˆˆ On ) โˆง ๐ถ โˆˆ ๐ต ) โ†’ ( ๐ต โˆˆ On โˆง ๐ถ โˆˆ On ) )
122 pm3.31 โŠข ( ( ๐‘ฅ โˆˆ ๐ต โ†’ ( ๐‘ โˆˆ ๐‘ฅ โ†’ ( ๐น โ€˜ ๐‘ฅ ) = ( ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ€˜ ๐‘ฅ ) ) ) โ†’ ( ( ๐‘ฅ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ฅ ) โ†’ ( ๐น โ€˜ ๐‘ฅ ) = ( ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ€˜ ๐‘ฅ ) ) )
123 122 a1i โŠข ( ( ( ๐ต โˆˆ On โˆง ๐ถ โˆˆ On ) โˆง ๐‘ = ๐ถ ) โ†’ ( ( ๐‘ฅ โˆˆ ๐ต โ†’ ( ๐‘ โˆˆ ๐‘ฅ โ†’ ( ๐น โ€˜ ๐‘ฅ ) = ( ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ€˜ ๐‘ฅ ) ) ) โ†’ ( ( ๐‘ฅ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ฅ ) โ†’ ( ๐น โ€˜ ๐‘ฅ ) = ( ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ€˜ ๐‘ฅ ) ) ) )
124 eldif โŠข ( ๐‘ฅ โˆˆ ( ๐ต โˆ– suc ๐ถ ) โ†” ( ๐‘ฅ โˆˆ ๐ต โˆง ยฌ ๐‘ฅ โˆˆ suc ๐ถ ) )
125 simplr โŠข ( ( ( ( ๐ต โˆˆ On โˆง ๐ถ โˆˆ On ) โˆง ๐‘ = ๐ถ ) โˆง ๐‘ฅ โˆˆ ๐ต ) โ†’ ๐‘ = ๐ถ )
126 125 eleq1d โŠข ( ( ( ( ๐ต โˆˆ On โˆง ๐ถ โˆˆ On ) โˆง ๐‘ = ๐ถ ) โˆง ๐‘ฅ โˆˆ ๐ต ) โ†’ ( ๐‘ โˆˆ ๐‘ฅ โ†” ๐ถ โˆˆ ๐‘ฅ ) )
127 simpl โŠข ( ( ๐ต โˆˆ On โˆง ๐ถ โˆˆ On ) โ†’ ๐ต โˆˆ On )
128 127 adantr โŠข ( ( ( ๐ต โˆˆ On โˆง ๐ถ โˆˆ On ) โˆง ๐‘ = ๐ถ ) โ†’ ๐ต โˆˆ On )
129 onelon โŠข ( ( ๐ต โˆˆ On โˆง ๐‘ฅ โˆˆ ๐ต ) โ†’ ๐‘ฅ โˆˆ On )
130 128 129 sylan โŠข ( ( ( ( ๐ต โˆˆ On โˆง ๐ถ โˆˆ On ) โˆง ๐‘ = ๐ถ ) โˆง ๐‘ฅ โˆˆ ๐ต ) โ†’ ๐‘ฅ โˆˆ On )
131 simpllr โŠข ( ( ( ( ๐ต โˆˆ On โˆง ๐ถ โˆˆ On ) โˆง ๐‘ = ๐ถ ) โˆง ๐‘ฅ โˆˆ ๐ต ) โ†’ ๐ถ โˆˆ On )
132 ontri1 โŠข ( ( ๐‘ฅ โˆˆ On โˆง ๐ถ โˆˆ On ) โ†’ ( ๐‘ฅ โŠ† ๐ถ โ†” ยฌ ๐ถ โˆˆ ๐‘ฅ ) )
133 130 131 132 syl2anc โŠข ( ( ( ( ๐ต โˆˆ On โˆง ๐ถ โˆˆ On ) โˆง ๐‘ = ๐ถ ) โˆง ๐‘ฅ โˆˆ ๐ต ) โ†’ ( ๐‘ฅ โŠ† ๐ถ โ†” ยฌ ๐ถ โˆˆ ๐‘ฅ ) )
134 133 con2bid โŠข ( ( ( ( ๐ต โˆˆ On โˆง ๐ถ โˆˆ On ) โˆง ๐‘ = ๐ถ ) โˆง ๐‘ฅ โˆˆ ๐ต ) โ†’ ( ๐ถ โˆˆ ๐‘ฅ โ†” ยฌ ๐‘ฅ โŠ† ๐ถ ) )
135 onsssuc โŠข ( ( ๐‘ฅ โˆˆ On โˆง ๐ถ โˆˆ On ) โ†’ ( ๐‘ฅ โŠ† ๐ถ โ†” ๐‘ฅ โˆˆ suc ๐ถ ) )
136 130 131 135 syl2anc โŠข ( ( ( ( ๐ต โˆˆ On โˆง ๐ถ โˆˆ On ) โˆง ๐‘ = ๐ถ ) โˆง ๐‘ฅ โˆˆ ๐ต ) โ†’ ( ๐‘ฅ โŠ† ๐ถ โ†” ๐‘ฅ โˆˆ suc ๐ถ ) )
137 136 notbid โŠข ( ( ( ( ๐ต โˆˆ On โˆง ๐ถ โˆˆ On ) โˆง ๐‘ = ๐ถ ) โˆง ๐‘ฅ โˆˆ ๐ต ) โ†’ ( ยฌ ๐‘ฅ โŠ† ๐ถ โ†” ยฌ ๐‘ฅ โˆˆ suc ๐ถ ) )
138 126 134 137 3bitrrd โŠข ( ( ( ( ๐ต โˆˆ On โˆง ๐ถ โˆˆ On ) โˆง ๐‘ = ๐ถ ) โˆง ๐‘ฅ โˆˆ ๐ต ) โ†’ ( ยฌ ๐‘ฅ โˆˆ suc ๐ถ โ†” ๐‘ โˆˆ ๐‘ฅ ) )
139 138 pm5.32da โŠข ( ( ( ๐ต โˆˆ On โˆง ๐ถ โˆˆ On ) โˆง ๐‘ = ๐ถ ) โ†’ ( ( ๐‘ฅ โˆˆ ๐ต โˆง ยฌ ๐‘ฅ โˆˆ suc ๐ถ ) โ†” ( ๐‘ฅ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ฅ ) ) )
140 124 139 bitrid โŠข ( ( ( ๐ต โˆˆ On โˆง ๐ถ โˆˆ On ) โˆง ๐‘ = ๐ถ ) โ†’ ( ๐‘ฅ โˆˆ ( ๐ต โˆ– suc ๐ถ ) โ†” ( ๐‘ฅ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ฅ ) ) )
141 140 biimpd โŠข ( ( ( ๐ต โˆˆ On โˆง ๐ถ โˆˆ On ) โˆง ๐‘ = ๐ถ ) โ†’ ( ๐‘ฅ โˆˆ ( ๐ต โˆ– suc ๐ถ ) โ†’ ( ๐‘ฅ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ฅ ) ) )
142 141 imim1d โŠข ( ( ( ๐ต โˆˆ On โˆง ๐ถ โˆˆ On ) โˆง ๐‘ = ๐ถ ) โ†’ ( ( ( ๐‘ฅ โˆˆ ๐ต โˆง ๐‘ โˆˆ ๐‘ฅ ) โ†’ ( ๐น โ€˜ ๐‘ฅ ) = ( ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ€˜ ๐‘ฅ ) ) โ†’ ( ๐‘ฅ โˆˆ ( ๐ต โˆ– suc ๐ถ ) โ†’ ( ๐น โ€˜ ๐‘ฅ ) = ( ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ€˜ ๐‘ฅ ) ) ) )
143 eldifi โŠข ( ๐‘ฅ โˆˆ ( ๐ต โˆ– suc ๐ถ ) โ†’ ๐‘ฅ โˆˆ ๐ต )
144 143 adantl โŠข ( ( ( ( ๐ต โˆˆ On โˆง ๐ถ โˆˆ On ) โˆง ๐‘ = ๐ถ ) โˆง ๐‘ฅ โˆˆ ( ๐ต โˆ– suc ๐ถ ) ) โ†’ ๐‘ฅ โˆˆ ๐ต )
145 eqeq1 โŠข ( ๐‘ฆ = ๐‘ฅ โ†’ ( ๐‘ฆ = ๐ถ โ†” ๐‘ฅ = ๐ถ ) )
146 145 ifbid โŠข ( ๐‘ฆ = ๐‘ฅ โ†’ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) = if ( ๐‘ฅ = ๐ถ , 1o , โˆ… ) )
147 89 43 ifex โŠข if ( ๐‘ฅ = ๐ถ , 1o , โˆ… ) โˆˆ V
148 146 16 147 fvmpt โŠข ( ๐‘ฅ โˆˆ ๐ต โ†’ ( ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ€˜ ๐‘ฅ ) = if ( ๐‘ฅ = ๐ถ , 1o , โˆ… ) )
149 144 148 syl โŠข ( ( ( ( ๐ต โˆˆ On โˆง ๐ถ โˆˆ On ) โˆง ๐‘ = ๐ถ ) โˆง ๐‘ฅ โˆˆ ( ๐ต โˆ– suc ๐ถ ) ) โ†’ ( ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ€˜ ๐‘ฅ ) = if ( ๐‘ฅ = ๐ถ , 1o , โˆ… ) )
150 128 143 129 syl2an โŠข ( ( ( ( ๐ต โˆˆ On โˆง ๐ถ โˆˆ On ) โˆง ๐‘ = ๐ถ ) โˆง ๐‘ฅ โˆˆ ( ๐ต โˆ– suc ๐ถ ) ) โ†’ ๐‘ฅ โˆˆ On )
151 eloni โŠข ( ๐‘ฅ โˆˆ On โ†’ Ord ๐‘ฅ )
152 150 151 syl โŠข ( ( ( ( ๐ต โˆˆ On โˆง ๐ถ โˆˆ On ) โˆง ๐‘ = ๐ถ ) โˆง ๐‘ฅ โˆˆ ( ๐ต โˆ– suc ๐ถ ) ) โ†’ Ord ๐‘ฅ )
153 eloni โŠข ( ๐ต โˆˆ On โ†’ Ord ๐ต )
154 153 ad2antrr โŠข ( ( ( ๐ต โˆˆ On โˆง ๐ถ โˆˆ On ) โˆง ๐‘ = ๐ถ ) โ†’ Ord ๐ต )
155 simplr โŠข ( ( ( ๐ต โˆˆ On โˆง ๐ถ โˆˆ On ) โˆง ๐‘ = ๐ถ ) โ†’ ๐ถ โˆˆ On )
156 ordeldifsucon โŠข ( ( Ord ๐ต โˆง ๐ถ โˆˆ On ) โ†’ ( ๐‘ฅ โˆˆ ( ๐ต โˆ– suc ๐ถ ) โ†” ( ๐‘ฅ โˆˆ ๐ต โˆง ๐ถ โˆˆ ๐‘ฅ ) ) )
157 154 155 156 syl2anc โŠข ( ( ( ๐ต โˆˆ On โˆง ๐ถ โˆˆ On ) โˆง ๐‘ = ๐ถ ) โ†’ ( ๐‘ฅ โˆˆ ( ๐ต โˆ– suc ๐ถ ) โ†” ( ๐‘ฅ โˆˆ ๐ต โˆง ๐ถ โˆˆ ๐‘ฅ ) ) )
158 157 biimpa โŠข ( ( ( ( ๐ต โˆˆ On โˆง ๐ถ โˆˆ On ) โˆง ๐‘ = ๐ถ ) โˆง ๐‘ฅ โˆˆ ( ๐ต โˆ– suc ๐ถ ) ) โ†’ ( ๐‘ฅ โˆˆ ๐ต โˆง ๐ถ โˆˆ ๐‘ฅ ) )
159 ordirr โŠข ( Ord ๐‘ฅ โ†’ ยฌ ๐‘ฅ โˆˆ ๐‘ฅ )
160 eleq1 โŠข ( ๐‘ฅ = ๐ถ โ†’ ( ๐‘ฅ โˆˆ ๐‘ฅ โ†” ๐ถ โˆˆ ๐‘ฅ ) )
161 160 notbid โŠข ( ๐‘ฅ = ๐ถ โ†’ ( ยฌ ๐‘ฅ โˆˆ ๐‘ฅ โ†” ยฌ ๐ถ โˆˆ ๐‘ฅ ) )
162 159 161 syl5ibcom โŠข ( Ord ๐‘ฅ โ†’ ( ๐‘ฅ = ๐ถ โ†’ ยฌ ๐ถ โˆˆ ๐‘ฅ ) )
163 162 con2d โŠข ( Ord ๐‘ฅ โ†’ ( ๐ถ โˆˆ ๐‘ฅ โ†’ ยฌ ๐‘ฅ = ๐ถ ) )
164 163 adantld โŠข ( Ord ๐‘ฅ โ†’ ( ( ๐‘ฅ โˆˆ ๐ต โˆง ๐ถ โˆˆ ๐‘ฅ ) โ†’ ยฌ ๐‘ฅ = ๐ถ ) )
165 152 158 164 sylc โŠข ( ( ( ( ๐ต โˆˆ On โˆง ๐ถ โˆˆ On ) โˆง ๐‘ = ๐ถ ) โˆง ๐‘ฅ โˆˆ ( ๐ต โˆ– suc ๐ถ ) ) โ†’ ยฌ ๐‘ฅ = ๐ถ )
166 165 iffalsed โŠข ( ( ( ( ๐ต โˆˆ On โˆง ๐ถ โˆˆ On ) โˆง ๐‘ = ๐ถ ) โˆง ๐‘ฅ โˆˆ ( ๐ต โˆ– suc ๐ถ ) ) โ†’ if ( ๐‘ฅ = ๐ถ , 1o , โˆ… ) = โˆ… )
167 149 166 eqtrd โŠข ( ( ( ( ๐ต โˆˆ On โˆง ๐ถ โˆˆ On ) โˆง ๐‘ = ๐ถ ) โˆง ๐‘ฅ โˆˆ ( ๐ต โˆ– suc ๐ถ ) ) โ†’ ( ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ€˜ ๐‘ฅ ) = โˆ… )
168 167 eqeq2d โŠข ( ( ( ( ๐ต โˆˆ On โˆง ๐ถ โˆˆ On ) โˆง ๐‘ = ๐ถ ) โˆง ๐‘ฅ โˆˆ ( ๐ต โˆ– suc ๐ถ ) ) โ†’ ( ( ๐น โ€˜ ๐‘ฅ ) = ( ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ€˜ ๐‘ฅ ) โ†” ( ๐น โ€˜ ๐‘ฅ ) = โˆ… ) )
169 168 biimpd โŠข ( ( ( ( ๐ต โˆˆ On โˆง ๐ถ โˆˆ On ) โˆง ๐‘ = ๐ถ ) โˆง ๐‘ฅ โˆˆ ( ๐ต โˆ– suc ๐ถ ) ) โ†’ ( ( ๐น โ€˜ ๐‘ฅ ) = ( ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ€˜ ๐‘ฅ ) โ†’ ( ๐น โ€˜ ๐‘ฅ ) = โˆ… ) )
170 169 ex โŠข ( ( ( ๐ต โˆˆ On โˆง ๐ถ โˆˆ On ) โˆง ๐‘ = ๐ถ ) โ†’ ( ๐‘ฅ โˆˆ ( ๐ต โˆ– suc ๐ถ ) โ†’ ( ( ๐น โ€˜ ๐‘ฅ ) = ( ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ€˜ ๐‘ฅ ) โ†’ ( ๐น โ€˜ ๐‘ฅ ) = โˆ… ) ) )
171 170 a2d โŠข ( ( ( ๐ต โˆˆ On โˆง ๐ถ โˆˆ On ) โˆง ๐‘ = ๐ถ ) โ†’ ( ( ๐‘ฅ โˆˆ ( ๐ต โˆ– suc ๐ถ ) โ†’ ( ๐น โ€˜ ๐‘ฅ ) = ( ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ€˜ ๐‘ฅ ) ) โ†’ ( ๐‘ฅ โˆˆ ( ๐ต โˆ– suc ๐ถ ) โ†’ ( ๐น โ€˜ ๐‘ฅ ) = โˆ… ) ) )
172 123 142 171 3syld โŠข ( ( ( ๐ต โˆˆ On โˆง ๐ถ โˆˆ On ) โˆง ๐‘ = ๐ถ ) โ†’ ( ( ๐‘ฅ โˆˆ ๐ต โ†’ ( ๐‘ โˆˆ ๐‘ฅ โ†’ ( ๐น โ€˜ ๐‘ฅ ) = ( ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ€˜ ๐‘ฅ ) ) ) โ†’ ( ๐‘ฅ โˆˆ ( ๐ต โˆ– suc ๐ถ ) โ†’ ( ๐น โ€˜ ๐‘ฅ ) = โˆ… ) ) )
173 172 ralimdv2 โŠข ( ( ( ๐ต โˆˆ On โˆง ๐ถ โˆˆ On ) โˆง ๐‘ = ๐ถ ) โ†’ ( โˆ€ ๐‘ฅ โˆˆ ๐ต ( ๐‘ โˆˆ ๐‘ฅ โ†’ ( ๐น โ€˜ ๐‘ฅ ) = ( ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ€˜ ๐‘ฅ ) ) โ†’ โˆ€ ๐‘ฅ โˆˆ ( ๐ต โˆ– suc ๐ถ ) ( ๐น โ€˜ ๐‘ฅ ) = โˆ… ) )
174 121 173 sylan โŠข ( ( ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ๐ถ โˆˆ On ) โˆง ๐ถ โˆˆ ๐ต ) โˆง ๐‘ = ๐ถ ) โ†’ ( โˆ€ ๐‘ฅ โˆˆ ๐ต ( ๐‘ โˆˆ ๐‘ฅ โ†’ ( ๐น โ€˜ ๐‘ฅ ) = ( ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ€˜ ๐‘ฅ ) ) โ†’ โˆ€ ๐‘ฅ โˆˆ ( ๐ต โˆ– suc ๐ถ ) ( ๐น โ€˜ ๐‘ฅ ) = โˆ… ) )
175 174 adantr โŠข ( ( ( ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ๐ถ โˆˆ On ) โˆง ๐ถ โˆˆ ๐ต ) โˆง ๐‘ = ๐ถ ) โˆง โˆ€ ๐‘ฅ โˆˆ { ๐ถ } ( ๐น โ€˜ ๐‘ฅ ) = โˆ… ) โ†’ ( โˆ€ ๐‘ฅ โˆˆ ๐ต ( ๐‘ โˆˆ ๐‘ฅ โ†’ ( ๐น โ€˜ ๐‘ฅ ) = ( ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ€˜ ๐‘ฅ ) ) โ†’ โˆ€ ๐‘ฅ โˆˆ ( ๐ต โˆ– suc ๐ถ ) ( ๐น โ€˜ ๐‘ฅ ) = โˆ… ) )
176 ralun โŠข ( ( โˆ€ ๐‘ฅ โˆˆ { ๐ถ } ( ๐น โ€˜ ๐‘ฅ ) = โˆ… โˆง โˆ€ ๐‘ฅ โˆˆ ( ๐ต โˆ– suc ๐ถ ) ( ๐น โ€˜ ๐‘ฅ ) = โˆ… ) โ†’ โˆ€ ๐‘ฅ โˆˆ ( { ๐ถ } โˆช ( ๐ต โˆ– suc ๐ถ ) ) ( ๐น โ€˜ ๐‘ฅ ) = โˆ… )
177 176 adantll โŠข ( ( ( ( ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ๐ถ โˆˆ On ) โˆง ๐ถ โˆˆ ๐ต ) โˆง ๐‘ = ๐ถ ) โˆง โˆ€ ๐‘ฅ โˆˆ { ๐ถ } ( ๐น โ€˜ ๐‘ฅ ) = โˆ… ) โˆง โˆ€ ๐‘ฅ โˆˆ ( ๐ต โˆ– suc ๐ถ ) ( ๐น โ€˜ ๐‘ฅ ) = โˆ… ) โ†’ โˆ€ ๐‘ฅ โˆˆ ( { ๐ถ } โˆช ( ๐ต โˆ– suc ๐ถ ) ) ( ๐น โ€˜ ๐‘ฅ ) = โˆ… )
178 undif3 โŠข ( { ๐ถ } โˆช ( ๐ต โˆ– suc ๐ถ ) ) = ( ( { ๐ถ } โˆช ๐ต ) โˆ– ( suc ๐ถ โˆ– { ๐ถ } ) )
179 simpr โŠข ( ( ๐ถ โˆˆ On โˆง ๐ถ โˆˆ ๐ต ) โ†’ ๐ถ โˆˆ ๐ต )
180 179 snssd โŠข ( ( ๐ถ โˆˆ On โˆง ๐ถ โˆˆ ๐ต ) โ†’ { ๐ถ } โŠ† ๐ต )
181 ssequn1 โŠข ( { ๐ถ } โŠ† ๐ต โ†” ( { ๐ถ } โˆช ๐ต ) = ๐ต )
182 180 181 sylib โŠข ( ( ๐ถ โˆˆ On โˆง ๐ถ โˆˆ ๐ต ) โ†’ ( { ๐ถ } โˆช ๐ต ) = ๐ต )
183 simpl โŠข ( ( ๐ถ โˆˆ On โˆง ๐ถ โˆˆ ๐ต ) โ†’ ๐ถ โˆˆ On )
184 eloni โŠข ( ๐ถ โˆˆ On โ†’ Ord ๐ถ )
185 orddif โŠข ( Ord ๐ถ โ†’ ๐ถ = ( suc ๐ถ โˆ– { ๐ถ } ) )
186 183 184 185 3syl โŠข ( ( ๐ถ โˆˆ On โˆง ๐ถ โˆˆ ๐ต ) โ†’ ๐ถ = ( suc ๐ถ โˆ– { ๐ถ } ) )
187 186 eqcomd โŠข ( ( ๐ถ โˆˆ On โˆง ๐ถ โˆˆ ๐ต ) โ†’ ( suc ๐ถ โˆ– { ๐ถ } ) = ๐ถ )
188 182 187 difeq12d โŠข ( ( ๐ถ โˆˆ On โˆง ๐ถ โˆˆ ๐ต ) โ†’ ( ( { ๐ถ } โˆช ๐ต ) โˆ– ( suc ๐ถ โˆ– { ๐ถ } ) ) = ( ๐ต โˆ– ๐ถ ) )
189 178 188 eqtrid โŠข ( ( ๐ถ โˆˆ On โˆง ๐ถ โˆˆ ๐ต ) โ†’ ( { ๐ถ } โˆช ( ๐ต โˆ– suc ๐ถ ) ) = ( ๐ต โˆ– ๐ถ ) )
190 189 adantll โŠข ( ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ๐ถ โˆˆ On ) โˆง ๐ถ โˆˆ ๐ต ) โ†’ ( { ๐ถ } โˆช ( ๐ต โˆ– suc ๐ถ ) ) = ( ๐ต โˆ– ๐ถ ) )
191 190 adantr โŠข ( ( ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ๐ถ โˆˆ On ) โˆง ๐ถ โˆˆ ๐ต ) โˆง ๐‘ = ๐ถ ) โ†’ ( { ๐ถ } โˆช ( ๐ต โˆ– suc ๐ถ ) ) = ( ๐ต โˆ– ๐ถ ) )
192 191 raleqdv โŠข ( ( ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ๐ถ โˆˆ On ) โˆง ๐ถ โˆˆ ๐ต ) โˆง ๐‘ = ๐ถ ) โ†’ ( โˆ€ ๐‘ฅ โˆˆ ( { ๐ถ } โˆช ( ๐ต โˆ– suc ๐ถ ) ) ( ๐น โ€˜ ๐‘ฅ ) = โˆ… โ†” โˆ€ ๐‘ฅ โˆˆ ( ๐ต โˆ– ๐ถ ) ( ๐น โ€˜ ๐‘ฅ ) = โˆ… ) )
193 192 ad2antrr โŠข ( ( ( ( ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ๐ถ โˆˆ On ) โˆง ๐ถ โˆˆ ๐ต ) โˆง ๐‘ = ๐ถ ) โˆง โˆ€ ๐‘ฅ โˆˆ { ๐ถ } ( ๐น โ€˜ ๐‘ฅ ) = โˆ… ) โˆง โˆ€ ๐‘ฅ โˆˆ ( ๐ต โˆ– suc ๐ถ ) ( ๐น โ€˜ ๐‘ฅ ) = โˆ… ) โ†’ ( โˆ€ ๐‘ฅ โˆˆ ( { ๐ถ } โˆช ( ๐ต โˆ– suc ๐ถ ) ) ( ๐น โ€˜ ๐‘ฅ ) = โˆ… โ†” โˆ€ ๐‘ฅ โˆˆ ( ๐ต โˆ– ๐ถ ) ( ๐น โ€˜ ๐‘ฅ ) = โˆ… ) )
194 177 193 mpbid โŠข ( ( ( ( ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ๐ถ โˆˆ On ) โˆง ๐ถ โˆˆ ๐ต ) โˆง ๐‘ = ๐ถ ) โˆง โˆ€ ๐‘ฅ โˆˆ { ๐ถ } ( ๐น โ€˜ ๐‘ฅ ) = โˆ… ) โˆง โˆ€ ๐‘ฅ โˆˆ ( ๐ต โˆ– suc ๐ถ ) ( ๐น โ€˜ ๐‘ฅ ) = โˆ… ) โ†’ โˆ€ ๐‘ฅ โˆˆ ( ๐ต โˆ– ๐ถ ) ( ๐น โ€˜ ๐‘ฅ ) = โˆ… )
195 194 ex โŠข ( ( ( ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ๐ถ โˆˆ On ) โˆง ๐ถ โˆˆ ๐ต ) โˆง ๐‘ = ๐ถ ) โˆง โˆ€ ๐‘ฅ โˆˆ { ๐ถ } ( ๐น โ€˜ ๐‘ฅ ) = โˆ… ) โ†’ ( โˆ€ ๐‘ฅ โˆˆ ( ๐ต โˆ– suc ๐ถ ) ( ๐น โ€˜ ๐‘ฅ ) = โˆ… โ†’ โˆ€ ๐‘ฅ โˆˆ ( ๐ต โˆ– ๐ถ ) ( ๐น โ€˜ ๐‘ฅ ) = โˆ… ) )
196 175 195 syld โŠข ( ( ( ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ๐ถ โˆˆ On ) โˆง ๐ถ โˆˆ ๐ต ) โˆง ๐‘ = ๐ถ ) โˆง โˆ€ ๐‘ฅ โˆˆ { ๐ถ } ( ๐น โ€˜ ๐‘ฅ ) = โˆ… ) โ†’ ( โˆ€ ๐‘ฅ โˆˆ ๐ต ( ๐‘ โˆˆ ๐‘ฅ โ†’ ( ๐น โ€˜ ๐‘ฅ ) = ( ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ€˜ ๐‘ฅ ) ) โ†’ โˆ€ ๐‘ฅ โˆˆ ( ๐ต โˆ– ๐ถ ) ( ๐น โ€˜ ๐‘ฅ ) = โˆ… ) )
197 196 expl โŠข ( ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ๐ถ โˆˆ On ) โˆง ๐ถ โˆˆ ๐ต ) โ†’ ( ( ๐‘ = ๐ถ โˆง โˆ€ ๐‘ฅ โˆˆ { ๐ถ } ( ๐น โ€˜ ๐‘ฅ ) = โˆ… ) โ†’ ( โˆ€ ๐‘ฅ โˆˆ ๐ต ( ๐‘ โˆˆ ๐‘ฅ โ†’ ( ๐น โ€˜ ๐‘ฅ ) = ( ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ€˜ ๐‘ฅ ) ) โ†’ โˆ€ ๐‘ฅ โˆˆ ( ๐ต โˆ– ๐ถ ) ( ๐น โ€˜ ๐‘ฅ ) = โˆ… ) ) )
198 114 119 197 3syld โŠข ( ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ๐ถ โˆˆ On ) โˆง ๐ถ โˆˆ ๐ต ) โ†’ ( ( ๐‘ โˆˆ ๐ต โˆง ( ๐น โ€˜ ๐‘ ) โˆˆ ( ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ€˜ ๐‘ ) ) โ†’ ( โˆ€ ๐‘ฅ โˆˆ ๐ต ( ๐‘ โˆˆ ๐‘ฅ โ†’ ( ๐น โ€˜ ๐‘ฅ ) = ( ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ€˜ ๐‘ฅ ) ) โ†’ โˆ€ ๐‘ฅ โˆˆ ( ๐ต โˆ– ๐ถ ) ( ๐น โ€˜ ๐‘ฅ ) = โˆ… ) ) )
199 198 expdimp โŠข ( ( ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ๐ถ โˆˆ On ) โˆง ๐ถ โˆˆ ๐ต ) โˆง ๐‘ โˆˆ ๐ต ) โ†’ ( ( ๐น โ€˜ ๐‘ ) โˆˆ ( ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ€˜ ๐‘ ) โ†’ ( โˆ€ ๐‘ฅ โˆˆ ๐ต ( ๐‘ โˆˆ ๐‘ฅ โ†’ ( ๐น โ€˜ ๐‘ฅ ) = ( ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ€˜ ๐‘ฅ ) ) โ†’ โˆ€ ๐‘ฅ โˆˆ ( ๐ต โˆ– ๐ถ ) ( ๐น โ€˜ ๐‘ฅ ) = โˆ… ) ) )
200 199 impd โŠข ( ( ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ๐ถ โˆˆ On ) โˆง ๐ถ โˆˆ ๐ต ) โˆง ๐‘ โˆˆ ๐ต ) โ†’ ( ( ( ๐น โ€˜ ๐‘ ) โˆˆ ( ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ€˜ ๐‘ ) โˆง โˆ€ ๐‘ฅ โˆˆ ๐ต ( ๐‘ โˆˆ ๐‘ฅ โ†’ ( ๐น โ€˜ ๐‘ฅ ) = ( ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ€˜ ๐‘ฅ ) ) ) โ†’ โˆ€ ๐‘ฅ โˆˆ ( ๐ต โˆ– ๐ถ ) ( ๐น โ€˜ ๐‘ฅ ) = โˆ… ) )
201 200 rexlimdva โŠข ( ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ๐ถ โˆˆ On ) โˆง ๐ถ โˆˆ ๐ต ) โ†’ ( โˆƒ ๐‘ โˆˆ ๐ต ( ( ๐น โ€˜ ๐‘ ) โˆˆ ( ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ€˜ ๐‘ ) โˆง โˆ€ ๐‘ฅ โˆˆ ๐ต ( ๐‘ โˆˆ ๐‘ฅ โ†’ ( ๐น โ€˜ ๐‘ฅ ) = ( ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ€˜ ๐‘ฅ ) ) ) โ†’ โˆ€ ๐‘ฅ โˆˆ ( ๐ต โˆ– ๐ถ ) ( ๐น โ€˜ ๐‘ฅ ) = โˆ… ) )
202 201 adantld โŠข ( ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ๐ถ โˆˆ On ) โˆง ๐ถ โˆˆ ๐ต ) โ†’ ( ( ( ๐น โˆˆ V โˆง ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โˆˆ V ) โˆง โˆƒ ๐‘ โˆˆ ๐ต ( ( ๐น โ€˜ ๐‘ ) โˆˆ ( ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ€˜ ๐‘ ) โˆง โˆ€ ๐‘ฅ โˆˆ ๐ต ( ๐‘ โˆˆ ๐‘ฅ โ†’ ( ๐น โ€˜ ๐‘ฅ ) = ( ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ€˜ ๐‘ฅ ) ) ) ) โ†’ โˆ€ ๐‘ฅ โˆˆ ( ๐ต โˆ– ๐ถ ) ( ๐น โ€˜ ๐‘ฅ ) = โˆ… ) )
203 84 202 biimtrid โŠข ( ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ๐ถ โˆˆ On ) โˆง ๐ถ โˆˆ ๐ต ) โ†’ ( ๐น { โŸจ ๐‘Ž , ๐‘ โŸฉ โˆฃ โˆƒ ๐‘ โˆˆ ๐ต ( ( ๐‘Ž โ€˜ ๐‘ ) โˆˆ ( ๐‘ โ€˜ ๐‘ ) โˆง โˆ€ ๐‘ฅ โˆˆ ๐ต ( ๐‘ โˆˆ ๐‘ฅ โ†’ ( ๐‘Ž โ€˜ ๐‘ฅ ) = ( ๐‘ โ€˜ ๐‘ฅ ) ) ) } ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ†’ โˆ€ ๐‘ฅ โˆˆ ( ๐ต โˆ– ๐ถ ) ( ๐น โ€˜ ๐‘ฅ ) = โˆ… ) )
204 203 adantlrr โŠข ( ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ( ๐ถ โˆˆ On โˆง ๐น โˆˆ dom ( ๐ด CNF ๐ต ) ) ) โˆง ๐ถ โˆˆ ๐ต ) โ†’ ( ๐น { โŸจ ๐‘Ž , ๐‘ โŸฉ โˆฃ โˆƒ ๐‘ โˆˆ ๐ต ( ( ๐‘Ž โ€˜ ๐‘ ) โˆˆ ( ๐‘ โ€˜ ๐‘ ) โˆง โˆ€ ๐‘ฅ โˆˆ ๐ต ( ๐‘ โˆˆ ๐‘ฅ โ†’ ( ๐‘Ž โ€˜ ๐‘ฅ ) = ( ๐‘ โ€˜ ๐‘ฅ ) ) ) } ( ๐‘ฆ โˆˆ ๐ต โ†ฆ if ( ๐‘ฆ = ๐ถ , 1o , โˆ… ) ) โ†’ โˆ€ ๐‘ฅ โˆˆ ( ๐ต โˆ– ๐ถ ) ( ๐น โ€˜ ๐‘ฅ ) = โˆ… ) )
205 67 204 sylbid โŠข ( ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ( ๐ถ โˆˆ On โˆง ๐น โˆˆ dom ( ๐ด CNF ๐ต ) ) ) โˆง ๐ถ โˆˆ ๐ต ) โ†’ ( ( ( ๐ด CNF ๐ต ) โ€˜ ๐น ) โˆˆ ( ๐ด โ†‘o ๐ถ ) โ†’ โˆ€ ๐‘ฅ โˆˆ ( ๐ต โˆ– ๐ถ ) ( ๐น โ€˜ ๐‘ฅ ) = โˆ… ) )
206 205 ex โŠข ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ( ๐ถ โˆˆ On โˆง ๐น โˆˆ dom ( ๐ด CNF ๐ต ) ) ) โ†’ ( ๐ถ โˆˆ ๐ต โ†’ ( ( ( ๐ด CNF ๐ต ) โ€˜ ๐น ) โˆˆ ( ๐ด โ†‘o ๐ถ ) โ†’ โˆ€ ๐‘ฅ โˆˆ ( ๐ต โˆ– ๐ถ ) ( ๐น โ€˜ ๐‘ฅ ) = โˆ… ) ) )
207 ral0 โŠข โˆ€ ๐‘ฅ โˆˆ โˆ… ( ๐น โ€˜ ๐‘ฅ ) = โˆ…
208 ssdif0 โŠข ( ๐ต โŠ† ๐ถ โ†” ( ๐ต โˆ– ๐ถ ) = โˆ… )
209 208 biimpi โŠข ( ๐ต โŠ† ๐ถ โ†’ ( ๐ต โˆ– ๐ถ ) = โˆ… )
210 209 raleqdv โŠข ( ๐ต โŠ† ๐ถ โ†’ ( โˆ€ ๐‘ฅ โˆˆ ( ๐ต โˆ– ๐ถ ) ( ๐น โ€˜ ๐‘ฅ ) = โˆ… โ†” โˆ€ ๐‘ฅ โˆˆ โˆ… ( ๐น โ€˜ ๐‘ฅ ) = โˆ… ) )
211 207 210 mpbiri โŠข ( ๐ต โŠ† ๐ถ โ†’ โˆ€ ๐‘ฅ โˆˆ ( ๐ต โˆ– ๐ถ ) ( ๐น โ€˜ ๐‘ฅ ) = โˆ… )
212 211 a1i13 โŠข ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ( ๐ถ โˆˆ On โˆง ๐น โˆˆ dom ( ๐ด CNF ๐ต ) ) ) โ†’ ( ๐ต โŠ† ๐ถ โ†’ ( ( ( ๐ด CNF ๐ต ) โ€˜ ๐น ) โˆˆ ( ๐ด โ†‘o ๐ถ ) โ†’ โˆ€ ๐‘ฅ โˆˆ ( ๐ต โˆ– ๐ถ ) ( ๐น โ€˜ ๐‘ฅ ) = โˆ… ) ) )
213 184 adantr โŠข ( ( ๐ถ โˆˆ On โˆง ๐น โˆˆ dom ( ๐ด CNF ๐ต ) ) โ†’ Ord ๐ถ )
214 153 adantl โŠข ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โ†’ Ord ๐ต )
215 ordtri2or โŠข ( ( Ord ๐ถ โˆง Ord ๐ต ) โ†’ ( ๐ถ โˆˆ ๐ต โˆจ ๐ต โŠ† ๐ถ ) )
216 213 214 215 syl2anr โŠข ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ( ๐ถ โˆˆ On โˆง ๐น โˆˆ dom ( ๐ด CNF ๐ต ) ) ) โ†’ ( ๐ถ โˆˆ ๐ต โˆจ ๐ต โŠ† ๐ถ ) )
217 206 212 216 mpjaod โŠข ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ( ๐ถ โˆˆ On โˆง ๐น โˆˆ dom ( ๐ด CNF ๐ต ) ) ) โ†’ ( ( ( ๐ด CNF ๐ต ) โ€˜ ๐น ) โˆˆ ( ๐ด โ†‘o ๐ถ ) โ†’ โˆ€ ๐‘ฅ โˆˆ ( ๐ต โˆ– ๐ถ ) ( ๐น โ€˜ ๐‘ฅ ) = โˆ… ) )
218 3 ad2antrr โŠข ( ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ( ๐ถ โˆˆ On โˆง ๐น โˆˆ dom ( ๐ด CNF ๐ต ) ) ) โˆง โˆ€ ๐‘ฅ โˆˆ ( ๐ต โˆ– ๐ถ ) ( ๐น โ€˜ ๐‘ฅ ) = โˆ… ) โ†’ ๐ด โˆˆ On )
219 simpllr โŠข ( ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ( ๐ถ โˆˆ On โˆง ๐น โˆˆ dom ( ๐ด CNF ๐ต ) ) ) โˆง โˆ€ ๐‘ฅ โˆˆ ( ๐ต โˆ– ๐ถ ) ( ๐น โ€˜ ๐‘ฅ ) = โˆ… ) โ†’ ๐ต โˆˆ On )
220 simplrr โŠข ( ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ( ๐ถ โˆˆ On โˆง ๐น โˆˆ dom ( ๐ด CNF ๐ต ) ) ) โˆง โˆ€ ๐‘ฅ โˆˆ ( ๐ต โˆ– ๐ถ ) ( ๐น โ€˜ ๐‘ฅ ) = โˆ… ) โ†’ ๐น โˆˆ dom ( ๐ด CNF ๐ต ) )
221 15 ad2antrr โŠข ( ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ( ๐ถ โˆˆ On โˆง ๐น โˆˆ dom ( ๐ด CNF ๐ต ) ) ) โˆง โˆ€ ๐‘ฅ โˆˆ ( ๐ต โˆ– ๐ถ ) ( ๐น โ€˜ ๐‘ฅ ) = โˆ… ) โ†’ โˆ… โˆˆ ๐ด )
222 simplrl โŠข ( ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ( ๐ถ โˆˆ On โˆง ๐น โˆˆ dom ( ๐ด CNF ๐ต ) ) ) โˆง โˆ€ ๐‘ฅ โˆˆ ( ๐ต โˆ– ๐ถ ) ( ๐น โ€˜ ๐‘ฅ ) = โˆ… ) โ†’ ๐ถ โˆˆ On )
223 1 3 4 cantnfs โŠข ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โ†’ ( ๐น โˆˆ dom ( ๐ด CNF ๐ต ) โ†” ( ๐น : ๐ต โŸถ ๐ด โˆง ๐น finSupp โˆ… ) ) )
224 223 biimpd โŠข ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โ†’ ( ๐น โˆˆ dom ( ๐ด CNF ๐ต ) โ†’ ( ๐น : ๐ต โŸถ ๐ด โˆง ๐น finSupp โˆ… ) ) )
225 224 adantld โŠข ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โ†’ ( ( ๐ถ โˆˆ On โˆง ๐น โˆˆ dom ( ๐ด CNF ๐ต ) ) โ†’ ( ๐น : ๐ต โŸถ ๐ด โˆง ๐น finSupp โˆ… ) ) )
226 225 imp โŠข ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ( ๐ถ โˆˆ On โˆง ๐น โˆˆ dom ( ๐ด CNF ๐ต ) ) ) โ†’ ( ๐น : ๐ต โŸถ ๐ด โˆง ๐น finSupp โˆ… ) )
227 226 simpld โŠข ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ( ๐ถ โˆˆ On โˆง ๐น โˆˆ dom ( ๐ด CNF ๐ต ) ) ) โ†’ ๐น : ๐ต โŸถ ๐ด )
228 227 adantr โŠข ( ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ( ๐ถ โˆˆ On โˆง ๐น โˆˆ dom ( ๐ด CNF ๐ต ) ) ) โˆง โˆ€ ๐‘ฅ โˆˆ ( ๐ต โˆ– ๐ถ ) ( ๐น โ€˜ ๐‘ฅ ) = โˆ… ) โ†’ ๐น : ๐ต โŸถ ๐ด )
229 fveqeq2 โŠข ( ๐‘ฅ = ๐‘ฆ โ†’ ( ( ๐น โ€˜ ๐‘ฅ ) = โˆ… โ†” ( ๐น โ€˜ ๐‘ฆ ) = โˆ… ) )
230 229 rspccv โŠข ( โˆ€ ๐‘ฅ โˆˆ ( ๐ต โˆ– ๐ถ ) ( ๐น โ€˜ ๐‘ฅ ) = โˆ… โ†’ ( ๐‘ฆ โˆˆ ( ๐ต โˆ– ๐ถ ) โ†’ ( ๐น โ€˜ ๐‘ฆ ) = โˆ… ) )
231 230 adantl โŠข ( ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ( ๐ถ โˆˆ On โˆง ๐น โˆˆ dom ( ๐ด CNF ๐ต ) ) ) โˆง โˆ€ ๐‘ฅ โˆˆ ( ๐ต โˆ– ๐ถ ) ( ๐น โ€˜ ๐‘ฅ ) = โˆ… ) โ†’ ( ๐‘ฆ โˆˆ ( ๐ต โˆ– ๐ถ ) โ†’ ( ๐น โ€˜ ๐‘ฆ ) = โˆ… ) )
232 231 imp โŠข ( ( ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ( ๐ถ โˆˆ On โˆง ๐น โˆˆ dom ( ๐ด CNF ๐ต ) ) ) โˆง โˆ€ ๐‘ฅ โˆˆ ( ๐ต โˆ– ๐ถ ) ( ๐น โ€˜ ๐‘ฅ ) = โˆ… ) โˆง ๐‘ฆ โˆˆ ( ๐ต โˆ– ๐ถ ) ) โ†’ ( ๐น โ€˜ ๐‘ฆ ) = โˆ… )
233 228 232 suppss โŠข ( ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ( ๐ถ โˆˆ On โˆง ๐น โˆˆ dom ( ๐ด CNF ๐ต ) ) ) โˆง โˆ€ ๐‘ฅ โˆˆ ( ๐ต โˆ– ๐ถ ) ( ๐น โ€˜ ๐‘ฅ ) = โˆ… ) โ†’ ( ๐น supp โˆ… ) โŠ† ๐ถ )
234 1 218 219 220 221 222 233 cantnflt2 โŠข ( ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ( ๐ถ โˆˆ On โˆง ๐น โˆˆ dom ( ๐ด CNF ๐ต ) ) ) โˆง โˆ€ ๐‘ฅ โˆˆ ( ๐ต โˆ– ๐ถ ) ( ๐น โ€˜ ๐‘ฅ ) = โˆ… ) โ†’ ( ( ๐ด CNF ๐ต ) โ€˜ ๐น ) โˆˆ ( ๐ด โ†‘o ๐ถ ) )
235 234 ex โŠข ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ( ๐ถ โˆˆ On โˆง ๐น โˆˆ dom ( ๐ด CNF ๐ต ) ) ) โ†’ ( โˆ€ ๐‘ฅ โˆˆ ( ๐ต โˆ– ๐ถ ) ( ๐น โ€˜ ๐‘ฅ ) = โˆ… โ†’ ( ( ๐ด CNF ๐ต ) โ€˜ ๐น ) โˆˆ ( ๐ด โ†‘o ๐ถ ) ) )
236 217 235 impbid โŠข ( ( ( ๐ด โˆˆ ( On โˆ– 2o ) โˆง ๐ต โˆˆ On ) โˆง ( ๐ถ โˆˆ On โˆง ๐น โˆˆ dom ( ๐ด CNF ๐ต ) ) ) โ†’ ( ( ( ๐ด CNF ๐ต ) โ€˜ ๐น ) โˆˆ ( ๐ด โ†‘o ๐ถ ) โ†” โˆ€ ๐‘ฅ โˆˆ ( ๐ต โˆ– ๐ถ ) ( ๐น โ€˜ ๐‘ฅ ) = โˆ… ) )