Metamath Proof Explorer < Previous   Next > Nearby theorems Mirrors  >  Home  >  MPE Home  >  Th. List  >  pospropd Structured version   Visualization version   GIF version

Theorem pospropd 16957
 Description: Posethood is determined only by structure components and only by the value of the relation within the base set. (Contributed by Stefan O'Rear, 29-Jan-2015.)
Hypotheses
Ref Expression
pospropd.kv (𝜑𝐾𝑉)
pospropd.lv (𝜑𝐿𝑊)
pospropd.kb (𝜑𝐵 = (Base‘𝐾))
pospropd.lb (𝜑𝐵 = (Base‘𝐿))
pospropd.xy ((𝜑 ∧ (𝑥𝐵𝑦𝐵)) → (𝑥(le‘𝐾)𝑦𝑥(le‘𝐿)𝑦))
Assertion
Ref Expression
pospropd (𝜑 → (𝐾 ∈ Poset ↔ 𝐿 ∈ Poset))
Distinct variable groups:   𝑥,𝐵,𝑦   𝜑,𝑥,𝑦   𝑥,𝐾,𝑦   𝑥,𝐿,𝑦
Allowed substitution hints:   𝑉(𝑥,𝑦)   𝑊(𝑥,𝑦)

Proof of Theorem pospropd
Dummy variables 𝑎 𝑏 𝑐 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 pospropd.xy . . . . . . . . . . 11 ((𝜑 ∧ (𝑥𝐵𝑦𝐵)) → (𝑥(le‘𝐾)𝑦𝑥(le‘𝐿)𝑦))
21ralrimivva 2954 . . . . . . . . . 10 (𝜑 → ∀𝑥𝐵𝑦𝐵 (𝑥(le‘𝐾)𝑦𝑥(le‘𝐿)𝑦))
3 simp1 1054 . . . . . . . . . . . . 13 ((𝑎𝐵𝑏𝐵𝑐𝐵) → 𝑎𝐵)
43, 3jca 553 . . . . . . . . . . . 12 ((𝑎𝐵𝑏𝐵𝑐𝐵) → (𝑎𝐵𝑎𝐵))
5 breq1 4586 . . . . . . . . . . . . . 14 (𝑥 = 𝑎 → (𝑥(le‘𝐾)𝑦𝑎(le‘𝐾)𝑦))
6 breq1 4586 . . . . . . . . . . . . . 14 (𝑥 = 𝑎 → (𝑥(le‘𝐿)𝑦𝑎(le‘𝐿)𝑦))
75, 6bibi12d 334 . . . . . . . . . . . . 13 (𝑥 = 𝑎 → ((𝑥(le‘𝐾)𝑦𝑥(le‘𝐿)𝑦) ↔ (𝑎(le‘𝐾)𝑦𝑎(le‘𝐿)𝑦)))
8 breq2 4587 . . . . . . . . . . . . . 14 (𝑦 = 𝑎 → (𝑎(le‘𝐾)𝑦𝑎(le‘𝐾)𝑎))
9 breq2 4587 . . . . . . . . . . . . . 14 (𝑦 = 𝑎 → (𝑎(le‘𝐿)𝑦𝑎(le‘𝐿)𝑎))
108, 9bibi12d 334 . . . . . . . . . . . . 13 (𝑦 = 𝑎 → ((𝑎(le‘𝐾)𝑦𝑎(le‘𝐿)𝑦) ↔ (𝑎(le‘𝐾)𝑎𝑎(le‘𝐿)𝑎)))
117, 10rspc2va 3294 . . . . . . . . . . . 12 (((𝑎𝐵𝑎𝐵) ∧ ∀𝑥𝐵𝑦𝐵 (𝑥(le‘𝐾)𝑦𝑥(le‘𝐿)𝑦)) → (𝑎(le‘𝐾)𝑎𝑎(le‘𝐿)𝑎))
124, 11sylan 487 . . . . . . . . . . 11 (((𝑎𝐵𝑏𝐵𝑐𝐵) ∧ ∀𝑥𝐵𝑦𝐵 (𝑥(le‘𝐾)𝑦𝑥(le‘𝐿)𝑦)) → (𝑎(le‘𝐾)𝑎𝑎(le‘𝐿)𝑎))
13 breq2 4587 . . . . . . . . . . . . . . . 16 (𝑦 = 𝑏 → (𝑎(le‘𝐾)𝑦𝑎(le‘𝐾)𝑏))
14 breq2 4587 . . . . . . . . . . . . . . . 16 (𝑦 = 𝑏 → (𝑎(le‘𝐿)𝑦𝑎(le‘𝐿)𝑏))
1513, 14bibi12d 334 . . . . . . . . . . . . . . 15 (𝑦 = 𝑏 → ((𝑎(le‘𝐾)𝑦𝑎(le‘𝐿)𝑦) ↔ (𝑎(le‘𝐾)𝑏𝑎(le‘𝐿)𝑏)))
167, 15rspc2va 3294 . . . . . . . . . . . . . 14 (((𝑎𝐵𝑏𝐵) ∧ ∀𝑥𝐵𝑦𝐵 (𝑥(le‘𝐾)𝑦𝑥(le‘𝐿)𝑦)) → (𝑎(le‘𝐾)𝑏𝑎(le‘𝐿)𝑏))
17163adantl3 1212 . . . . . . . . . . . . 13 (((𝑎𝐵𝑏𝐵𝑐𝐵) ∧ ∀𝑥𝐵𝑦𝐵 (𝑥(le‘𝐾)𝑦𝑥(le‘𝐿)𝑦)) → (𝑎(le‘𝐾)𝑏𝑎(le‘𝐿)𝑏))
18 3simpb 1052 . . . . . . . . . . . . . . 15 ((𝑏𝐵𝑐𝐵𝑎𝐵) → (𝑏𝐵𝑎𝐵))
19183comr 1265 . . . . . . . . . . . . . 14 ((𝑎𝐵𝑏𝐵𝑐𝐵) → (𝑏𝐵𝑎𝐵))
20 breq1 4586 . . . . . . . . . . . . . . . 16 (𝑥 = 𝑏 → (𝑥(le‘𝐾)𝑦𝑏(le‘𝐾)𝑦))
21 breq1 4586 . . . . . . . . . . . . . . . 16 (𝑥 = 𝑏 → (𝑥(le‘𝐿)𝑦𝑏(le‘𝐿)𝑦))
2220, 21bibi12d 334 . . . . . . . . . . . . . . 15 (𝑥 = 𝑏 → ((𝑥(le‘𝐾)𝑦𝑥(le‘𝐿)𝑦) ↔ (𝑏(le‘𝐾)𝑦𝑏(le‘𝐿)𝑦)))
23 breq2 4587 . . . . . . . . . . . . . . . 16 (𝑦 = 𝑎 → (𝑏(le‘𝐾)𝑦𝑏(le‘𝐾)𝑎))
24 breq2 4587 . . . . . . . . . . . . . . . 16 (𝑦 = 𝑎 → (𝑏(le‘𝐿)𝑦𝑏(le‘𝐿)𝑎))
2523, 24bibi12d 334 . . . . . . . . . . . . . . 15 (𝑦 = 𝑎 → ((𝑏(le‘𝐾)𝑦𝑏(le‘𝐿)𝑦) ↔ (𝑏(le‘𝐾)𝑎𝑏(le‘𝐿)𝑎)))
2622, 25rspc2va 3294 . . . . . . . . . . . . . 14 (((𝑏𝐵𝑎𝐵) ∧ ∀𝑥𝐵𝑦𝐵 (𝑥(le‘𝐾)𝑦𝑥(le‘𝐿)𝑦)) → (𝑏(le‘𝐾)𝑎𝑏(le‘𝐿)𝑎))
2719, 26sylan 487 . . . . . . . . . . . . 13 (((𝑎𝐵𝑏𝐵𝑐𝐵) ∧ ∀𝑥𝐵𝑦𝐵 (𝑥(le‘𝐾)𝑦𝑥(le‘𝐿)𝑦)) → (𝑏(le‘𝐾)𝑎𝑏(le‘𝐿)𝑎))
2817, 27anbi12d 743 . . . . . . . . . . . 12 (((𝑎𝐵𝑏𝐵𝑐𝐵) ∧ ∀𝑥𝐵𝑦𝐵 (𝑥(le‘𝐾)𝑦𝑥(le‘𝐿)𝑦)) → ((𝑎(le‘𝐾)𝑏𝑏(le‘𝐾)𝑎) ↔ (𝑎(le‘𝐿)𝑏𝑏(le‘𝐿)𝑎)))
2928imbi1d 330 . . . . . . . . . . 11 (((𝑎𝐵𝑏𝐵𝑐𝐵) ∧ ∀𝑥𝐵𝑦𝐵 (𝑥(le‘𝐾)𝑦𝑥(le‘𝐿)𝑦)) → (((𝑎(le‘𝐾)𝑏𝑏(le‘𝐾)𝑎) → 𝑎 = 𝑏) ↔ ((𝑎(le‘𝐿)𝑏𝑏(le‘𝐿)𝑎) → 𝑎 = 𝑏)))
30 breq2 4587 . . . . . . . . . . . . . . . 16 (𝑦 = 𝑐 → (𝑏(le‘𝐾)𝑦𝑏(le‘𝐾)𝑐))
31 breq2 4587 . . . . . . . . . . . . . . . 16 (𝑦 = 𝑐 → (𝑏(le‘𝐿)𝑦𝑏(le‘𝐿)𝑐))
3230, 31bibi12d 334 . . . . . . . . . . . . . . 15 (𝑦 = 𝑐 → ((𝑏(le‘𝐾)𝑦𝑏(le‘𝐿)𝑦) ↔ (𝑏(le‘𝐾)𝑐𝑏(le‘𝐿)𝑐)))
3322, 32rspc2va 3294 . . . . . . . . . . . . . 14 (((𝑏𝐵𝑐𝐵) ∧ ∀𝑥𝐵𝑦𝐵 (𝑥(le‘𝐾)𝑦𝑥(le‘𝐿)𝑦)) → (𝑏(le‘𝐾)𝑐𝑏(le‘𝐿)𝑐))
34333adantl1 1210 . . . . . . . . . . . . 13 (((𝑎𝐵𝑏𝐵𝑐𝐵) ∧ ∀𝑥𝐵𝑦𝐵 (𝑥(le‘𝐾)𝑦𝑥(le‘𝐿)𝑦)) → (𝑏(le‘𝐾)𝑐𝑏(le‘𝐿)𝑐))
3517, 34anbi12d 743 . . . . . . . . . . . 12 (((𝑎𝐵𝑏𝐵𝑐𝐵) ∧ ∀𝑥𝐵𝑦𝐵 (𝑥(le‘𝐾)𝑦𝑥(le‘𝐿)𝑦)) → ((𝑎(le‘𝐾)𝑏𝑏(le‘𝐾)𝑐) ↔ (𝑎(le‘𝐿)𝑏𝑏(le‘𝐿)𝑐)))
36 3simpb 1052 . . . . . . . . . . . . 13 ((𝑎𝐵𝑏𝐵𝑐𝐵) → (𝑎𝐵𝑐𝐵))
37 breq2 4587 . . . . . . . . . . . . . . 15 (𝑦 = 𝑐 → (𝑎(le‘𝐾)𝑦𝑎(le‘𝐾)𝑐))
38 breq2 4587 . . . . . . . . . . . . . . 15 (𝑦 = 𝑐 → (𝑎(le‘𝐿)𝑦𝑎(le‘𝐿)𝑐))
3937, 38bibi12d 334 . . . . . . . . . . . . . 14 (𝑦 = 𝑐 → ((𝑎(le‘𝐾)𝑦𝑎(le‘𝐿)𝑦) ↔ (𝑎(le‘𝐾)𝑐𝑎(le‘𝐿)𝑐)))
407, 39rspc2va 3294 . . . . . . . . . . . . 13 (((𝑎𝐵𝑐𝐵) ∧ ∀𝑥𝐵𝑦𝐵 (𝑥(le‘𝐾)𝑦𝑥(le‘𝐿)𝑦)) → (𝑎(le‘𝐾)𝑐𝑎(le‘𝐿)𝑐))
4136, 40sylan 487 . . . . . . . . . . . 12 (((𝑎𝐵𝑏𝐵𝑐𝐵) ∧ ∀𝑥𝐵𝑦𝐵 (𝑥(le‘𝐾)𝑦𝑥(le‘𝐿)𝑦)) → (𝑎(le‘𝐾)𝑐𝑎(le‘𝐿)𝑐))
4235, 41imbi12d 333 . . . . . . . . . . 11 (((𝑎𝐵𝑏𝐵𝑐𝐵) ∧ ∀𝑥𝐵𝑦𝐵 (𝑥(le‘𝐾)𝑦𝑥(le‘𝐿)𝑦)) → (((𝑎(le‘𝐾)𝑏𝑏(le‘𝐾)𝑐) → 𝑎(le‘𝐾)𝑐) ↔ ((𝑎(le‘𝐿)𝑏𝑏(le‘𝐿)𝑐) → 𝑎(le‘𝐿)𝑐)))
4312, 29, 423anbi123d 1391 . . . . . . . . . 10 (((𝑎𝐵𝑏𝐵𝑐𝐵) ∧ ∀𝑥𝐵𝑦𝐵 (𝑥(le‘𝐾)𝑦𝑥(le‘𝐿)𝑦)) → ((𝑎(le‘𝐾)𝑎 ∧ ((𝑎(le‘𝐾)𝑏𝑏(le‘𝐾)𝑎) → 𝑎 = 𝑏) ∧ ((𝑎(le‘𝐾)𝑏𝑏(le‘𝐾)𝑐) → 𝑎(le‘𝐾)𝑐)) ↔ (𝑎(le‘𝐿)𝑎 ∧ ((𝑎(le‘𝐿)𝑏𝑏(le‘𝐿)𝑎) → 𝑎 = 𝑏) ∧ ((𝑎(le‘𝐿)𝑏𝑏(le‘𝐿)𝑐) → 𝑎(le‘𝐿)𝑐))))
442, 43sylan2 490 . . . . . . . . 9 (((𝑎𝐵𝑏𝐵𝑐𝐵) ∧ 𝜑) → ((𝑎(le‘𝐾)𝑎 ∧ ((𝑎(le‘𝐾)𝑏𝑏(le‘𝐾)𝑎) → 𝑎 = 𝑏) ∧ ((𝑎(le‘𝐾)𝑏𝑏(le‘𝐾)𝑐) → 𝑎(le‘𝐾)𝑐)) ↔ (𝑎(le‘𝐿)𝑎 ∧ ((𝑎(le‘𝐿)𝑏𝑏(le‘𝐿)𝑎) → 𝑎 = 𝑏) ∧ ((𝑎(le‘𝐿)𝑏𝑏(le‘𝐿)𝑐) → 𝑎(le‘𝐿)𝑐))))
4544ancoms 468 . . . . . . . 8 ((𝜑 ∧ (𝑎𝐵𝑏𝐵𝑐𝐵)) → ((𝑎(le‘𝐾)𝑎 ∧ ((𝑎(le‘𝐾)𝑏𝑏(le‘𝐾)𝑎) → 𝑎 = 𝑏) ∧ ((𝑎(le‘𝐾)𝑏𝑏(le‘𝐾)𝑐) → 𝑎(le‘𝐾)𝑐)) ↔ (𝑎(le‘𝐿)𝑎 ∧ ((𝑎(le‘𝐿)𝑏𝑏(le‘𝐿)𝑎) → 𝑎 = 𝑏) ∧ ((𝑎(le‘𝐿)𝑏𝑏(le‘𝐿)𝑐) → 𝑎(le‘𝐿)𝑐))))
46453exp2 1277 . . . . . . 7 (𝜑 → (𝑎𝐵 → (𝑏𝐵 → (𝑐𝐵 → ((𝑎(le‘𝐾)𝑎 ∧ ((𝑎(le‘𝐾)𝑏𝑏(le‘𝐾)𝑎) → 𝑎 = 𝑏) ∧ ((𝑎(le‘𝐾)𝑏𝑏(le‘𝐾)𝑐) → 𝑎(le‘𝐾)𝑐)) ↔ (𝑎(le‘𝐿)𝑎 ∧ ((𝑎(le‘𝐿)𝑏𝑏(le‘𝐿)𝑎) → 𝑎 = 𝑏) ∧ ((𝑎(le‘𝐿)𝑏𝑏(le‘𝐿)𝑐) → 𝑎(le‘𝐿)𝑐)))))))
4746imp42 618 . . . . . 6 (((𝜑 ∧ (𝑎𝐵𝑏𝐵)) ∧ 𝑐𝐵) → ((𝑎(le‘𝐾)𝑎 ∧ ((𝑎(le‘𝐾)𝑏𝑏(le‘𝐾)𝑎) → 𝑎 = 𝑏) ∧ ((𝑎(le‘𝐾)𝑏𝑏(le‘𝐾)𝑐) → 𝑎(le‘𝐾)𝑐)) ↔ (𝑎(le‘𝐿)𝑎 ∧ ((𝑎(le‘𝐿)𝑏𝑏(le‘𝐿)𝑎) → 𝑎 = 𝑏) ∧ ((𝑎(le‘𝐿)𝑏𝑏(le‘𝐿)𝑐) → 𝑎(le‘𝐿)𝑐))))
4847ralbidva 2968 . . . . 5 ((𝜑 ∧ (𝑎𝐵𝑏𝐵)) → (∀𝑐𝐵 (𝑎(le‘𝐾)𝑎 ∧ ((𝑎(le‘𝐾)𝑏𝑏(le‘𝐾)𝑎) → 𝑎 = 𝑏) ∧ ((𝑎(le‘𝐾)𝑏𝑏(le‘𝐾)𝑐) → 𝑎(le‘𝐾)𝑐)) ↔ ∀𝑐𝐵 (𝑎(le‘𝐿)𝑎 ∧ ((𝑎(le‘𝐿)𝑏𝑏(le‘𝐿)𝑎) → 𝑎 = 𝑏) ∧ ((𝑎(le‘𝐿)𝑏𝑏(le‘𝐿)𝑐) → 𝑎(le‘𝐿)𝑐))))
49482ralbidva 2971 . . . 4 (𝜑 → (∀𝑎𝐵𝑏𝐵𝑐𝐵 (𝑎(le‘𝐾)𝑎 ∧ ((𝑎(le‘𝐾)𝑏𝑏(le‘𝐾)𝑎) → 𝑎 = 𝑏) ∧ ((𝑎(le‘𝐾)𝑏𝑏(le‘𝐾)𝑐) → 𝑎(le‘𝐾)𝑐)) ↔ ∀𝑎𝐵𝑏𝐵𝑐𝐵 (𝑎(le‘𝐿)𝑎 ∧ ((𝑎(le‘𝐿)𝑏𝑏(le‘𝐿)𝑎) → 𝑎 = 𝑏) ∧ ((𝑎(le‘𝐿)𝑏𝑏(le‘𝐿)𝑐) → 𝑎(le‘𝐿)𝑐))))
50 pospropd.kb . . . . 5 (𝜑𝐵 = (Base‘𝐾))
51 raleq 3115 . . . . . . 7 (𝐵 = (Base‘𝐾) → (∀𝑐𝐵 (𝑎(le‘𝐾)𝑎 ∧ ((𝑎(le‘𝐾)𝑏𝑏(le‘𝐾)𝑎) → 𝑎 = 𝑏) ∧ ((𝑎(le‘𝐾)𝑏𝑏(le‘𝐾)𝑐) → 𝑎(le‘𝐾)𝑐)) ↔ ∀𝑐 ∈ (Base‘𝐾)(𝑎(le‘𝐾)𝑎 ∧ ((𝑎(le‘𝐾)𝑏𝑏(le‘𝐾)𝑎) → 𝑎 = 𝑏) ∧ ((𝑎(le‘𝐾)𝑏𝑏(le‘𝐾)𝑐) → 𝑎(le‘𝐾)𝑐))))
5251raleqbi1dv 3123 . . . . . 6 (𝐵 = (Base‘𝐾) → (∀𝑏𝐵𝑐𝐵 (𝑎(le‘𝐾)𝑎 ∧ ((𝑎(le‘𝐾)𝑏𝑏(le‘𝐾)𝑎) → 𝑎 = 𝑏) ∧ ((𝑎(le‘𝐾)𝑏𝑏(le‘𝐾)𝑐) → 𝑎(le‘𝐾)𝑐)) ↔ ∀𝑏 ∈ (Base‘𝐾)∀𝑐 ∈ (Base‘𝐾)(𝑎(le‘𝐾)𝑎 ∧ ((𝑎(le‘𝐾)𝑏𝑏(le‘𝐾)𝑎) → 𝑎 = 𝑏) ∧ ((𝑎(le‘𝐾)𝑏𝑏(le‘𝐾)𝑐) → 𝑎(le‘𝐾)𝑐))))
5352raleqbi1dv 3123 . . . . 5 (𝐵 = (Base‘𝐾) → (∀𝑎𝐵𝑏𝐵𝑐𝐵 (𝑎(le‘𝐾)𝑎 ∧ ((𝑎(le‘𝐾)𝑏𝑏(le‘𝐾)𝑎) → 𝑎 = 𝑏) ∧ ((𝑎(le‘𝐾)𝑏𝑏(le‘𝐾)𝑐) → 𝑎(le‘𝐾)𝑐)) ↔ ∀𝑎 ∈ (Base‘𝐾)∀𝑏 ∈ (Base‘𝐾)∀𝑐 ∈ (Base‘𝐾)(𝑎(le‘𝐾)𝑎 ∧ ((𝑎(le‘𝐾)𝑏𝑏(le‘𝐾)𝑎) → 𝑎 = 𝑏) ∧ ((𝑎(le‘𝐾)𝑏𝑏(le‘𝐾)𝑐) → 𝑎(le‘𝐾)𝑐))))
5450, 53syl 17 . . . 4 (𝜑 → (∀𝑎𝐵𝑏𝐵𝑐𝐵 (𝑎(le‘𝐾)𝑎 ∧ ((𝑎(le‘𝐾)𝑏𝑏(le‘𝐾)𝑎) → 𝑎 = 𝑏) ∧ ((𝑎(le‘𝐾)𝑏𝑏(le‘𝐾)𝑐) → 𝑎(le‘𝐾)𝑐)) ↔ ∀𝑎 ∈ (Base‘𝐾)∀𝑏 ∈ (Base‘𝐾)∀𝑐 ∈ (Base‘𝐾)(𝑎(le‘𝐾)𝑎 ∧ ((𝑎(le‘𝐾)𝑏𝑏(le‘𝐾)𝑎) → 𝑎 = 𝑏) ∧ ((𝑎(le‘𝐾)𝑏𝑏(le‘𝐾)𝑐) → 𝑎(le‘𝐾)𝑐))))
55 pospropd.lb . . . . 5 (𝜑𝐵 = (Base‘𝐿))
56 raleq 3115 . . . . . . 7 (𝐵 = (Base‘𝐿) → (∀𝑐𝐵 (𝑎(le‘𝐿)𝑎 ∧ ((𝑎(le‘𝐿)𝑏𝑏(le‘𝐿)𝑎) → 𝑎 = 𝑏) ∧ ((𝑎(le‘𝐿)𝑏𝑏(le‘𝐿)𝑐) → 𝑎(le‘𝐿)𝑐)) ↔ ∀𝑐 ∈ (Base‘𝐿)(𝑎(le‘𝐿)𝑎 ∧ ((𝑎(le‘𝐿)𝑏𝑏(le‘𝐿)𝑎) → 𝑎 = 𝑏) ∧ ((𝑎(le‘𝐿)𝑏𝑏(le‘𝐿)𝑐) → 𝑎(le‘𝐿)𝑐))))
5756raleqbi1dv 3123 . . . . . 6 (𝐵 = (Base‘𝐿) → (∀𝑏𝐵𝑐𝐵 (𝑎(le‘𝐿)𝑎 ∧ ((𝑎(le‘𝐿)𝑏𝑏(le‘𝐿)𝑎) → 𝑎 = 𝑏) ∧ ((𝑎(le‘𝐿)𝑏𝑏(le‘𝐿)𝑐) → 𝑎(le‘𝐿)𝑐)) ↔ ∀𝑏 ∈ (Base‘𝐿)∀𝑐 ∈ (Base‘𝐿)(𝑎(le‘𝐿)𝑎 ∧ ((𝑎(le‘𝐿)𝑏𝑏(le‘𝐿)𝑎) → 𝑎 = 𝑏) ∧ ((𝑎(le‘𝐿)𝑏𝑏(le‘𝐿)𝑐) → 𝑎(le‘𝐿)𝑐))))
5857raleqbi1dv 3123 . . . . 5 (𝐵 = (Base‘𝐿) → (∀𝑎𝐵𝑏𝐵𝑐𝐵 (𝑎(le‘𝐿)𝑎 ∧ ((𝑎(le‘𝐿)𝑏𝑏(le‘𝐿)𝑎) → 𝑎 = 𝑏) ∧ ((𝑎(le‘𝐿)𝑏𝑏(le‘𝐿)𝑐) → 𝑎(le‘𝐿)𝑐)) ↔ ∀𝑎 ∈ (Base‘𝐿)∀𝑏 ∈ (Base‘𝐿)∀𝑐 ∈ (Base‘𝐿)(𝑎(le‘𝐿)𝑎 ∧ ((𝑎(le‘𝐿)𝑏𝑏(le‘𝐿)𝑎) → 𝑎 = 𝑏) ∧ ((𝑎(le‘𝐿)𝑏𝑏(le‘𝐿)𝑐) → 𝑎(le‘𝐿)𝑐))))
5955, 58syl 17 . . . 4 (𝜑 → (∀𝑎𝐵𝑏𝐵𝑐𝐵 (𝑎(le‘𝐿)𝑎 ∧ ((𝑎(le‘𝐿)𝑏𝑏(le‘𝐿)𝑎) → 𝑎 = 𝑏) ∧ ((𝑎(le‘𝐿)𝑏𝑏(le‘𝐿)𝑐) → 𝑎(le‘𝐿)𝑐)) ↔ ∀𝑎 ∈ (Base‘𝐿)∀𝑏 ∈ (Base‘𝐿)∀𝑐 ∈ (Base‘𝐿)(𝑎(le‘𝐿)𝑎 ∧ ((𝑎(le‘𝐿)𝑏𝑏(le‘𝐿)𝑎) → 𝑎 = 𝑏) ∧ ((𝑎(le‘𝐿)𝑏𝑏(le‘𝐿)𝑐) → 𝑎(le‘𝐿)𝑐))))
6049, 54, 593bitr3d 297 . . 3 (𝜑 → (∀𝑎 ∈ (Base‘𝐾)∀𝑏 ∈ (Base‘𝐾)∀𝑐 ∈ (Base‘𝐾)(𝑎(le‘𝐾)𝑎 ∧ ((𝑎(le‘𝐾)𝑏𝑏(le‘𝐾)𝑎) → 𝑎 = 𝑏) ∧ ((𝑎(le‘𝐾)𝑏𝑏(le‘𝐾)𝑐) → 𝑎(le‘𝐾)𝑐)) ↔ ∀𝑎 ∈ (Base‘𝐿)∀𝑏 ∈ (Base‘𝐿)∀𝑐 ∈ (Base‘𝐿)(𝑎(le‘𝐿)𝑎 ∧ ((𝑎(le‘𝐿)𝑏𝑏(le‘𝐿)𝑎) → 𝑎 = 𝑏) ∧ ((𝑎(le‘𝐿)𝑏𝑏(le‘𝐿)𝑐) → 𝑎(le‘𝐿)𝑐))))
61 pospropd.kv . . . . 5 (𝜑𝐾𝑉)
62 elex 3185 . . . . 5 (𝐾𝑉𝐾 ∈ V)
6361, 62syl 17 . . . 4 (𝜑𝐾 ∈ V)
6463biantrurd 528 . . 3 (𝜑 → (∀𝑎 ∈ (Base‘𝐾)∀𝑏 ∈ (Base‘𝐾)∀𝑐 ∈ (Base‘𝐾)(𝑎(le‘𝐾)𝑎 ∧ ((𝑎(le‘𝐾)𝑏𝑏(le‘𝐾)𝑎) → 𝑎 = 𝑏) ∧ ((𝑎(le‘𝐾)𝑏𝑏(le‘𝐾)𝑐) → 𝑎(le‘𝐾)𝑐)) ↔ (𝐾 ∈ V ∧ ∀𝑎 ∈ (Base‘𝐾)∀𝑏 ∈ (Base‘𝐾)∀𝑐 ∈ (Base‘𝐾)(𝑎(le‘𝐾)𝑎 ∧ ((𝑎(le‘𝐾)𝑏𝑏(le‘𝐾)𝑎) → 𝑎 = 𝑏) ∧ ((𝑎(le‘𝐾)𝑏𝑏(le‘𝐾)𝑐) → 𝑎(le‘𝐾)𝑐)))))
65 pospropd.lv . . . . 5 (𝜑𝐿𝑊)
66 elex 3185 . . . . 5 (𝐿𝑊𝐿 ∈ V)
6765, 66syl 17 . . . 4 (𝜑𝐿 ∈ V)
6867biantrurd 528 . . 3 (𝜑 → (∀𝑎 ∈ (Base‘𝐿)∀𝑏 ∈ (Base‘𝐿)∀𝑐 ∈ (Base‘𝐿)(𝑎(le‘𝐿)𝑎 ∧ ((𝑎(le‘𝐿)𝑏𝑏(le‘𝐿)𝑎) → 𝑎 = 𝑏) ∧ ((𝑎(le‘𝐿)𝑏𝑏(le‘𝐿)𝑐) → 𝑎(le‘𝐿)𝑐)) ↔ (𝐿 ∈ V ∧ ∀𝑎 ∈ (Base‘𝐿)∀𝑏 ∈ (Base‘𝐿)∀𝑐 ∈ (Base‘𝐿)(𝑎(le‘𝐿)𝑎 ∧ ((𝑎(le‘𝐿)𝑏𝑏(le‘𝐿)𝑎) → 𝑎 = 𝑏) ∧ ((𝑎(le‘𝐿)𝑏𝑏(le‘𝐿)𝑐) → 𝑎(le‘𝐿)𝑐)))))
6960, 64, 683bitr3d 297 . 2 (𝜑 → ((𝐾 ∈ V ∧ ∀𝑎 ∈ (Base‘𝐾)∀𝑏 ∈ (Base‘𝐾)∀𝑐 ∈ (Base‘𝐾)(𝑎(le‘𝐾)𝑎 ∧ ((𝑎(le‘𝐾)𝑏𝑏(le‘𝐾)𝑎) → 𝑎 = 𝑏) ∧ ((𝑎(le‘𝐾)𝑏𝑏(le‘𝐾)𝑐) → 𝑎(le‘𝐾)𝑐))) ↔ (𝐿 ∈ V ∧ ∀𝑎 ∈ (Base‘𝐿)∀𝑏 ∈ (Base‘𝐿)∀𝑐 ∈ (Base‘𝐿)(𝑎(le‘𝐿)𝑎 ∧ ((𝑎(le‘𝐿)𝑏𝑏(le‘𝐿)𝑎) → 𝑎 = 𝑏) ∧ ((𝑎(le‘𝐿)𝑏𝑏(le‘𝐿)𝑐) → 𝑎(le‘𝐿)𝑐)))))
70 eqid 2610 . . 3 (Base‘𝐾) = (Base‘𝐾)
71 eqid 2610 . . 3 (le‘𝐾) = (le‘𝐾)
7270, 71ispos 16770 . 2 (𝐾 ∈ Poset ↔ (𝐾 ∈ V ∧ ∀𝑎 ∈ (Base‘𝐾)∀𝑏 ∈ (Base‘𝐾)∀𝑐 ∈ (Base‘𝐾)(𝑎(le‘𝐾)𝑎 ∧ ((𝑎(le‘𝐾)𝑏𝑏(le‘𝐾)𝑎) → 𝑎 = 𝑏) ∧ ((𝑎(le‘𝐾)𝑏𝑏(le‘𝐾)𝑐) → 𝑎(le‘𝐾)𝑐))))
73 eqid 2610 . . 3 (Base‘𝐿) = (Base‘𝐿)
74 eqid 2610 . . 3 (le‘𝐿) = (le‘𝐿)
7573, 74ispos 16770 . 2 (𝐿 ∈ Poset ↔ (𝐿 ∈ V ∧ ∀𝑎 ∈ (Base‘𝐿)∀𝑏 ∈ (Base‘𝐿)∀𝑐 ∈ (Base‘𝐿)(𝑎(le‘𝐿)𝑎 ∧ ((𝑎(le‘𝐿)𝑏𝑏(le‘𝐿)𝑎) → 𝑎 = 𝑏) ∧ ((𝑎(le‘𝐿)𝑏𝑏(le‘𝐿)𝑐) → 𝑎(le‘𝐿)𝑐))))
7669, 72, 753bitr4g 302 1 (𝜑 → (𝐾 ∈ Poset ↔ 𝐿 ∈ Poset))
 Colors of variables: wff setvar class Syntax hints:   → wi 4   ↔ wb 195   ∧ wa 383   ∧ w3a 1031   = wceq 1475   ∈ wcel 1977  ∀wral 2896  Vcvv 3173   class class class wbr 4583  ‘cfv 5804  Basecbs 15695  lecple 15775  Posetcpo 16763 This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1713  ax-4 1728  ax-5 1827  ax-6 1875  ax-7 1922  ax-10 2006  ax-11 2021  ax-12 2034  ax-13 2234  ax-ext 2590  ax-nul 4717 This theorem depends on definitions:  df-bi 196  df-or 384  df-an 385  df-3an 1033  df-tru 1478  df-ex 1696  df-nf 1701  df-sb 1868  df-eu 2462  df-clab 2597  df-cleq 2603  df-clel 2606  df-nfc 2740  df-ral 2901  df-rex 2902  df-rab 2905  df-v 3175  df-sbc 3403  df-dif 3543  df-un 3545  df-in 3547  df-ss 3554  df-nul 3875  df-if 4037  df-sn 4126  df-pr 4128  df-op 4132  df-uni 4373  df-br 4584  df-iota 5768  df-fv 5812  df-poset 16769 This theorem is referenced by:  oduposb  16959
 Copyright terms: Public domain W3C validator