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

Theorem infmo 9460
Description: Any class 𝐵 has at most one infimum in 𝐴 (where 𝑅 is interpreted as 'less than'). (Contributed by AV, 6-Oct-2020.)
Hypothesis
Ref Expression
infmo.1 (𝜑𝑅 Or 𝐴)
Assertion
Ref Expression
infmo (𝜑 → ∃*𝑥𝐴 (∀𝑦𝐵 ¬ 𝑦𝑅𝑥 ∧ ∀𝑦𝐴 (𝑥𝑅𝑦 → ∃𝑧𝐵 𝑧𝑅𝑦)))
Distinct variable groups:   𝑥,𝑦,𝑧,𝐴   𝑥,𝑅,𝑦,𝑧   𝑥,𝐵,𝑦,𝑧
Allowed substitution hints:   𝜑(𝑥, 𝑦, 𝑧)

Proof of Theorem infmo
Dummy variable 𝑤 is distinct from all other variables.
StepHypRef Expression
1 infmo.1 . . 3 (𝜑𝑅 Or 𝐴)
2 ancom 466 . . . . . . . 8 ((∀𝑦𝐵 ¬ 𝑦𝑅𝑥 ∧ ∀𝑦𝐵 ¬ 𝑦𝑅𝑤) ↔ (∀𝑦𝐵 ¬ 𝑦𝑅𝑤 ∧ ∀𝑦𝐵 ¬ 𝑦𝑅𝑥))
32anbi2ci 637 . . . . . . 7 (((∀𝑦𝐵 ¬ 𝑦𝑅𝑥 ∧ ∀𝑦𝐵 ¬ 𝑦𝑅𝑤) ∧ (∀𝑦𝐴 (𝑤𝑅𝑦 → ∃𝑧𝐵 𝑧𝑅𝑦) ∧ ∀𝑦𝐴 (𝑥𝑅𝑦 → ∃𝑧𝐵 𝑧𝑅𝑦))) ↔ ((∀𝑦𝐴 (𝑤𝑅𝑦 → ∃𝑧𝐵 𝑧𝑅𝑦) ∧ ∀𝑦𝐴 (𝑥𝑅𝑦 → ∃𝑧𝐵 𝑧𝑅𝑦)) ∧ (∀𝑦𝐵 ¬ 𝑦𝑅𝑤 ∧ ∀𝑦𝐵 ¬ 𝑦𝑅𝑥)))
4 an42 670 . . . . . . 7 (((∀𝑦𝐵 ¬ 𝑦𝑅𝑥 ∧ ∀𝑦𝐴 (𝑥𝑅𝑦 → ∃𝑧𝐵 𝑧𝑅𝑦)) ∧ (∀𝑦𝐵 ¬ 𝑦𝑅𝑤 ∧ ∀𝑦𝐴 (𝑤𝑅𝑦 → ∃𝑧𝐵 𝑧𝑅𝑦))) ↔ ((∀𝑦𝐵 ¬ 𝑦𝑅𝑥 ∧ ∀𝑦𝐵 ¬ 𝑦𝑅𝑤) ∧ (∀𝑦𝐴 (𝑤𝑅𝑦 → ∃𝑧𝐵 𝑧𝑅𝑦) ∧ ∀𝑦𝐴 (𝑥𝑅𝑦 → ∃𝑧𝐵 𝑧𝑅𝑦))))
5 an42 670 . . . . . . 7 (((∀𝑦𝐴 (𝑤𝑅𝑦 → ∃𝑧𝐵 𝑧𝑅𝑦) ∧ ∀𝑦𝐵 ¬ 𝑦𝑅𝑥) ∧ (∀𝑦𝐴 (𝑥𝑅𝑦 → ∃𝑧𝐵 𝑧𝑅𝑦) ∧ ∀𝑦𝐵 ¬ 𝑦𝑅𝑤)) ↔ ((∀𝑦𝐴 (𝑤𝑅𝑦 → ∃𝑧𝐵 𝑧𝑅𝑦) ∧ ∀𝑦𝐴 (𝑥𝑅𝑦 → ∃𝑧𝐵 𝑧𝑅𝑦)) ∧ (∀𝑦𝐵 ¬ 𝑦𝑅𝑤 ∧ ∀𝑦𝐵 ¬ 𝑦𝑅𝑥)))
63, 4, 53bitr4i 306 . . . . . 6 (((∀𝑦𝐵 ¬ 𝑦𝑅𝑥 ∧ ∀𝑦𝐴 (𝑥𝑅𝑦 → ∃𝑧𝐵 𝑧𝑅𝑦)) ∧ (∀𝑦𝐵 ¬ 𝑦𝑅𝑤 ∧ ∀𝑦𝐴 (𝑤𝑅𝑦 → ∃𝑧𝐵 𝑧𝑅𝑦))) ↔ ((∀𝑦𝐴 (𝑤𝑅𝑦 → ∃𝑧𝐵 𝑧𝑅𝑦) ∧ ∀𝑦𝐵 ¬ 𝑦𝑅𝑥) ∧ (∀𝑦𝐴 (𝑥𝑅𝑦 → ∃𝑧𝐵 𝑧𝑅𝑦) ∧ ∀𝑦𝐵 ¬ 𝑦𝑅𝑤)))
7 ralnex 3093 . . . . . . . . . . . . 13 (∀𝑦𝐵 ¬ 𝑦𝑅𝑥 ↔ ¬ ∃𝑦𝐵 𝑦𝑅𝑥)
8 breq2 5115 . . . . . . . . . . . . . . . . 17 (𝑦 = 𝑥 → (𝑤𝑅𝑦𝑤𝑅𝑥))
9 breq2 5115 . . . . . . . . . . . . . . . . . 18 (𝑦 = 𝑥 → (𝑧𝑅𝑦𝑧𝑅𝑥))
109rexbidv 3191 . . . . . . . . . . . . . . . . 17 (𝑦 = 𝑥 → (∃𝑧𝐵 𝑧𝑅𝑦 ↔ ∃𝑧𝐵 𝑧𝑅𝑥))
118, 10imbi12d 347 . . . . . . . . . . . . . . . 16 (𝑦 = 𝑥 → ((𝑤𝑅𝑦 → ∃𝑧𝐵 𝑧𝑅𝑦) ↔ (𝑤𝑅𝑥 → ∃𝑧𝐵 𝑧𝑅𝑥)))
1211rspcva 3581 . . . . . . . . . . . . . . 15 ((𝑥𝐴 ∧ ∀𝑦𝐴 (𝑤𝑅𝑦 → ∃𝑧𝐵 𝑧𝑅𝑦)) → (𝑤𝑅𝑥 → ∃𝑧𝐵 𝑧𝑅𝑥))
13 breq1 5114 . . . . . . . . . . . . . . . 16 (𝑦 = 𝑧 → (𝑦𝑅𝑥𝑧𝑅𝑥))
1413cbvrexvw 3246 . . . . . . . . . . . . . . 15 (∃𝑦𝐵 𝑦𝑅𝑥 ↔ ∃𝑧𝐵 𝑧𝑅𝑥)
1512, 14imbitrrdi 255 . . . . . . . . . . . . . 14 ((𝑥𝐴 ∧ ∀𝑦𝐴 (𝑤𝑅𝑦 → ∃𝑧𝐵 𝑧𝑅𝑦)) → (𝑤𝑅𝑥 → ∃𝑦𝐵 𝑦𝑅𝑥))
1615con3d 153 . . . . . . . . . . . . 13 ((𝑥𝐴 ∧ ∀𝑦𝐴 (𝑤𝑅𝑦 → ∃𝑧𝐵 𝑧𝑅𝑦)) → (¬ ∃𝑦𝐵 𝑦𝑅𝑥 → ¬ 𝑤𝑅𝑥))
177, 16biimtrid 245 . . . . . . . . . . . 12 ((𝑥𝐴 ∧ ∀𝑦𝐴 (𝑤𝑅𝑦 → ∃𝑧𝐵 𝑧𝑅𝑦)) → (∀𝑦𝐵 ¬ 𝑦𝑅𝑥 → ¬ 𝑤𝑅𝑥))
1817expimpd 459 . . . . . . . . . . 11 (𝑥𝐴 → ((∀𝑦𝐴 (𝑤𝑅𝑦 → ∃𝑧𝐵 𝑧𝑅𝑦) ∧ ∀𝑦𝐵 ¬ 𝑦𝑅𝑥) → ¬ 𝑤𝑅𝑥))
1918ad2antrl 741 . . . . . . . . . 10 ((𝑅 Or 𝐴 ∧ (𝑥𝐴𝑤𝐴)) → ((∀𝑦𝐴 (𝑤𝑅𝑦 → ∃𝑧𝐵 𝑧𝑅𝑦) ∧ ∀𝑦𝐵 ¬ 𝑦𝑅𝑥) → ¬ 𝑤𝑅𝑥))
20 ralnex 3093 . . . . . . . . . . . . 13 (∀𝑦𝐵 ¬ 𝑦𝑅𝑤 ↔ ¬ ∃𝑦𝐵 𝑦𝑅𝑤)
21 breq2 5115 . . . . . . . . . . . . . . . . 17 (𝑦 = 𝑤 → (𝑥𝑅𝑦𝑥𝑅𝑤))
22 breq2 5115 . . . . . . . . . . . . . . . . . 18 (𝑦 = 𝑤 → (𝑧𝑅𝑦𝑧𝑅𝑤))
2322rexbidv 3191 . . . . . . . . . . . . . . . . 17 (𝑦 = 𝑤 → (∃𝑧𝐵 𝑧𝑅𝑦 ↔ ∃𝑧𝐵 𝑧𝑅𝑤))
2421, 23imbi12d 347 . . . . . . . . . . . . . . . 16 (𝑦 = 𝑤 → ((𝑥𝑅𝑦 → ∃𝑧𝐵 𝑧𝑅𝑦) ↔ (𝑥𝑅𝑤 → ∃𝑧𝐵 𝑧𝑅𝑤)))
2524rspcva 3581 . . . . . . . . . . . . . . 15 ((𝑤𝐴 ∧ ∀𝑦𝐴 (𝑥𝑅𝑦 → ∃𝑧𝐵 𝑧𝑅𝑦)) → (𝑥𝑅𝑤 → ∃𝑧𝐵 𝑧𝑅𝑤))
26 breq1 5114 . . . . . . . . . . . . . . . 16 (𝑦 = 𝑧 → (𝑦𝑅𝑤𝑧𝑅𝑤))
2726cbvrexvw 3246 . . . . . . . . . . . . . . 15 (∃𝑦𝐵 𝑦𝑅𝑤 ↔ ∃𝑧𝐵 𝑧𝑅𝑤)
2825, 27imbitrrdi 255 . . . . . . . . . . . . . 14 ((𝑤𝐴 ∧ ∀𝑦𝐴 (𝑥𝑅𝑦 → ∃𝑧𝐵 𝑧𝑅𝑦)) → (𝑥𝑅𝑤 → ∃𝑦𝐵 𝑦𝑅𝑤))
2928con3d 153 . . . . . . . . . . . . 13 ((𝑤𝐴 ∧ ∀𝑦𝐴 (𝑥𝑅𝑦 → ∃𝑧𝐵 𝑧𝑅𝑦)) → (¬ ∃𝑦𝐵 𝑦𝑅𝑤 → ¬ 𝑥𝑅𝑤))
3020, 29biimtrid 245 . . . . . . . . . . . 12 ((𝑤𝐴 ∧ ∀𝑦𝐴 (𝑥𝑅𝑦 → ∃𝑧𝐵 𝑧𝑅𝑦)) → (∀𝑦𝐵 ¬ 𝑦𝑅𝑤 → ¬ 𝑥𝑅𝑤))
3130expimpd 459 . . . . . . . . . . 11 (𝑤𝐴 → ((∀𝑦𝐴 (𝑥𝑅𝑦 → ∃𝑧𝐵 𝑧𝑅𝑦) ∧ ∀𝑦𝐵 ¬ 𝑦𝑅𝑤) → ¬ 𝑥𝑅𝑤))
3231ad2antll 742 . . . . . . . . . 10 ((𝑅 Or 𝐴 ∧ (𝑥𝐴𝑤𝐴)) → ((∀𝑦𝐴 (𝑥𝑅𝑦 → ∃𝑧𝐵 𝑧𝑅𝑦) ∧ ∀𝑦𝐵 ¬ 𝑦𝑅𝑤) → ¬ 𝑥𝑅𝑤))
3319, 32anim12d 621 . . . . . . . . 9 ((𝑅 Or 𝐴 ∧ (𝑥𝐴𝑤𝐴)) → (((∀𝑦𝐴 (𝑤𝑅𝑦 → ∃𝑧𝐵 𝑧𝑅𝑦) ∧ ∀𝑦𝐵 ¬ 𝑦𝑅𝑥) ∧ (∀𝑦𝐴 (𝑥𝑅𝑦 → ∃𝑧𝐵 𝑧𝑅𝑦) ∧ ∀𝑦𝐵 ¬ 𝑦𝑅𝑤)) → (¬ 𝑤𝑅𝑥 ∧ ¬ 𝑥𝑅𝑤)))
3433imp 412 . . . . . . . 8 (((𝑅 Or 𝐴 ∧ (𝑥𝐴𝑤𝐴)) ∧ ((∀𝑦𝐴 (𝑤𝑅𝑦 → ∃𝑧𝐵 𝑧𝑅𝑦) ∧ ∀𝑦𝐵 ¬ 𝑦𝑅𝑥) ∧ (∀𝑦𝐴 (𝑥𝑅𝑦 → ∃𝑧𝐵 𝑧𝑅𝑦) ∧ ∀𝑦𝐵 ¬ 𝑦𝑅𝑤))) → (¬ 𝑤𝑅𝑥 ∧ ¬ 𝑥𝑅𝑤))
3534ancomd 467 . . . . . . 7 (((𝑅 Or 𝐴 ∧ (𝑥𝐴𝑤𝐴)) ∧ ((∀𝑦𝐴 (𝑤𝑅𝑦 → ∃𝑧𝐵 𝑧𝑅𝑦) ∧ ∀𝑦𝐵 ¬ 𝑦𝑅𝑥) ∧ (∀𝑦𝐴 (𝑥𝑅𝑦 → ∃𝑧𝐵 𝑧𝑅𝑦) ∧ ∀𝑦𝐵 ¬ 𝑦𝑅𝑤))) → (¬ 𝑥𝑅𝑤 ∧ ¬ 𝑤𝑅𝑥))
3635ex 418 . . . . . 6 ((𝑅 Or 𝐴 ∧ (𝑥𝐴𝑤𝐴)) → (((∀𝑦𝐴 (𝑤𝑅𝑦 → ∃𝑧𝐵 𝑧𝑅𝑦) ∧ ∀𝑦𝐵 ¬ 𝑦𝑅𝑥) ∧ (∀𝑦𝐴 (𝑥𝑅𝑦 → ∃𝑧𝐵 𝑧𝑅𝑦) ∧ ∀𝑦𝐵 ¬ 𝑦𝑅𝑤)) → (¬ 𝑥𝑅𝑤 ∧ ¬ 𝑤𝑅𝑥)))
376, 36biimtrid 245 . . . . 5 ((𝑅 Or 𝐴 ∧ (𝑥𝐴𝑤𝐴)) → (((∀𝑦𝐵 ¬ 𝑦𝑅𝑥 ∧ ∀𝑦𝐴 (𝑥𝑅𝑦 → ∃𝑧𝐵 𝑧𝑅𝑦)) ∧ (∀𝑦𝐵 ¬ 𝑦𝑅𝑤 ∧ ∀𝑦𝐴 (𝑤𝑅𝑦 → ∃𝑧𝐵 𝑧𝑅𝑦))) → (¬ 𝑥𝑅𝑤 ∧ ¬ 𝑤𝑅𝑥)))
38 sotrieq2 5603 . . . . 5 ((𝑅 Or 𝐴 ∧ (𝑥𝐴𝑤𝐴)) → (𝑥 = 𝑤 ↔ (¬ 𝑥𝑅𝑤 ∧ ¬ 𝑤𝑅𝑥)))
3937, 38sylibrd 262 . . . 4 ((𝑅 Or 𝐴 ∧ (𝑥𝐴𝑤𝐴)) → (((∀𝑦𝐵 ¬ 𝑦𝑅𝑥 ∧ ∀𝑦𝐴 (𝑥𝑅𝑦 → ∃𝑧𝐵 𝑧𝑅𝑦)) ∧ (∀𝑦𝐵 ¬ 𝑦𝑅𝑤 ∧ ∀𝑦𝐴 (𝑤𝑅𝑦 → ∃𝑧𝐵 𝑧𝑅𝑦))) → 𝑥 = 𝑤))
4039ralrimivva 3210 . . 3 (𝑅 Or 𝐴 → ∀𝑥𝐴𝑤𝐴 (((∀𝑦𝐵 ¬ 𝑦𝑅𝑥 ∧ ∀𝑦𝐴 (𝑥𝑅𝑦 → ∃𝑧𝐵 𝑧𝑅𝑦)) ∧ (∀𝑦𝐵 ¬ 𝑦𝑅𝑤 ∧ ∀𝑦𝐴 (𝑤𝑅𝑦 → ∃𝑧𝐵 𝑧𝑅𝑦))) → 𝑥 = 𝑤))
411, 40syl 18 . 2 (𝜑 → ∀𝑥𝐴𝑤𝐴 (((∀𝑦𝐵 ¬ 𝑦𝑅𝑥 ∧ ∀𝑦𝐴 (𝑥𝑅𝑦 → ∃𝑧𝐵 𝑧𝑅𝑦)) ∧ (∀𝑦𝐵 ¬ 𝑦𝑅𝑤 ∧ ∀𝑦𝐴 (𝑤𝑅𝑦 → ∃𝑧𝐵 𝑧𝑅𝑦))) → 𝑥 = 𝑤))
42 breq2 5115 . . . . . 6 (𝑥 = 𝑤 → (𝑦𝑅𝑥𝑦𝑅𝑤))
4342notbid 321 . . . . 5 (𝑥 = 𝑤 → (¬ 𝑦𝑅𝑥 ↔ ¬ 𝑦𝑅𝑤))
4443ralbidv 3190 . . . 4 (𝑥 = 𝑤 → (∀𝑦𝐵 ¬ 𝑦𝑅𝑥 ↔ ∀𝑦𝐵 ¬ 𝑦𝑅𝑤))
45 breq1 5114 . . . . . 6 (𝑥 = 𝑤 → (𝑥𝑅𝑦𝑤𝑅𝑦))
4645imbi1d 344 . . . . 5 (𝑥 = 𝑤 → ((𝑥𝑅𝑦 → ∃𝑧𝐵 𝑧𝑅𝑦) ↔ (𝑤𝑅𝑦 → ∃𝑧𝐵 𝑧𝑅𝑦)))
4746ralbidv 3190 . . . 4 (𝑥 = 𝑤 → (∀𝑦𝐴 (𝑥𝑅𝑦 → ∃𝑧𝐵 𝑧𝑅𝑦) ↔ ∀𝑦𝐴 (𝑤𝑅𝑦 → ∃𝑧𝐵 𝑧𝑅𝑦)))
4844, 47anbi12d 644 . . 3 (𝑥 = 𝑤 → ((∀𝑦𝐵 ¬ 𝑦𝑅𝑥 ∧ ∀𝑦𝐴 (𝑥𝑅𝑦 → ∃𝑧𝐵 𝑧𝑅𝑦)) ↔ (∀𝑦𝐵 ¬ 𝑦𝑅𝑤 ∧ ∀𝑦𝐴 (𝑤𝑅𝑦 → ∃𝑧𝐵 𝑧𝑅𝑦))))
4948rmo4 3695 . 2 (∃*𝑥𝐴 (∀𝑦𝐵 ¬ 𝑦𝑅𝑥 ∧ ∀𝑦𝐴 (𝑥𝑅𝑦 → ∃𝑧𝐵 𝑧𝑅𝑦)) ↔ ∀𝑥𝐴𝑤𝐴 (((∀𝑦𝐵 ¬ 𝑦𝑅𝑥 ∧ ∀𝑦𝐴 (𝑥𝑅𝑦 → ∃𝑧𝐵 𝑧𝑅𝑦)) ∧ (∀𝑦𝐵 ¬ 𝑦𝑅𝑤 ∧ ∀𝑦𝐴 (𝑤𝑅𝑦 → ∃𝑧𝐵 𝑧𝑅𝑦))) → 𝑥 = 𝑤))
5041, 49sylibr 237 1 (𝜑 → ∃*𝑥𝐴 (∀𝑦𝐵 ¬ 𝑦𝑅𝑥 ∧ ∀𝑦𝐴 (𝑥𝑅𝑦 → ∃𝑧𝐵 𝑧𝑅𝑦)))
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  ¬ wn 3  wi 4  wa 401  wcel 2146  wral 3081  wrex 3091  ∃*wrmo 3370   class class class wbr 5111   Or wor 5570
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2148  ax-9 2156  ax-ext 2737
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-sb 2100  df-mo 2569  df-clab 2744  df-cleq 2757  df-clel 2840  df-ral 3082  df-rex 3092  df-rmo 3371  df-rab 3419  df-v 3459  df-dif 3909  df-un 3911  df-ss 3923  df-nul 4287  df-if 4490  df-sn 4592  df-pr 4594  df-op 4598  df-br 5112  df-po 5571  df-so 5572
This theorem is used by:  infeu  9461
  Copyright terms: Public domain W3C validator