Metamath Proof Explorer


Theorem islpoldN

Description: Properties that determine a polarity. (Contributed by NM, 26-Nov-2014) (New usage is discouraged.)

Ref Expression
Hypotheses lpolset.v V = Base W
lpolset.s S = LSubSp W
lpolset.z 0 ˙ = 0 W
lpolset.a A = LSAtoms W
lpolset.h H = LSHyp W
lpolset.p P = LPol W
islpold.w φ W X
islpold.1 φ ˙ : 𝒫 V S
islpold.2 φ ˙ V = 0 ˙
islpold.3 φ x V y V x y ˙ y ˙ x
islpold.4 φ x A ˙ x H
islpold.5 φ x A ˙ ˙ x = x
Assertion islpoldN φ ˙ P

Proof

Step Hyp Ref Expression
1 lpolset.v V = Base W
2 lpolset.s S = LSubSp W
3 lpolset.z 0 ˙ = 0 W
4 lpolset.a A = LSAtoms W
5 lpolset.h H = LSHyp W
6 lpolset.p P = LPol W
7 islpold.w φ W X
8 islpold.1 φ ˙ : 𝒫 V S
9 islpold.2 φ ˙ V = 0 ˙
10 islpold.3 φ x V y V x y ˙ y ˙ x
11 islpold.4 φ x A ˙ x H
12 islpold.5 φ x A ˙ ˙ x = x
13 10 ex φ x V y V x y ˙ y ˙ x
14 13 alrimivv φ x y x V y V x y ˙ y ˙ x
15 11 12 jca φ x A ˙ x H ˙ ˙ x = x
16 15 ralrimiva φ x A ˙ x H ˙ ˙ x = x
17 9 14 16 3jca φ ˙ V = 0 ˙ x y x V y V x y ˙ y ˙ x x A ˙ x H ˙ ˙ x = x
18 1 2 3 4 5 6 islpolN W X ˙ P ˙ : 𝒫 V S ˙ V = 0 ˙ x y x V y V x y ˙ y ˙ x x A ˙ x H ˙ ˙ x = x
19 7 18 syl φ ˙ P ˙ : 𝒫 V S ˙ V = 0 ˙ x y x V y V x y ˙ y ˙ x x A ˙ x H ˙ ˙ x = x
20 8 17 19 mpbir2and φ ˙ P