Metamath Proof Explorer


Theorem acsfn2

Description: Algebraicity of a two-argument closure condition. (Contributed by Stefan O'Rear, 3-Apr-2015)

Ref Expression
Assertion acsfn2 XVbXcXEXa𝒫X|bacaEaACSX

Proof

Step Hyp Ref Expression
1 elpwi a𝒫XaX
2 ralss aXbacaEabXbacaEa
3 ralss aXcabaEacXcabaEa
4 r19.21v cabaEabacaEa
5 impexp cabaEacabaEa
6 vex cV
7 vex bV
8 6 7 prss cabacba
9 8 imbi1i cabaEacbaEa
10 5 9 bitr3i cabaEacbaEa
11 10 ralbii cXcabaEacXcbaEa
12 3 4 11 3bitr3g aXbacaEacXcbaEa
13 12 ralbidv aXbXbacaEabXcXcbaEa
14 2 13 bitrd aXbacaEabXcXcbaEa
15 1 14 syl a𝒫XbacaEabXcXcbaEa
16 15 rabbiia a𝒫X|bacaEa=a𝒫X|bXcXcbaEa
17 riinrab 𝒫XbXa𝒫X|cXcbaEa=a𝒫X|bXcXcbaEa
18 16 17 eqtr4i a𝒫X|bacaEa=𝒫XbXa𝒫X|cXcbaEa
19 mreacs XVACSXMoore𝒫X
20 riinrab 𝒫XcXa𝒫X|cbaEa=a𝒫X|cXcbaEa
21 19 ad2antrr XVbXcXEXACSXMoore𝒫X
22 simpll XVbXcXEXXV
23 simprr XVbXcXEXEX
24 prssi cXbXcbX
25 24 ancoms bXcXcbX
26 25 ad2ant2lr XVbXcXEXcbX
27 prfi cbFin
28 27 a1i XVbXcXEXcbFin
29 acsfn XVEXcbXcbFina𝒫X|cbaEaACSX
30 22 23 26 28 29 syl22anc XVbXcXEXa𝒫X|cbaEaACSX
31 30 expr XVbXcXEXa𝒫X|cbaEaACSX
32 31 ralimdva XVbXcXEXcXa𝒫X|cbaEaACSX
33 32 imp XVbXcXEXcXa𝒫X|cbaEaACSX
34 mreriincl ACSXMoore𝒫XcXa𝒫X|cbaEaACSX𝒫XcXa𝒫X|cbaEaACSX
35 21 33 34 syl2anc XVbXcXEX𝒫XcXa𝒫X|cbaEaACSX
36 20 35 eqeltrrid XVbXcXEXa𝒫X|cXcbaEaACSX
37 36 ex XVbXcXEXa𝒫X|cXcbaEaACSX
38 37 ralimdva XVbXcXEXbXa𝒫X|cXcbaEaACSX
39 38 imp XVbXcXEXbXa𝒫X|cXcbaEaACSX
40 mreriincl ACSXMoore𝒫XbXa𝒫X|cXcbaEaACSX𝒫XbXa𝒫X|cXcbaEaACSX
41 19 39 40 syl2an2r XVbXcXEX𝒫XbXa𝒫X|cXcbaEaACSX
42 18 41 eqeltrid XVbXcXEXa𝒫X|bacaEaACSX