Metamath Proof Explorer


Theorem acsfiindd

Description: In an algebraic closure system, a set is independent if and only if all its finite subsets are independent. Part of Proposition 4.1.3 in FaureFrolicher p. 83. (Contributed by David Moews, 1-May-2017)

Ref Expression
Hypotheses acsfiindd.1 ( 𝜑𝐴 ∈ ( ACS ‘ 𝑋 ) )
acsfiindd.2 𝑁 = ( mrCls ‘ 𝐴 )
acsfiindd.3 𝐼 = ( mrInd ‘ 𝐴 )
acsfiindd.4 ( 𝜑𝑆𝑋 )
Assertion acsfiindd ( 𝜑 → ( 𝑆𝐼 ↔ ( 𝒫 𝑆 ∩ Fin ) ⊆ 𝐼 ) )

Proof

Step Hyp Ref Expression
1 acsfiindd.1 ( 𝜑𝐴 ∈ ( ACS ‘ 𝑋 ) )
2 acsfiindd.2 𝑁 = ( mrCls ‘ 𝐴 )
3 acsfiindd.3 𝐼 = ( mrInd ‘ 𝐴 )
4 acsfiindd.4 ( 𝜑𝑆𝑋 )
5 1 acsmred ( 𝜑𝐴 ∈ ( Moore ‘ 𝑋 ) )
6 5 ad2antrr ( ( ( 𝜑𝑆𝐼 ) ∧ 𝑠 ∈ ( 𝒫 𝑆 ∩ Fin ) ) → 𝐴 ∈ ( Moore ‘ 𝑋 ) )
7 simplr ( ( ( 𝜑𝑆𝐼 ) ∧ 𝑠 ∈ ( 𝒫 𝑆 ∩ Fin ) ) → 𝑆𝐼 )
8 simpr ( ( ( 𝜑𝑆𝐼 ) ∧ 𝑠 ∈ ( 𝒫 𝑆 ∩ Fin ) ) → 𝑠 ∈ ( 𝒫 𝑆 ∩ Fin ) )
9 8 elin1d ( ( ( 𝜑𝑆𝐼 ) ∧ 𝑠 ∈ ( 𝒫 𝑆 ∩ Fin ) ) → 𝑠 ∈ 𝒫 𝑆 )
10 9 elpwid ( ( ( 𝜑𝑆𝐼 ) ∧ 𝑠 ∈ ( 𝒫 𝑆 ∩ Fin ) ) → 𝑠𝑆 )
11 6 2 3 7 10 mrissmrid ( ( ( 𝜑𝑆𝐼 ) ∧ 𝑠 ∈ ( 𝒫 𝑆 ∩ Fin ) ) → 𝑠𝐼 )
12 11 ralrimiva ( ( 𝜑𝑆𝐼 ) → ∀ 𝑠 ∈ ( 𝒫 𝑆 ∩ Fin ) 𝑠𝐼 )
13 dfss3 ( ( 𝒫 𝑆 ∩ Fin ) ⊆ 𝐼 ↔ ∀ 𝑠 ∈ ( 𝒫 𝑆 ∩ Fin ) 𝑠𝐼 )
14 12 13 sylibr ( ( 𝜑𝑆𝐼 ) → ( 𝒫 𝑆 ∩ Fin ) ⊆ 𝐼 )
15 5 adantr ( ( 𝜑 ∧ ( 𝒫 𝑆 ∩ Fin ) ⊆ 𝐼 ) → 𝐴 ∈ ( Moore ‘ 𝑋 ) )
16 4 adantr ( ( 𝜑 ∧ ( 𝒫 𝑆 ∩ Fin ) ⊆ 𝐼 ) → 𝑆𝑋 )
17 simpr ( ( ( 𝜑𝑥𝑆 ) ∧ 𝑡 ∈ ( 𝒫 ( 𝑆 ∖ { 𝑥 } ) ∩ Fin ) ) → 𝑡 ∈ ( 𝒫 ( 𝑆 ∖ { 𝑥 } ) ∩ Fin ) )
18 elfpw ( 𝑡 ∈ ( 𝒫 ( 𝑆 ∖ { 𝑥 } ) ∩ Fin ) ↔ ( 𝑡 ⊆ ( 𝑆 ∖ { 𝑥 } ) ∧ 𝑡 ∈ Fin ) )
19 17 18 sylib ( ( ( 𝜑𝑥𝑆 ) ∧ 𝑡 ∈ ( 𝒫 ( 𝑆 ∖ { 𝑥 } ) ∩ Fin ) ) → ( 𝑡 ⊆ ( 𝑆 ∖ { 𝑥 } ) ∧ 𝑡 ∈ Fin ) )
20 19 simpld ( ( ( 𝜑𝑥𝑆 ) ∧ 𝑡 ∈ ( 𝒫 ( 𝑆 ∖ { 𝑥 } ) ∩ Fin ) ) → 𝑡 ⊆ ( 𝑆 ∖ { 𝑥 } ) )
21 20 difss2d ( ( ( 𝜑𝑥𝑆 ) ∧ 𝑡 ∈ ( 𝒫 ( 𝑆 ∖ { 𝑥 } ) ∩ Fin ) ) → 𝑡𝑆 )
22 simplr ( ( ( 𝜑𝑥𝑆 ) ∧ 𝑡 ∈ ( 𝒫 ( 𝑆 ∖ { 𝑥 } ) ∩ Fin ) ) → 𝑥𝑆 )
23 22 snssd ( ( ( 𝜑𝑥𝑆 ) ∧ 𝑡 ∈ ( 𝒫 ( 𝑆 ∖ { 𝑥 } ) ∩ Fin ) ) → { 𝑥 } ⊆ 𝑆 )
24 21 23 unssd ( ( ( 𝜑𝑥𝑆 ) ∧ 𝑡 ∈ ( 𝒫 ( 𝑆 ∖ { 𝑥 } ) ∩ Fin ) ) → ( 𝑡 ∪ { 𝑥 } ) ⊆ 𝑆 )
25 19 simprd ( ( ( 𝜑𝑥𝑆 ) ∧ 𝑡 ∈ ( 𝒫 ( 𝑆 ∖ { 𝑥 } ) ∩ Fin ) ) → 𝑡 ∈ Fin )
26 snfi { 𝑥 } ∈ Fin
27 unfi ( ( 𝑡 ∈ Fin ∧ { 𝑥 } ∈ Fin ) → ( 𝑡 ∪ { 𝑥 } ) ∈ Fin )
28 25 26 27 sylancl ( ( ( 𝜑𝑥𝑆 ) ∧ 𝑡 ∈ ( 𝒫 ( 𝑆 ∖ { 𝑥 } ) ∩ Fin ) ) → ( 𝑡 ∪ { 𝑥 } ) ∈ Fin )
29 elfpw ( ( 𝑡 ∪ { 𝑥 } ) ∈ ( 𝒫 𝑆 ∩ Fin ) ↔ ( ( 𝑡 ∪ { 𝑥 } ) ⊆ 𝑆 ∧ ( 𝑡 ∪ { 𝑥 } ) ∈ Fin ) )
30 24 28 29 sylanbrc ( ( ( 𝜑𝑥𝑆 ) ∧ 𝑡 ∈ ( 𝒫 ( 𝑆 ∖ { 𝑥 } ) ∩ Fin ) ) → ( 𝑡 ∪ { 𝑥 } ) ∈ ( 𝒫 𝑆 ∩ Fin ) )
31 5 ad4antr ( ( ( ( ( 𝜑𝑥𝑆 ) ∧ 𝑡 ∈ ( 𝒫 ( 𝑆 ∖ { 𝑥 } ) ∩ Fin ) ) ∧ 𝑠 = ( 𝑡 ∪ { 𝑥 } ) ) ∧ 𝑠𝐼 ) → 𝐴 ∈ ( Moore ‘ 𝑋 ) )
32 simpr ( ( ( ( ( 𝜑𝑥𝑆 ) ∧ 𝑡 ∈ ( 𝒫 ( 𝑆 ∖ { 𝑥 } ) ∩ Fin ) ) ∧ 𝑠 = ( 𝑡 ∪ { 𝑥 } ) ) ∧ 𝑠𝐼 ) → 𝑠𝐼 )
33 simpllr ( ( ( ( 𝜑𝑥𝑆 ) ∧ 𝑡 ∈ ( 𝒫 ( 𝑆 ∖ { 𝑥 } ) ∩ Fin ) ) ∧ 𝑠 = ( 𝑡 ∪ { 𝑥 } ) ) → 𝑥𝑆 )
34 snidg ( 𝑥𝑆𝑥 ∈ { 𝑥 } )
35 elun2 ( 𝑥 ∈ { 𝑥 } → 𝑥 ∈ ( 𝑡 ∪ { 𝑥 } ) )
36 33 34 35 3syl ( ( ( ( 𝜑𝑥𝑆 ) ∧ 𝑡 ∈ ( 𝒫 ( 𝑆 ∖ { 𝑥 } ) ∩ Fin ) ) ∧ 𝑠 = ( 𝑡 ∪ { 𝑥 } ) ) → 𝑥 ∈ ( 𝑡 ∪ { 𝑥 } ) )
37 simpr ( ( ( ( 𝜑𝑥𝑆 ) ∧ 𝑡 ∈ ( 𝒫 ( 𝑆 ∖ { 𝑥 } ) ∩ Fin ) ) ∧ 𝑠 = ( 𝑡 ∪ { 𝑥 } ) ) → 𝑠 = ( 𝑡 ∪ { 𝑥 } ) )
38 36 37 eleqtrrd ( ( ( ( 𝜑𝑥𝑆 ) ∧ 𝑡 ∈ ( 𝒫 ( 𝑆 ∖ { 𝑥 } ) ∩ Fin ) ) ∧ 𝑠 = ( 𝑡 ∪ { 𝑥 } ) ) → 𝑥𝑠 )
39 38 adantr ( ( ( ( ( 𝜑𝑥𝑆 ) ∧ 𝑡 ∈ ( 𝒫 ( 𝑆 ∖ { 𝑥 } ) ∩ Fin ) ) ∧ 𝑠 = ( 𝑡 ∪ { 𝑥 } ) ) ∧ 𝑠𝐼 ) → 𝑥𝑠 )
40 2 3 31 32 39 ismri2dad ( ( ( ( ( 𝜑𝑥𝑆 ) ∧ 𝑡 ∈ ( 𝒫 ( 𝑆 ∖ { 𝑥 } ) ∩ Fin ) ) ∧ 𝑠 = ( 𝑡 ∪ { 𝑥 } ) ) ∧ 𝑠𝐼 ) → ¬ 𝑥 ∈ ( 𝑁 ‘ ( 𝑠 ∖ { 𝑥 } ) ) )
41 5 ad3antrrr ( ( ( ( 𝜑𝑥𝑆 ) ∧ 𝑡 ∈ ( 𝒫 ( 𝑆 ∖ { 𝑥 } ) ∩ Fin ) ) ∧ 𝑠 = ( 𝑡 ∪ { 𝑥 } ) ) → 𝐴 ∈ ( Moore ‘ 𝑋 ) )
42 20 adantr ( ( ( ( 𝜑𝑥𝑆 ) ∧ 𝑡 ∈ ( 𝒫 ( 𝑆 ∖ { 𝑥 } ) ∩ Fin ) ) ∧ 𝑠 = ( 𝑡 ∪ { 𝑥 } ) ) → 𝑡 ⊆ ( 𝑆 ∖ { 𝑥 } ) )
43 neldifsnd ( ( ( ( 𝜑𝑥𝑆 ) ∧ 𝑡 ∈ ( 𝒫 ( 𝑆 ∖ { 𝑥 } ) ∩ Fin ) ) ∧ 𝑠 = ( 𝑡 ∪ { 𝑥 } ) ) → ¬ 𝑥 ∈ ( 𝑆 ∖ { 𝑥 } ) )
44 42 43 ssneldd ( ( ( ( 𝜑𝑥𝑆 ) ∧ 𝑡 ∈ ( 𝒫 ( 𝑆 ∖ { 𝑥 } ) ∩ Fin ) ) ∧ 𝑠 = ( 𝑡 ∪ { 𝑥 } ) ) → ¬ 𝑥𝑡 )
45 difsnb ( ¬ 𝑥𝑡 ↔ ( 𝑡 ∖ { 𝑥 } ) = 𝑡 )
46 44 45 sylib ( ( ( ( 𝜑𝑥𝑆 ) ∧ 𝑡 ∈ ( 𝒫 ( 𝑆 ∖ { 𝑥 } ) ∩ Fin ) ) ∧ 𝑠 = ( 𝑡 ∪ { 𝑥 } ) ) → ( 𝑡 ∖ { 𝑥 } ) = 𝑡 )
47 ssun1 𝑡 ⊆ ( 𝑡 ∪ { 𝑥 } )
48 47 37 sseqtrrid ( ( ( ( 𝜑𝑥𝑆 ) ∧ 𝑡 ∈ ( 𝒫 ( 𝑆 ∖ { 𝑥 } ) ∩ Fin ) ) ∧ 𝑠 = ( 𝑡 ∪ { 𝑥 } ) ) → 𝑡𝑠 )
49 48 ssdifd ( ( ( ( 𝜑𝑥𝑆 ) ∧ 𝑡 ∈ ( 𝒫 ( 𝑆 ∖ { 𝑥 } ) ∩ Fin ) ) ∧ 𝑠 = ( 𝑡 ∪ { 𝑥 } ) ) → ( 𝑡 ∖ { 𝑥 } ) ⊆ ( 𝑠 ∖ { 𝑥 } ) )
50 46 49 eqsstrrd ( ( ( ( 𝜑𝑥𝑆 ) ∧ 𝑡 ∈ ( 𝒫 ( 𝑆 ∖ { 𝑥 } ) ∩ Fin ) ) ∧ 𝑠 = ( 𝑡 ∪ { 𝑥 } ) ) → 𝑡 ⊆ ( 𝑠 ∖ { 𝑥 } ) )
51 24 adantr ( ( ( ( 𝜑𝑥𝑆 ) ∧ 𝑡 ∈ ( 𝒫 ( 𝑆 ∖ { 𝑥 } ) ∩ Fin ) ) ∧ 𝑠 = ( 𝑡 ∪ { 𝑥 } ) ) → ( 𝑡 ∪ { 𝑥 } ) ⊆ 𝑆 )
52 4 ad3antrrr ( ( ( ( 𝜑𝑥𝑆 ) ∧ 𝑡 ∈ ( 𝒫 ( 𝑆 ∖ { 𝑥 } ) ∩ Fin ) ) ∧ 𝑠 = ( 𝑡 ∪ { 𝑥 } ) ) → 𝑆𝑋 )
53 51 52 sstrd ( ( ( ( 𝜑𝑥𝑆 ) ∧ 𝑡 ∈ ( 𝒫 ( 𝑆 ∖ { 𝑥 } ) ∩ Fin ) ) ∧ 𝑠 = ( 𝑡 ∪ { 𝑥 } ) ) → ( 𝑡 ∪ { 𝑥 } ) ⊆ 𝑋 )
54 37 53 eqsstrd ( ( ( ( 𝜑𝑥𝑆 ) ∧ 𝑡 ∈ ( 𝒫 ( 𝑆 ∖ { 𝑥 } ) ∩ Fin ) ) ∧ 𝑠 = ( 𝑡 ∪ { 𝑥 } ) ) → 𝑠𝑋 )
55 54 ssdifssd ( ( ( ( 𝜑𝑥𝑆 ) ∧ 𝑡 ∈ ( 𝒫 ( 𝑆 ∖ { 𝑥 } ) ∩ Fin ) ) ∧ 𝑠 = ( 𝑡 ∪ { 𝑥 } ) ) → ( 𝑠 ∖ { 𝑥 } ) ⊆ 𝑋 )
56 41 2 50 55 mrcssd ( ( ( ( 𝜑𝑥𝑆 ) ∧ 𝑡 ∈ ( 𝒫 ( 𝑆 ∖ { 𝑥 } ) ∩ Fin ) ) ∧ 𝑠 = ( 𝑡 ∪ { 𝑥 } ) ) → ( 𝑁𝑡 ) ⊆ ( 𝑁 ‘ ( 𝑠 ∖ { 𝑥 } ) ) )
57 56 sseld ( ( ( ( 𝜑𝑥𝑆 ) ∧ 𝑡 ∈ ( 𝒫 ( 𝑆 ∖ { 𝑥 } ) ∩ Fin ) ) ∧ 𝑠 = ( 𝑡 ∪ { 𝑥 } ) ) → ( 𝑥 ∈ ( 𝑁𝑡 ) → 𝑥 ∈ ( 𝑁 ‘ ( 𝑠 ∖ { 𝑥 } ) ) ) )
58 57 adantr ( ( ( ( ( 𝜑𝑥𝑆 ) ∧ 𝑡 ∈ ( 𝒫 ( 𝑆 ∖ { 𝑥 } ) ∩ Fin ) ) ∧ 𝑠 = ( 𝑡 ∪ { 𝑥 } ) ) ∧ 𝑠𝐼 ) → ( 𝑥 ∈ ( 𝑁𝑡 ) → 𝑥 ∈ ( 𝑁 ‘ ( 𝑠 ∖ { 𝑥 } ) ) ) )
59 40 58 mtod ( ( ( ( ( 𝜑𝑥𝑆 ) ∧ 𝑡 ∈ ( 𝒫 ( 𝑆 ∖ { 𝑥 } ) ∩ Fin ) ) ∧ 𝑠 = ( 𝑡 ∪ { 𝑥 } ) ) ∧ 𝑠𝐼 ) → ¬ 𝑥 ∈ ( 𝑁𝑡 ) )
60 59 ex ( ( ( ( 𝜑𝑥𝑆 ) ∧ 𝑡 ∈ ( 𝒫 ( 𝑆 ∖ { 𝑥 } ) ∩ Fin ) ) ∧ 𝑠 = ( 𝑡 ∪ { 𝑥 } ) ) → ( 𝑠𝐼 → ¬ 𝑥 ∈ ( 𝑁𝑡 ) ) )
61 30 60 rspcimdv ( ( ( 𝜑𝑥𝑆 ) ∧ 𝑡 ∈ ( 𝒫 ( 𝑆 ∖ { 𝑥 } ) ∩ Fin ) ) → ( ∀ 𝑠 ∈ ( 𝒫 𝑆 ∩ Fin ) 𝑠𝐼 → ¬ 𝑥 ∈ ( 𝑁𝑡 ) ) )
62 13 61 syl5bi ( ( ( 𝜑𝑥𝑆 ) ∧ 𝑡 ∈ ( 𝒫 ( 𝑆 ∖ { 𝑥 } ) ∩ Fin ) ) → ( ( 𝒫 𝑆 ∩ Fin ) ⊆ 𝐼 → ¬ 𝑥 ∈ ( 𝑁𝑡 ) ) )
63 62 impancom ( ( ( 𝜑𝑥𝑆 ) ∧ ( 𝒫 𝑆 ∩ Fin ) ⊆ 𝐼 ) → ( 𝑡 ∈ ( 𝒫 ( 𝑆 ∖ { 𝑥 } ) ∩ Fin ) → ¬ 𝑥 ∈ ( 𝑁𝑡 ) ) )
64 63 ralrimiv ( ( ( 𝜑𝑥𝑆 ) ∧ ( 𝒫 𝑆 ∩ Fin ) ⊆ 𝐼 ) → ∀ 𝑡 ∈ ( 𝒫 ( 𝑆 ∖ { 𝑥 } ) ∩ Fin ) ¬ 𝑥 ∈ ( 𝑁𝑡 ) )
65 4 ssdifssd ( 𝜑 → ( 𝑆 ∖ { 𝑥 } ) ⊆ 𝑋 )
66 1 2 65 acsficl2d ( 𝜑 → ( 𝑥 ∈ ( 𝑁 ‘ ( 𝑆 ∖ { 𝑥 } ) ) ↔ ∃ 𝑡 ∈ ( 𝒫 ( 𝑆 ∖ { 𝑥 } ) ∩ Fin ) 𝑥 ∈ ( 𝑁𝑡 ) ) )
67 66 notbid ( 𝜑 → ( ¬ 𝑥 ∈ ( 𝑁 ‘ ( 𝑆 ∖ { 𝑥 } ) ) ↔ ¬ ∃ 𝑡 ∈ ( 𝒫 ( 𝑆 ∖ { 𝑥 } ) ∩ Fin ) 𝑥 ∈ ( 𝑁𝑡 ) ) )
68 ralnex ( ∀ 𝑡 ∈ ( 𝒫 ( 𝑆 ∖ { 𝑥 } ) ∩ Fin ) ¬ 𝑥 ∈ ( 𝑁𝑡 ) ↔ ¬ ∃ 𝑡 ∈ ( 𝒫 ( 𝑆 ∖ { 𝑥 } ) ∩ Fin ) 𝑥 ∈ ( 𝑁𝑡 ) )
69 67 68 bitr4di ( 𝜑 → ( ¬ 𝑥 ∈ ( 𝑁 ‘ ( 𝑆 ∖ { 𝑥 } ) ) ↔ ∀ 𝑡 ∈ ( 𝒫 ( 𝑆 ∖ { 𝑥 } ) ∩ Fin ) ¬ 𝑥 ∈ ( 𝑁𝑡 ) ) )
70 69 ad2antrr ( ( ( 𝜑𝑥𝑆 ) ∧ ( 𝒫 𝑆 ∩ Fin ) ⊆ 𝐼 ) → ( ¬ 𝑥 ∈ ( 𝑁 ‘ ( 𝑆 ∖ { 𝑥 } ) ) ↔ ∀ 𝑡 ∈ ( 𝒫 ( 𝑆 ∖ { 𝑥 } ) ∩ Fin ) ¬ 𝑥 ∈ ( 𝑁𝑡 ) ) )
71 64 70 mpbird ( ( ( 𝜑𝑥𝑆 ) ∧ ( 𝒫 𝑆 ∩ Fin ) ⊆ 𝐼 ) → ¬ 𝑥 ∈ ( 𝑁 ‘ ( 𝑆 ∖ { 𝑥 } ) ) )
72 71 an32s ( ( ( 𝜑 ∧ ( 𝒫 𝑆 ∩ Fin ) ⊆ 𝐼 ) ∧ 𝑥𝑆 ) → ¬ 𝑥 ∈ ( 𝑁 ‘ ( 𝑆 ∖ { 𝑥 } ) ) )
73 72 ralrimiva ( ( 𝜑 ∧ ( 𝒫 𝑆 ∩ Fin ) ⊆ 𝐼 ) → ∀ 𝑥𝑆 ¬ 𝑥 ∈ ( 𝑁 ‘ ( 𝑆 ∖ { 𝑥 } ) ) )
74 2 3 15 16 73 ismri2dd ( ( 𝜑 ∧ ( 𝒫 𝑆 ∩ Fin ) ⊆ 𝐼 ) → 𝑆𝐼 )
75 14 74 impbida ( 𝜑 → ( 𝑆𝐼 ↔ ( 𝒫 𝑆 ∩ Fin ) ⊆ 𝐼 ) )