Metamath Proof Explorer


Theorem psubssat

Description: A projective subspace consists of atoms. (Contributed by NM, 4-Nov-2011)

Ref Expression
Hypotheses atpsub.a 𝐴 = ( Atoms ‘ 𝐾 )
atpsub.s 𝑆 = ( PSubSp ‘ 𝐾 )
Assertion psubssat ( ( 𝐾𝐵𝑋𝑆 ) → 𝑋𝐴 )

Proof

Step Hyp Ref Expression
1 atpsub.a 𝐴 = ( Atoms ‘ 𝐾 )
2 atpsub.s 𝑆 = ( PSubSp ‘ 𝐾 )
3 eqid ( le ‘ 𝐾 ) = ( le ‘ 𝐾 )
4 eqid ( join ‘ 𝐾 ) = ( join ‘ 𝐾 )
5 3 4 1 2 ispsubsp ( 𝐾𝐵 → ( 𝑋𝑆 ↔ ( 𝑋𝐴 ∧ ∀ 𝑝𝑋𝑞𝑋𝑟𝐴 ( 𝑟 ( le ‘ 𝐾 ) ( 𝑝 ( join ‘ 𝐾 ) 𝑞 ) → 𝑟𝑋 ) ) ) )
6 5 simprbda ( ( 𝐾𝐵𝑋𝑆 ) → 𝑋𝐴 )