Users' Mathboxes Mathbox for Matthew House < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  weiunpo Structured version   Visualization version   GIF version

Theorem weiunpo 36378
Description: A partial ordering on an indexed union can be constructed from a well-ordering on its index set and a collection of partial orderings on its members. (Contributed by Matthew House, 23-Aug-2025.)
Hypotheses
Ref Expression
weiunpo.1 𝐹 = (𝑤 𝑥𝐴 𝐵 ↦ (𝑢 ∈ {𝑥𝐴𝑤𝐵}∀𝑣 ∈ {𝑥𝐴𝑤𝐵} ¬ 𝑣𝑅𝑢))
weiunpo.2 𝑇 = {⟨𝑦, 𝑧⟩ ∣ ((𝑦 𝑥𝐴 𝐵𝑧 𝑥𝐴 𝐵) ∧ ((𝐹𝑦)𝑅(𝐹𝑧) ∨ ((𝐹𝑦) = (𝐹𝑧) ∧ 𝑦(𝐹𝑦) / 𝑥𝑆𝑧)))}
Assertion
Ref Expression
weiunpo ((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) → 𝑇 Po 𝑥𝐴 𝐵)
Distinct variable groups:   𝑢,𝐴,𝑣,𝑤,𝑥   𝑦,𝐴,𝑧,𝑥   𝑢,𝐵,𝑣,𝑤   𝑦,𝐵,𝑧   𝑦,𝐹,𝑧   𝑢,𝑅,𝑣,𝑤   𝑦,𝑅,𝑧   𝑦,𝑆,𝑧
Allowed substitution hints:   𝐵(𝑥)   𝑅(𝑥)   𝑆(𝑥,𝑤,𝑣,𝑢)   𝑇(𝑥,𝑦,𝑧,𝑤,𝑣,𝑢)   𝐹(𝑥,𝑤,𝑣,𝑢)

