Metamath Proof Explorer


Theorem ipolerval

Description: Relation of the inclusion poset. (Contributed by Stefan O'Rear, 30-Jan-2015)

Ref Expression
Hypothesis ipoval.i I = toInc F
Assertion ipolerval F V x y | x y F x y = I

Proof

Step Hyp Ref Expression
1 ipoval.i I = toInc F
2 vex x V
3 vex y V
4 2 3 prss x F y F x y F
5 4 biranri x y F x y x F y F
6 5 ssopab2i x y | x y F x y x y | x F y F
7 df-xp F × F = x y | x F y F
8 6 7 sseqtrri x y | x y F x y F × F
9 sqxpexg F V F × F V
10 ssexg x y | x y F x y F × F F × F V x y | x y F x y V
11 8 9 10 sylancr F V x y | x y F x y V
12 ipostr Base ndx F TopSet ndx ordTop x y | x y F x y ndx x y | x y F x y oc ndx x F y F | y x = Struct 1 11
13 pleid le = Slot ndx
14 snsspr1 ndx x y | x y F x y ndx x y | x y F x y oc ndx x F y F | y x =
15 ssun2 ndx x y | x y F x y oc ndx x F y F | y x = Base ndx F TopSet ndx ordTop x y | x y F x y ndx x y | x y F x y oc ndx x F y F | y x =
16 14 15 sstri ndx x y | x y F x y Base ndx F TopSet ndx ordTop x y | x y F x y ndx x y | x y F x y oc ndx x F y F | y x =
17 12 13 16 strfv x y | x y F x y V x y | x y F x y = Base ndx F TopSet ndx ordTop x y | x y F x y ndx x y | x y F x y oc ndx x F y F | y x =
18 11 17 syl F V x y | x y F x y = Base ndx F TopSet ndx ordTop x y | x y F x y ndx x y | x y F x y oc ndx x F y F | y x =
19 eqid x y | x y F x y = x y | x y F x y
20 1 19 ipoval F V I = Base ndx F TopSet ndx ordTop x y | x y F x y ndx x y | x y F x y oc ndx x F y F | y x =
21 20 fveq2d F V I = Base ndx F TopSet ndx ordTop x y | x y F x y ndx x y | x y F x y oc ndx x F y F | y x =
22 18 21 eqtr4d F V x y | x y F x y = I