Proof of Theorem weiunpo
Dummy variables 𝑝 𝑠 𝑡 𝑞 𝑟 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 simpl1 1191 . . . . . . . 8 (((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) ∧ (𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵)) → 𝑅 We 𝐴)
2 weso 5690 . . . . . . . 8 (𝑅 We 𝐴𝑅 Or 𝐴)
31, 2syl 17 . . . . . . 7 (((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) ∧ (𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵)) → 𝑅 Or 𝐴)
4 simpl2 1192 . . . . . . . . . 10 (((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) ∧ (𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵)) → 𝑅 Se 𝐴)
5 weiunpo.1 . . . . . . . . . . 11 𝐹 = (𝑤 𝑥𝐴 𝐵 ↦ (𝑢 ∈ {𝑥𝐴𝑤𝐵}∀𝑣 ∈ {𝑥𝐴𝑤𝐵} ¬ 𝑣𝑅𝑢))
65weiunlem2 36377 . . . . . . . . . 10 ((𝑅 We 𝐴𝑅 Se 𝐴) → (𝐹: 𝑥𝐴 𝐵𝐴 ∧ ∀𝑡 𝑥𝐴 𝐵𝑡(𝐹𝑡) / 𝑥𝐵 ∧ ∀𝑡 𝑥𝐴 𝐵𝑠𝐴 (𝑡𝑠 / 𝑥𝐵 → ¬ 𝑠𝑅(𝐹𝑡))))
71, 4, 6syl2anc 583 . . . . . . . . 9 (((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) ∧ (𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵)) → (𝐹: 𝑥𝐴 𝐵𝐴 ∧ ∀𝑡 𝑥𝐴 𝐵𝑡(𝐹𝑡) / 𝑥𝐵 ∧ ∀𝑡 𝑥𝐴 𝐵𝑠𝐴 (𝑡𝑠 / 𝑥𝐵 → ¬ 𝑠𝑅(𝐹𝑡))))
87simp1d 1142 . . . . . . . 8 (((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) ∧ (𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵)) → 𝐹: 𝑥𝐴 𝐵𝐴)
9 simpr1 1194 . . . . . . . 8 (((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) ∧ (𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵)) → 𝑝 𝑥𝐴 𝐵)
108, 9ffvelcdmd 7117 . . . . . . 7 (((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) ∧ (𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵)) → (𝐹𝑝) ∈ 𝐴)
11 sonr 5634 . . . . . . 7 ((𝑅 Or 𝐴 ∧ (𝐹𝑝) ∈ 𝐴) → ¬ (𝐹𝑝)𝑅(𝐹𝑝))
123, 10, 11syl2anc 583 . . . . . 6 (((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) ∧ (𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵)) → ¬ (𝐹𝑝)𝑅(𝐹𝑝))
13 csbeq1 3918 . . . . . . . . . . 11 (𝑠 = (𝐹𝑝) → 𝑠 / 𝑥𝑆 = (𝐹𝑝) / 𝑥𝑆)
14 poeq1 5614 . . . . . . . . . . 11 (𝑠 / 𝑥𝑆 = (𝐹𝑝) / 𝑥𝑆 → (𝑠 / 𝑥𝑆 Po 𝑠 / 𝑥𝐵(𝐹𝑝) / 𝑥𝑆 Po 𝑠 / 𝑥𝐵))
1513, 14syl 17 . . . . . . . . . 10 (𝑠 = (𝐹𝑝) → (𝑠 / 𝑥𝑆 Po 𝑠 / 𝑥𝐵(𝐹𝑝) / 𝑥𝑆 Po 𝑠 / 𝑥𝐵))
16 csbeq1 3918 . . . . . . . . . . 11 (𝑠 = (𝐹𝑝) → 𝑠 / 𝑥𝐵 = (𝐹𝑝) / 𝑥𝐵)
17 poeq2 5615 . . . . . . . . . . 11 (𝑠 / 𝑥𝐵 = (𝐹𝑝) / 𝑥𝐵 → ((𝐹𝑝) / 𝑥𝑆 Po 𝑠 / 𝑥𝐵(𝐹𝑝) / 𝑥𝑆 Po (𝐹𝑝) / 𝑥𝐵))
1816, 17syl 17 . . . . . . . . . 10 (𝑠 = (𝐹𝑝) → ((𝐹𝑝) / 𝑥𝑆 Po 𝑠 / 𝑥𝐵(𝐹𝑝) / 𝑥𝑆 Po (𝐹𝑝) / 𝑥𝐵))
1915, 18bitrd 279 . . . . . . . . 9 (𝑠 = (𝐹𝑝) → (𝑠 / 𝑥𝑆 Po 𝑠 / 𝑥𝐵(𝐹𝑝) / 𝑥𝑆 Po (𝐹𝑝) / 𝑥𝐵))
20 simpl3 1193 . . . . . . . . . 10 (((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) ∧ (𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵)) → ∀𝑥𝐴 𝑆 Po 𝐵)
21 nfv 1913 . . . . . . . . . . 11 𝑠 𝑆 Po 𝐵
22 nfcsb1v 3940 . . . . . . . . . . . 12 𝑥𝑠 / 𝑥𝑆
23 nfcsb1v 3940 . . . . . . . . . . . 12 𝑥𝑠 / 𝑥𝐵
2422, 23nfpo 5616 . . . . . . . . . . 11 𝑥𝑠 / 𝑥𝑆 Po 𝑠 / 𝑥𝐵
25 csbeq1a 3929 . . . . . . . . . . . . 13 (𝑥 = 𝑠𝑆 = 𝑠 / 𝑥𝑆)
26 poeq1 5614 . . . . . . . . . . . . 13 (𝑆 = 𝑠 / 𝑥𝑆 → (𝑆 Po 𝐵𝑠 / 𝑥𝑆 Po 𝐵))
2725, 26syl 17 . . . . . . . . . . . 12 (𝑥 = 𝑠 → (𝑆 Po 𝐵𝑠 / 𝑥𝑆 Po 𝐵))
28 csbeq1a 3929 . . . . . . . . . . . . 13 (𝑥 = 𝑠𝐵 = 𝑠 / 𝑥𝐵)
29 poeq2 5615 . . . . . . . . . . . . 13 (𝐵 = 𝑠 / 𝑥𝐵 → (𝑠 / 𝑥𝑆 Po 𝐵𝑠 / 𝑥𝑆 Po 𝑠 / 𝑥𝐵))
3028, 29syl 17 . . . . . . . . . . . 12 (𝑥 = 𝑠 → (𝑠 / 𝑥𝑆 Po 𝐵𝑠 / 𝑥𝑆 Po 𝑠 / 𝑥𝐵))
3127, 30bitrd 279 . . . . . . . . . . 11 (𝑥 = 𝑠 → (𝑆 Po 𝐵𝑠 / 𝑥𝑆 Po 𝑠 / 𝑥𝐵))
3221, 24, 31cbvralw 3307 . . . . . . . . . 10 (∀𝑥𝐴 𝑆 Po 𝐵 ↔ ∀𝑠𝐴 𝑠 / 𝑥𝑆 Po 𝑠 / 𝑥𝐵)
3320, 32sylib 218 . . . . . . . . 9 (((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) ∧ (𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵)) → ∀𝑠𝐴 𝑠 / 𝑥𝑆 Po 𝑠 / 𝑥𝐵)
3419, 33, 10rspcdva 3632 . . . . . . . 8 (((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) ∧ (𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵)) → (𝐹𝑝) / 𝑥𝑆 Po (𝐹𝑝) / 𝑥𝐵)
35 id 22 . . . . . . . . . 10 (𝑡 = 𝑝𝑡 = 𝑝)
36 fveq2 6919 . . . . . . . . . . 11 (𝑡 = 𝑝 → (𝐹𝑡) = (𝐹𝑝))
3736csbeq1d 3919 . . . . . . . . . 10 (𝑡 = 𝑝(𝐹𝑡) / 𝑥𝐵 = (𝐹𝑝) / 𝑥𝐵)
3835, 37eleq12d 2832 . . . . . . . . 9 (𝑡 = 𝑝 → (𝑡(𝐹𝑡) / 𝑥𝐵𝑝(𝐹𝑝) / 𝑥𝐵))
397simp2d 1143 . . . . . . . . 9 (((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) ∧ (𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵)) → ∀𝑡 𝑥𝐴 𝐵𝑡(𝐹𝑡) / 𝑥𝐵)
4038, 39, 9rspcdva 3632 . . . . . . . 8 (((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) ∧ (𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵)) → 𝑝(𝐹𝑝) / 𝑥𝐵)
41 poirr 5623 . . . . . . . 8 (((𝐹𝑝) / 𝑥𝑆 Po (𝐹𝑝) / 𝑥𝐵𝑝(𝐹𝑝) / 𝑥𝐵) → ¬ 𝑝(𝐹𝑝) / 𝑥𝑆𝑝)
4234, 40, 41syl2anc 583 . . . . . . 7 (((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) ∧ (𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵)) → ¬ 𝑝(𝐹𝑝) / 𝑥𝑆𝑝)
4342intnand 488 . . . . . 6 (((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) ∧ (𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵)) → ¬ ((𝐹𝑝) = (𝐹𝑝) ∧ 𝑝(𝐹𝑝) / 𝑥𝑆𝑝))
44 ioran 984 . . . . . 6 (¬ ((𝐹𝑝)𝑅(𝐹𝑝) ∨ ((𝐹𝑝) = (𝐹𝑝) ∧ 𝑝(𝐹𝑝) / 𝑥𝑆𝑝)) ↔ (¬ (𝐹𝑝)𝑅(𝐹𝑝) ∧ ¬ ((𝐹𝑝) = (𝐹𝑝) ∧ 𝑝(𝐹𝑝) / 𝑥𝑆𝑝)))
4512, 43, 44sylanbrc 582 . . . . 5 (((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) ∧ (𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵)) → ¬ ((𝐹𝑝)𝑅(𝐹𝑝) ∨ ((𝐹𝑝) = (𝐹𝑝) ∧ 𝑝(𝐹𝑝) / 𝑥𝑆𝑝)))
46 simpl 482 . . . . . . . . . 10 ((𝑦 = 𝑝𝑧 = 𝑝) → 𝑦 = 𝑝)
4746fveq2d 6923 . . . . . . . . 9 ((𝑦 = 𝑝𝑧 = 𝑝) → (𝐹𝑦) = (𝐹𝑝))
48 simpr 484 . . . . . . . . . 10 ((𝑦 = 𝑝𝑧 = 𝑝) → 𝑧 = 𝑝)
4948fveq2d 6923 . . . . . . . . 9 ((𝑦 = 𝑝𝑧 = 𝑝) → (𝐹𝑧) = (𝐹𝑝))
5047, 49breq12d 5182 . . . . . . . 8 ((𝑦 = 𝑝𝑧 = 𝑝) → ((𝐹𝑦)𝑅(𝐹𝑧) ↔ (𝐹𝑝)𝑅(𝐹𝑝)))
5147, 49eqeq12d 2750 . . . . . . . . 9 ((𝑦 = 𝑝𝑧 = 𝑝) → ((𝐹𝑦) = (𝐹𝑧) ↔ (𝐹𝑝) = (𝐹𝑝)))
5247csbeq1d 3919 . . . . . . . . . 10 ((𝑦 = 𝑝𝑧 = 𝑝) → (𝐹𝑦) / 𝑥𝑆 = (𝐹𝑝) / 𝑥𝑆)
5346, 52, 48breq123d 5183 . . . . . . . . 9 ((𝑦 = 𝑝𝑧 = 𝑝) → (𝑦(𝐹𝑦) / 𝑥𝑆𝑧𝑝(𝐹𝑝) / 𝑥𝑆𝑝))
5451, 53anbi12d 631 . . . . . . . 8 ((𝑦 = 𝑝𝑧 = 𝑝) → (((𝐹𝑦) = (𝐹𝑧) ∧ 𝑦(𝐹𝑦) / 𝑥𝑆𝑧) ↔ ((𝐹𝑝) = (𝐹𝑝) ∧ 𝑝(𝐹𝑝) / 𝑥𝑆𝑝)))
5550, 54orbi12d 917 . . . . . . 7 ((𝑦 = 𝑝𝑧 = 𝑝) → (((𝐹𝑦)𝑅(𝐹𝑧) ∨ ((𝐹𝑦) = (𝐹𝑧) ∧ 𝑦(𝐹𝑦) / 𝑥𝑆𝑧)) ↔ ((𝐹𝑝)𝑅(𝐹𝑝) ∨ ((𝐹𝑝) = (𝐹𝑝) ∧ 𝑝(𝐹𝑝) / 𝑥𝑆𝑝))))
56 weiunpo.2 . . . . . . 7 𝑇 = {⟨𝑦, 𝑧⟩ ∣ ((𝑦 𝑥𝐴 𝐵𝑧 𝑥𝐴 𝐵) ∧ ((𝐹𝑦)𝑅(𝐹𝑧) ∨ ((𝐹𝑦) = (𝐹𝑧) ∧ 𝑦(𝐹𝑦) / 𝑥𝑆𝑧)))}
5755, 56brab2a 5792 . . . . . 6 (𝑝𝑇𝑝 ↔ ((𝑝 𝑥𝐴 𝐵𝑝 𝑥𝐴 𝐵) ∧ ((𝐹𝑝)𝑅(𝐹𝑝) ∨ ((𝐹𝑝) = (𝐹𝑝) ∧ 𝑝(𝐹𝑝) / 𝑥𝑆𝑝))))
5857simprbi 496 . . . . 5 (𝑝𝑇𝑝 → ((𝐹𝑝)𝑅(𝐹𝑝) ∨ ((𝐹𝑝) = (𝐹𝑝) ∧ 𝑝(𝐹𝑝) / 𝑥𝑆𝑝)))
5945, 58nsyl 140 . . . 4 (((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) ∧ (𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵)) → ¬ 𝑝𝑇𝑝)
60 simpr3 1196 . . . . . 6 (((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) ∧ (𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵)) → 𝑟 𝑥𝐴 𝐵)
619, 60jca 511 . . . . 5 (((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) ∧ (𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵)) → (𝑝 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵))
62 simpl 482 . . . . . . . . . . 11 ((𝑦 = 𝑝𝑧 = 𝑞) → 𝑦 = 𝑝)
6362fveq2d 6923 . . . . . . . . . 10 ((𝑦 = 𝑝𝑧 = 𝑞) → (𝐹𝑦) = (𝐹𝑝))
64 simpr 484 . . . . . . . . . . 11 ((𝑦 = 𝑝𝑧 = 𝑞) → 𝑧 = 𝑞)
6564fveq2d 6923 . . . . . . . . . 10 ((𝑦 = 𝑝𝑧 = 𝑞) → (𝐹𝑧) = (𝐹𝑞))
6663, 65breq12d 5182 . . . . . . . . 9 ((𝑦 = 𝑝𝑧 = 𝑞) → ((𝐹𝑦)𝑅(𝐹𝑧) ↔ (𝐹𝑝)𝑅(𝐹𝑞)))
6763, 65eqeq12d 2750 . . . . . . . . . 10 ((𝑦 = 𝑝𝑧 = 𝑞) → ((𝐹𝑦) = (𝐹𝑧) ↔ (𝐹𝑝) = (𝐹𝑞)))
6863csbeq1d 3919 . . . . . . . . . . 11 ((𝑦 = 𝑝𝑧 = 𝑞) → (𝐹𝑦) / 𝑥𝑆 = (𝐹𝑝) / 𝑥𝑆)
6962, 68, 64breq123d 5183 . . . . . . . . . 10 ((𝑦 = 𝑝𝑧 = 𝑞) → (𝑦(𝐹𝑦) / 𝑥𝑆𝑧𝑝(𝐹𝑝) / 𝑥𝑆𝑞))
7067, 69anbi12d 631 . . . . . . . . 9 ((𝑦 = 𝑝𝑧 = 𝑞) → (((𝐹𝑦) = (𝐹𝑧) ∧ 𝑦(𝐹𝑦) / 𝑥𝑆𝑧) ↔ ((𝐹𝑝) = (𝐹𝑞) ∧ 𝑝(𝐹𝑝) / 𝑥𝑆𝑞)))
7166, 70orbi12d 917 . . . . . . . 8 ((𝑦 = 𝑝𝑧 = 𝑞) → (((𝐹𝑦)𝑅(𝐹𝑧) ∨ ((𝐹𝑦) = (𝐹𝑧) ∧ 𝑦(𝐹𝑦) / 𝑥𝑆𝑧)) ↔ ((𝐹𝑝)𝑅(𝐹𝑞) ∨ ((𝐹𝑝) = (𝐹𝑞) ∧ 𝑝(𝐹𝑝) / 𝑥𝑆𝑞))))
7271, 56brab2a 5792 . . . . . . 7 (𝑝𝑇𝑞 ↔ ((𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵) ∧ ((𝐹𝑝)𝑅(𝐹𝑞) ∨ ((𝐹𝑝) = (𝐹𝑞) ∧ 𝑝(𝐹𝑝) / 𝑥𝑆𝑞))))
7372simprbi 496 . . . . . 6 (𝑝𝑇𝑞 → ((𝐹𝑝)𝑅(𝐹𝑞) ∨ ((𝐹𝑝) = (𝐹𝑞) ∧ 𝑝(𝐹𝑝) / 𝑥𝑆𝑞)))
74 simpl 482 . . . . . . . . . . 11 ((𝑦 = 𝑞𝑧 = 𝑟) → 𝑦 = 𝑞)
7574fveq2d 6923 . . . . . . . . . 10 ((𝑦 = 𝑞𝑧 = 𝑟) → (𝐹𝑦) = (𝐹𝑞))
76 simpr 484 . . . . . . . . . . 11 ((𝑦 = 𝑞𝑧 = 𝑟) → 𝑧 = 𝑟)
7776fveq2d 6923 . . . . . . . . . 10 ((𝑦 = 𝑞𝑧 = 𝑟) → (𝐹𝑧) = (𝐹𝑟))
7875, 77breq12d 5182 . . . . . . . . 9 ((𝑦 = 𝑞𝑧 = 𝑟) → ((𝐹𝑦)𝑅(𝐹𝑧) ↔ (𝐹𝑞)𝑅(𝐹𝑟)))
7975, 77eqeq12d 2750 . . . . . . . . . 10 ((𝑦 = 𝑞𝑧 = 𝑟) → ((𝐹𝑦) = (𝐹𝑧) ↔ (𝐹𝑞) = (𝐹𝑟)))
8075csbeq1d 3919 . . . . . . . . . . 11 ((𝑦 = 𝑞𝑧 = 𝑟) → (𝐹𝑦) / 𝑥𝑆 = (𝐹𝑞) / 𝑥𝑆)
8174, 80, 76breq123d 5183 . . . . . . . . . 10 ((𝑦 = 𝑞𝑧 = 𝑟) → (𝑦(𝐹𝑦) / 𝑥𝑆𝑧𝑞(𝐹𝑞) / 𝑥𝑆𝑟))
8279, 81anbi12d 631 . . . . . . . . 9 ((𝑦 = 𝑞𝑧 = 𝑟) → (((𝐹𝑦) = (𝐹𝑧) ∧ 𝑦(𝐹𝑦) / 𝑥𝑆𝑧) ↔ ((𝐹𝑞) = (𝐹𝑟) ∧ 𝑞(𝐹𝑞) / 𝑥𝑆𝑟)))
8378, 82orbi12d 917 . . . . . . . 8 ((𝑦 = 𝑞𝑧 = 𝑟) → (((𝐹𝑦)𝑅(𝐹𝑧) ∨ ((𝐹𝑦) = (𝐹𝑧) ∧ 𝑦(𝐹𝑦) / 𝑥𝑆𝑧)) ↔ ((𝐹𝑞)𝑅(𝐹𝑟) ∨ ((𝐹𝑞) = (𝐹𝑟) ∧ 𝑞(𝐹𝑞) / 𝑥𝑆𝑟))))
8483, 56brab2a 5792 . . . . . . 7 (𝑞𝑇𝑟 ↔ ((𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵) ∧ ((𝐹𝑞)𝑅(𝐹𝑟) ∨ ((𝐹𝑞) = (𝐹𝑟) ∧ 𝑞(𝐹𝑞) / 𝑥𝑆𝑟))))
8584simprbi 496 . . . . . 6 (𝑞𝑇𝑟 → ((𝐹𝑞)𝑅(𝐹𝑟) ∨ ((𝐹𝑞) = (𝐹𝑟) ∧ 𝑞(𝐹𝑞) / 𝑥𝑆𝑟)))
86 simpr2 1195 . . . . . . . . . . . 12 (((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) ∧ (𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵)) → 𝑞 𝑥𝐴 𝐵)
878, 86ffvelcdmd 7117 . . . . . . . . . . 11 (((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) ∧ (𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵)) → (𝐹𝑞) ∈ 𝐴)
888, 60ffvelcdmd 7117 . . . . . . . . . . 11 (((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) ∧ (𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵)) → (𝐹𝑟) ∈ 𝐴)
89 sotr 5635 . . . . . . . . . . 11 ((𝑅 Or 𝐴 ∧ ((𝐹𝑝) ∈ 𝐴 ∧ (𝐹𝑞) ∈ 𝐴 ∧ (𝐹𝑟) ∈ 𝐴)) → (((𝐹𝑝)𝑅(𝐹𝑞) ∧ (𝐹𝑞)𝑅(𝐹𝑟)) → (𝐹𝑝)𝑅(𝐹𝑟)))
903, 10, 87, 88, 89syl13anc 1372 . . . . . . . . . 10 (((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) ∧ (𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵)) → (((𝐹𝑝)𝑅(𝐹𝑞) ∧ (𝐹𝑞)𝑅(𝐹𝑟)) → (𝐹𝑝)𝑅(𝐹𝑟)))
9190imp 406 . . . . . . . . 9 ((((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) ∧ (𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵)) ∧ ((𝐹𝑝)𝑅(𝐹𝑞) ∧ (𝐹𝑞)𝑅(𝐹𝑟))) → (𝐹𝑝)𝑅(𝐹𝑟))
9291orcd 872 . . . . . . . 8 ((((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) ∧ (𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵)) ∧ ((𝐹𝑝)𝑅(𝐹𝑞) ∧ (𝐹𝑞)𝑅(𝐹𝑟))) → ((𝐹𝑝)𝑅(𝐹𝑟) ∨ ((𝐹𝑝) = (𝐹𝑟) ∧ 𝑝(𝐹𝑝) / 𝑥𝑆𝑟)))
9392ex 412 . . . . . . 7 (((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) ∧ (𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵)) → (((𝐹𝑝)𝑅(𝐹𝑞) ∧ (𝐹𝑞)𝑅(𝐹𝑟)) → ((𝐹𝑝)𝑅(𝐹𝑟) ∨ ((𝐹𝑝) = (𝐹𝑟) ∧ 𝑝(𝐹𝑝) / 𝑥𝑆𝑟))))
94 simprll 778 . . . . . . . . . 10 ((((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) ∧ (𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵)) ∧ (((𝐹𝑝) = (𝐹𝑞) ∧ 𝑝(𝐹𝑝) / 𝑥𝑆𝑞) ∧ (𝐹𝑞)𝑅(𝐹𝑟))) → (𝐹𝑝) = (𝐹𝑞))
95 simprr 772 . . . . . . . . . 10 ((((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) ∧ (𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵)) ∧ (((𝐹𝑝) = (𝐹𝑞) ∧ 𝑝(𝐹𝑝) / 𝑥𝑆𝑞) ∧ (𝐹𝑞)𝑅(𝐹𝑟))) → (𝐹𝑞)𝑅(𝐹𝑟))
9694, 95eqbrtrd 5191 . . . . . . . . 9 ((((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) ∧ (𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵)) ∧ (((𝐹𝑝) = (𝐹𝑞) ∧ 𝑝(𝐹𝑝) / 𝑥𝑆𝑞) ∧ (𝐹𝑞)𝑅(𝐹𝑟))) → (𝐹𝑝)𝑅(𝐹𝑟))
9796orcd 872 . . . . . . . 8 ((((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) ∧ (𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵)) ∧ (((𝐹𝑝) = (𝐹𝑞) ∧ 𝑝(𝐹𝑝) / 𝑥𝑆𝑞) ∧ (𝐹𝑞)𝑅(𝐹𝑟))) → ((𝐹𝑝)𝑅(𝐹𝑟) ∨ ((𝐹𝑝) = (𝐹𝑟) ∧ 𝑝(𝐹𝑝) / 𝑥𝑆𝑟)))
9897ex 412 . . . . . . 7 (((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) ∧ (𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵)) → ((((𝐹𝑝) = (𝐹𝑞) ∧ 𝑝(𝐹𝑝) / 𝑥𝑆𝑞) ∧ (𝐹𝑞)𝑅(𝐹𝑟)) → ((𝐹𝑝)𝑅(𝐹𝑟) ∨ ((𝐹𝑝) = (𝐹𝑟) ∧ 𝑝(𝐹𝑝) / 𝑥𝑆𝑟))))
99 simprl 770 . . . . . . . . . 10 ((((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) ∧ (𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵)) ∧ ((𝐹𝑝)𝑅(𝐹𝑞) ∧ ((𝐹𝑞) = (𝐹𝑟) ∧ 𝑞(𝐹𝑞) / 𝑥𝑆𝑟))) → (𝐹𝑝)𝑅(𝐹𝑞))
100 simprrl 780 . . . . . . . . . 10 ((((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) ∧ (𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵)) ∧ ((𝐹𝑝)𝑅(𝐹𝑞) ∧ ((𝐹𝑞) = (𝐹𝑟) ∧ 𝑞(𝐹𝑞) / 𝑥𝑆𝑟))) → (𝐹𝑞) = (𝐹𝑟))
10199, 100breqtrd 5195 . . . . . . . . 9 ((((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) ∧ (𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵)) ∧ ((𝐹𝑝)𝑅(𝐹𝑞) ∧ ((𝐹𝑞) = (𝐹𝑟) ∧ 𝑞(𝐹𝑞) / 𝑥𝑆𝑟))) → (𝐹𝑝)𝑅(𝐹𝑟))
102101orcd 872 . . . . . . . 8 ((((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) ∧ (𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵)) ∧ ((𝐹𝑝)𝑅(𝐹𝑞) ∧ ((𝐹𝑞) = (𝐹𝑟) ∧ 𝑞(𝐹𝑞) / 𝑥𝑆𝑟))) → ((𝐹𝑝)𝑅(𝐹𝑟) ∨ ((𝐹𝑝) = (𝐹𝑟) ∧ 𝑝(𝐹𝑝) / 𝑥𝑆𝑟)))
103102ex 412 . . . . . . 7 (((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) ∧ (𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵)) → (((𝐹𝑝)𝑅(𝐹𝑞) ∧ ((𝐹𝑞) = (𝐹𝑟) ∧ 𝑞(𝐹𝑞) / 𝑥𝑆𝑟)) → ((𝐹𝑝)𝑅(𝐹𝑟) ∨ ((𝐹𝑝) = (𝐹𝑟) ∧ 𝑝(𝐹𝑝) / 𝑥𝑆𝑟))))
104 simprll 778 . . . . . . . . . . 11 ((((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) ∧ (𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵)) ∧ (((𝐹𝑝) = (𝐹𝑞) ∧ 𝑝(𝐹𝑝) / 𝑥𝑆𝑞) ∧ ((𝐹𝑞) = (𝐹𝑟) ∧ 𝑞(𝐹𝑞) / 𝑥𝑆𝑟))) → (𝐹𝑝) = (𝐹𝑞))
105 simprrl 780 . . . . . . . . . . 11 ((((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) ∧ (𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵)) ∧ (((𝐹𝑝) = (𝐹𝑞) ∧ 𝑝(𝐹𝑝) / 𝑥𝑆𝑞) ∧ ((𝐹𝑞) = (𝐹𝑟) ∧ 𝑞(𝐹𝑞) / 𝑥𝑆𝑟))) → (𝐹𝑞) = (𝐹𝑟))
106104, 105eqtrd 2774 . . . . . . . . . 10 ((((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) ∧ (𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵)) ∧ (((𝐹𝑝) = (𝐹𝑞) ∧ 𝑝(𝐹𝑝) / 𝑥𝑆𝑞) ∧ ((𝐹𝑞) = (𝐹𝑟) ∧ 𝑞(𝐹𝑞) / 𝑥𝑆𝑟))) → (𝐹𝑝) = (𝐹𝑟))
107 simprlr 779 . . . . . . . . . . 11 ((((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) ∧ (𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵)) ∧ (((𝐹𝑝) = (𝐹𝑞) ∧ 𝑝(𝐹𝑝) / 𝑥𝑆𝑞) ∧ ((𝐹𝑞) = (𝐹𝑟) ∧ 𝑞(𝐹𝑞) / 𝑥𝑆𝑟))) → 𝑝(𝐹𝑝) / 𝑥𝑆𝑞)
108 simprrr 781 . . . . . . . . . . . 12 ((((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) ∧ (𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵)) ∧ (((𝐹𝑝) = (𝐹𝑞) ∧ 𝑝(𝐹𝑝) / 𝑥𝑆𝑞) ∧ ((𝐹𝑞) = (𝐹𝑟) ∧ 𝑞(𝐹𝑞) / 𝑥𝑆𝑟))) → 𝑞(𝐹𝑞) / 𝑥𝑆𝑟)
109104csbeq1d 3919 . . . . . . . . . . . . 13 ((((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) ∧ (𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵)) ∧ (((𝐹𝑝) = (𝐹𝑞) ∧ 𝑝(𝐹𝑝) / 𝑥𝑆𝑞) ∧ ((𝐹𝑞) = (𝐹𝑟) ∧ 𝑞(𝐹𝑞) / 𝑥𝑆𝑟))) → (𝐹𝑝) / 𝑥𝑆 = (𝐹𝑞) / 𝑥𝑆)
110109breqd 5180 . . . . . . . . . . . 12 ((((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) ∧ (𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵)) ∧ (((𝐹𝑝) = (𝐹𝑞) ∧ 𝑝(𝐹𝑝) / 𝑥𝑆𝑞) ∧ ((𝐹𝑞) = (𝐹𝑟) ∧ 𝑞(𝐹𝑞) / 𝑥𝑆𝑟))) → (𝑞(𝐹𝑝) / 𝑥𝑆𝑟𝑞(𝐹𝑞) / 𝑥𝑆𝑟))
111108, 110mpbird 257 . . . . . . . . . . 11 ((((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) ∧ (𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵)) ∧ (((𝐹𝑝) = (𝐹𝑞) ∧ 𝑝(𝐹𝑝) / 𝑥𝑆𝑞) ∧ ((𝐹𝑞) = (𝐹𝑟) ∧ 𝑞(𝐹𝑞) / 𝑥𝑆𝑟))) → 𝑞(𝐹𝑝) / 𝑥𝑆𝑟)
11234adantr 480 . . . . . . . . . . . 12 ((((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) ∧ (𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵)) ∧ (((𝐹𝑝) = (𝐹𝑞) ∧ 𝑝(𝐹𝑝) / 𝑥𝑆𝑞) ∧ ((𝐹𝑞) = (𝐹𝑟) ∧ 𝑞(𝐹𝑞) / 𝑥𝑆𝑟))) → (𝐹𝑝) / 𝑥𝑆 Po (𝐹𝑝) / 𝑥𝐵)
11340adantr 480 . . . . . . . . . . . 12 ((((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) ∧ (𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵)) ∧ (((𝐹𝑝) = (𝐹𝑞) ∧ 𝑝(𝐹𝑝) / 𝑥𝑆𝑞) ∧ ((𝐹𝑞) = (𝐹𝑟) ∧ 𝑞(𝐹𝑞) / 𝑥𝑆𝑟))) → 𝑝(𝐹𝑝) / 𝑥𝐵)
114 id 22 . . . . . . . . . . . . . . . 16 (𝑡 = 𝑞𝑡 = 𝑞)
115 fveq2 6919 . . . . . . . . . . . . . . . . 17 (𝑡 = 𝑞 → (𝐹𝑡) = (𝐹𝑞))
116115csbeq1d 3919 . . . . . . . . . . . . . . . 16 (𝑡 = 𝑞(𝐹𝑡) / 𝑥𝐵 = (𝐹𝑞) / 𝑥𝐵)
117114, 116eleq12d 2832 . . . . . . . . . . . . . . 15 (𝑡 = 𝑞 → (𝑡(𝐹𝑡) / 𝑥𝐵𝑞(𝐹𝑞) / 𝑥𝐵))
118117, 39, 86rspcdva 3632 . . . . . . . . . . . . . 14 (((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) ∧ (𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵)) → 𝑞(𝐹𝑞) / 𝑥𝐵)
119118adantr 480 . . . . . . . . . . . . 13 ((((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) ∧ (𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵)) ∧ (((𝐹𝑝) = (𝐹𝑞) ∧ 𝑝(𝐹𝑝) / 𝑥𝑆𝑞) ∧ ((𝐹𝑞) = (𝐹𝑟) ∧ 𝑞(𝐹𝑞) / 𝑥𝑆𝑟))) → 𝑞(𝐹𝑞) / 𝑥𝐵)
120104csbeq1d 3919 . . . . . . . . . . . . 13 ((((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) ∧ (𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵)) ∧ (((𝐹𝑝) = (𝐹𝑞) ∧ 𝑝(𝐹𝑝) / 𝑥𝑆𝑞) ∧ ((𝐹𝑞) = (𝐹𝑟) ∧ 𝑞(𝐹𝑞) / 𝑥𝑆𝑟))) → (𝐹𝑝) / 𝑥𝐵 = (𝐹𝑞) / 𝑥𝐵)
121119, 120eleqtrrd 2841 . . . . . . . . . . . 12 ((((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) ∧ (𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵)) ∧ (((𝐹𝑝) = (𝐹𝑞) ∧ 𝑝(𝐹𝑝) / 𝑥𝑆𝑞) ∧ ((𝐹𝑞) = (𝐹𝑟) ∧ 𝑞(𝐹𝑞) / 𝑥𝑆𝑟))) → 𝑞(𝐹𝑝) / 𝑥𝐵)
122 id 22 . . . . . . . . . . . . . . . 16 (𝑡 = 𝑟𝑡 = 𝑟)
123 fveq2 6919 . . . . . . . . . . . . . . . . 17 (𝑡 = 𝑟 → (𝐹𝑡) = (𝐹𝑟))
124123csbeq1d 3919 . . . . . . . . . . . . . . . 16 (𝑡 = 𝑟(𝐹𝑡) / 𝑥𝐵 = (𝐹𝑟) / 𝑥𝐵)
125122, 124eleq12d 2832 . . . . . . . . . . . . . . 15 (𝑡 = 𝑟 → (𝑡(𝐹𝑡) / 𝑥𝐵𝑟(𝐹𝑟) / 𝑥𝐵))
126125, 39, 60rspcdva 3632 . . . . . . . . . . . . . 14 (((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) ∧ (𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵)) → 𝑟(𝐹𝑟) / 𝑥𝐵)
127126adantr 480 . . . . . . . . . . . . 13 ((((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) ∧ (𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵)) ∧ (((𝐹𝑝) = (𝐹𝑞) ∧ 𝑝(𝐹𝑝) / 𝑥𝑆𝑞) ∧ ((𝐹𝑞) = (𝐹𝑟) ∧ 𝑞(𝐹𝑞) / 𝑥𝑆𝑟))) → 𝑟(𝐹𝑟) / 𝑥𝐵)
128106csbeq1d 3919 . . . . . . . . . . . . 13 ((((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) ∧ (𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵)) ∧ (((𝐹𝑝) = (𝐹𝑞) ∧ 𝑝(𝐹𝑝) / 𝑥𝑆𝑞) ∧ ((𝐹𝑞) = (𝐹𝑟) ∧ 𝑞(𝐹𝑞) / 𝑥𝑆𝑟))) → (𝐹𝑝) / 𝑥𝐵 = (𝐹𝑟) / 𝑥𝐵)
129127, 128eleqtrrd 2841 . . . . . . . . . . . 12 ((((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) ∧ (𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵)) ∧ (((𝐹𝑝) = (𝐹𝑞) ∧ 𝑝(𝐹𝑝) / 𝑥𝑆𝑞) ∧ ((𝐹𝑞) = (𝐹𝑟) ∧ 𝑞(𝐹𝑞) / 𝑥𝑆𝑟))) → 𝑟(𝐹𝑝) / 𝑥𝐵)
130 potr 5624 . . . . . . . . . . . 12 (((𝐹𝑝) / 𝑥𝑆 Po (𝐹𝑝) / 𝑥𝐵 ∧ (𝑝(𝐹𝑝) / 𝑥𝐵𝑞(𝐹𝑝) / 𝑥𝐵𝑟(𝐹𝑝) / 𝑥𝐵)) → ((𝑝(𝐹𝑝) / 𝑥𝑆𝑞𝑞(𝐹𝑝) / 𝑥𝑆𝑟) → 𝑝(𝐹𝑝) / 𝑥𝑆𝑟))
131112, 113, 121, 129, 130syl13anc 1372 . . . . . . . . . . 11 ((((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) ∧ (𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵)) ∧ (((𝐹𝑝) = (𝐹𝑞) ∧ 𝑝(𝐹𝑝) / 𝑥𝑆𝑞) ∧ ((𝐹𝑞) = (𝐹𝑟) ∧ 𝑞(𝐹𝑞) / 𝑥𝑆𝑟))) → ((𝑝(𝐹𝑝) / 𝑥𝑆𝑞𝑞(𝐹𝑝) / 𝑥𝑆𝑟) → 𝑝(𝐹𝑝) / 𝑥𝑆𝑟))
132107, 111, 131mp2and 698 . . . . . . . . . 10 ((((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) ∧ (𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵)) ∧ (((𝐹𝑝) = (𝐹𝑞) ∧ 𝑝(𝐹𝑝) / 𝑥𝑆𝑞) ∧ ((𝐹𝑞) = (𝐹𝑟) ∧ 𝑞(𝐹𝑞) / 𝑥𝑆𝑟))) → 𝑝(𝐹𝑝) / 𝑥𝑆𝑟)
133106, 132jca 511 . . . . . . . . 9 ((((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) ∧ (𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵)) ∧ (((𝐹𝑝) = (𝐹𝑞) ∧ 𝑝(𝐹𝑝) / 𝑥𝑆𝑞) ∧ ((𝐹𝑞) = (𝐹𝑟) ∧ 𝑞(𝐹𝑞) / 𝑥𝑆𝑟))) → ((𝐹𝑝) = (𝐹𝑟) ∧ 𝑝(𝐹𝑝) / 𝑥𝑆𝑟))
134133olcd 873 . . . . . . . 8 ((((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) ∧ (𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵)) ∧ (((𝐹𝑝) = (𝐹𝑞) ∧ 𝑝(𝐹𝑝) / 𝑥𝑆𝑞) ∧ ((𝐹𝑞) = (𝐹𝑟) ∧ 𝑞(𝐹𝑞) / 𝑥𝑆𝑟))) → ((𝐹𝑝)𝑅(𝐹𝑟) ∨ ((𝐹𝑝) = (𝐹𝑟) ∧ 𝑝(𝐹𝑝) / 𝑥𝑆𝑟)))
135134ex 412 . . . . . . 7 (((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) ∧ (𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵)) → ((((𝐹𝑝) = (𝐹𝑞) ∧ 𝑝(𝐹𝑝) / 𝑥𝑆𝑞) ∧ ((𝐹𝑞) = (𝐹𝑟) ∧ 𝑞(𝐹𝑞) / 𝑥𝑆𝑟)) → ((𝐹𝑝)𝑅(𝐹𝑟) ∨ ((𝐹𝑝) = (𝐹𝑟) ∧ 𝑝(𝐹𝑝) / 𝑥𝑆𝑟))))
13693, 98, 103, 135ccased 1039 . . . . . 6 (((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) ∧ (𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵)) → ((((𝐹𝑝)𝑅(𝐹𝑞) ∨ ((𝐹𝑝) = (𝐹𝑞) ∧ 𝑝(𝐹𝑝) / 𝑥𝑆𝑞)) ∧ ((𝐹𝑞)𝑅(𝐹𝑟) ∨ ((𝐹𝑞) = (𝐹𝑟) ∧ 𝑞(𝐹𝑞) / 𝑥𝑆𝑟))) → ((𝐹𝑝)𝑅(𝐹𝑟) ∨ ((𝐹𝑝) = (𝐹𝑟) ∧ 𝑝(𝐹𝑝) / 𝑥𝑆𝑟))))
13773, 85, 136syl2ani 606 . . . . 5 (((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) ∧ (𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵)) → ((𝑝𝑇𝑞𝑞𝑇𝑟) → ((𝐹𝑝)𝑅(𝐹𝑟) ∨ ((𝐹𝑝) = (𝐹𝑟) ∧ 𝑝(𝐹𝑝) / 𝑥𝑆𝑟))))
138 simpl 482 . . . . . . . . . 10 ((𝑦 = 𝑝𝑧 = 𝑟) → 𝑦 = 𝑝)
139138fveq2d 6923 . . . . . . . . 9 ((𝑦 = 𝑝𝑧 = 𝑟) → (𝐹𝑦) = (𝐹𝑝))
140 simpr 484 . . . . . . . . . 10 ((𝑦 = 𝑝𝑧 = 𝑟) → 𝑧 = 𝑟)
141140fveq2d 6923 . . . . . . . . 9 ((𝑦 = 𝑝𝑧 = 𝑟) → (𝐹𝑧) = (𝐹𝑟))
142139, 141breq12d 5182 . . . . . . . 8 ((𝑦 = 𝑝𝑧 = 𝑟) → ((𝐹𝑦)𝑅(𝐹𝑧) ↔ (𝐹𝑝)𝑅(𝐹𝑟)))
143139, 141eqeq12d 2750 . . . . . . . . 9 ((𝑦 = 𝑝𝑧 = 𝑟) → ((𝐹𝑦) = (𝐹𝑧) ↔ (𝐹𝑝) = (𝐹𝑟)))
144139csbeq1d 3919 . . . . . . . . . 10 ((𝑦 = 𝑝𝑧 = 𝑟) → (𝐹𝑦) / 𝑥𝑆 = (𝐹𝑝) / 𝑥𝑆)
145138, 144, 140breq123d 5183 . . . . . . . . 9 ((𝑦 = 𝑝𝑧 = 𝑟) → (𝑦(𝐹𝑦) / 𝑥𝑆𝑧𝑝(𝐹𝑝) / 𝑥𝑆𝑟))
146143, 145anbi12d 631 . . . . . . . 8 ((𝑦 = 𝑝𝑧 = 𝑟) → (((𝐹𝑦) = (𝐹𝑧) ∧ 𝑦(𝐹𝑦) / 𝑥𝑆𝑧) ↔ ((𝐹𝑝) = (𝐹𝑟) ∧ 𝑝(𝐹𝑝) / 𝑥𝑆𝑟)))
147142, 146orbi12d 917 . . . . . . 7 ((𝑦 = 𝑝𝑧 = 𝑟) → (((𝐹𝑦)𝑅(𝐹𝑧) ∨ ((𝐹𝑦) = (𝐹𝑧) ∧ 𝑦(𝐹𝑦) / 𝑥𝑆𝑧)) ↔ ((𝐹𝑝)𝑅(𝐹𝑟) ∨ ((𝐹𝑝) = (𝐹𝑟) ∧ 𝑝(𝐹𝑝) / 𝑥𝑆𝑟))))
148147, 56brab2a 5792 . . . . . 6 (𝑝𝑇𝑟 ↔ ((𝑝 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵) ∧ ((𝐹𝑝)𝑅(𝐹𝑟) ∨ ((𝐹𝑝) = (𝐹𝑟) ∧ 𝑝(𝐹𝑝) / 𝑥𝑆𝑟))))
149148biimpri 228 . . . . 5 (((𝑝 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵) ∧ ((𝐹𝑝)𝑅(𝐹𝑟) ∨ ((𝐹𝑝) = (𝐹𝑟) ∧ 𝑝(𝐹𝑝) / 𝑥𝑆𝑟))) → 𝑝𝑇𝑟)
15061, 137, 149syl6an 683 . . . 4 (((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) ∧ (𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵)) → ((𝑝𝑇𝑞𝑞𝑇𝑟) → 𝑝𝑇𝑟))
15159, 150jca 511 . . 3 (((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) ∧ (𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵)) → (¬ 𝑝𝑇𝑝 ∧ ((𝑝𝑇𝑞𝑞𝑇𝑟) → 𝑝𝑇𝑟)))
152151ralrimivvva 3207 . 2 ((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) → ∀𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵𝑝𝑇𝑝 ∧ ((𝑝𝑇𝑞𝑞𝑇𝑟) → 𝑝𝑇𝑟)))
153 df-po 5611 . 2 (𝑇 Po 𝑥𝐴 𝐵 ↔ ∀𝑝 𝑥𝐴 𝐵𝑞 𝑥𝐴 𝐵𝑟 𝑥𝐴 𝐵𝑝𝑇𝑝 ∧ ((𝑝𝑇𝑞𝑞𝑇𝑟) → 𝑝𝑇𝑟)))
154152, 153sylibr 234 1 ((𝑅 We 𝐴𝑅 Se 𝐴 ∧ ∀𝑥𝐴 𝑆 Po 𝐵) → 𝑇 Po 𝑥𝐴 𝐵)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 206  wa 395  wo 846  w3a 1087   = wceq 1537  wcel 2103  wral 3063  {crab 3438  csb 3915   ciun 5019   class class class wbr 5169  {copab 5231  cmpt 5252   Po wpo 5609   Or wor 5610   Se wse 5652   We wwe 5653  wf 6568  cfv 6572  crio 7400
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1793  ax-4 1807  ax-5 1909  ax-6 1967  ax-7 2007  ax-8 2105  ax-9 2113  ax-10 2136  ax-11 2153  ax-12 2173  ax-ext 2705  ax-sep 5320  ax-nul 5327  ax-pr 5450
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 847  df-3or 1088  df-3an 1089  df-tru 1540  df-fal 1550  df-ex 1778  df-nf 1782  df-sb 2065  df-mo 2537  df-eu 2566  df-clab 2712  df-cleq 2726  df-clel 2813  df-nfc 2890  df-ne 2943  df-ral 3064  df-rex 3073  df-rmo 3383  df-reu 3384  df-rab 3439  df-v 3484  df-sbc 3799  df-csb 3916  df-dif 3973  df-un 3975  df-in 3977  df-ss 3987  df-nul 4348  df-if 4549  df-pw 4624  df-sn 4649  df-pr 4651  df-op 4655  df-uni 4932  df-iun 5021  df-br 5170  df-opab 5232  df-mpt 5253  df-id 5597  df-po 5611  df-so 5612  df-fr 5654  df-se 5655  df-we 5656  df-xp 5705  df-rel 5706  df-cnv 5707  df-co 5708  df-dm 5709  df-rn 5710  df-res 5711  df-ima 5712  df-iota 6524  df-fun 6574  df-fn 6575  df-f 6576  df-fv 6580  df-riota 7401
This theorem is referenced by:  weiunso  36379
  Copyright terms: Public domain W3C validator