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

Theorem sornom 9096
Description: The range of a single-step monotone function from ω into a partially ordered set is a chain. (Contributed by Stefan O'Rear, 3-Nov-2014.)
Assertion
Ref Expression
sornom ((𝐹 Fn ω ∧ ∀𝑎 ∈ ω ((𝐹𝑎)𝑅(𝐹‘suc 𝑎) ∨ (𝐹𝑎) = (𝐹‘suc 𝑎)) ∧ 𝑅 Po ran 𝐹) → 𝑅 Or ran 𝐹)
Distinct variable groups:   𝐹,𝑎   𝑅,𝑎

Proof of Theorem sornom
Dummy variables 𝑏 𝑐 𝑑 𝑒 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 simp3 1062 . 2 ((𝐹 Fn ω ∧ ∀𝑎 ∈ ω ((𝐹𝑎)𝑅(𝐹‘suc 𝑎) ∨ (𝐹𝑎) = (𝐹‘suc 𝑎)) ∧ 𝑅 Po ran 𝐹) → 𝑅 Po ran 𝐹)
2 fvelrnb 6241 . . . . . 6 (𝐹 Fn ω → (𝑏 ∈ ran 𝐹 ↔ ∃𝑑 ∈ ω (𝐹𝑑) = 𝑏))
3 fvelrnb 6241 . . . . . 6 (𝐹 Fn ω → (𝑐 ∈ ran 𝐹 ↔ ∃𝑒 ∈ ω (𝐹𝑒) = 𝑐))
42, 3anbi12d 747 . . . . 5 (𝐹 Fn ω → ((𝑏 ∈ ran 𝐹𝑐 ∈ ran 𝐹) ↔ (∃𝑑 ∈ ω (𝐹𝑑) = 𝑏 ∧ ∃𝑒 ∈ ω (𝐹𝑒) = 𝑐)))
543ad2ant1 1081 . . . 4 ((𝐹 Fn ω ∧ ∀𝑎 ∈ ω ((𝐹𝑎)𝑅(𝐹‘suc 𝑎) ∨ (𝐹𝑎) = (𝐹‘suc 𝑎)) ∧ 𝑅 Po ran 𝐹) → ((𝑏 ∈ ran 𝐹𝑐 ∈ ran 𝐹) ↔ (∃𝑑 ∈ ω (𝐹𝑑) = 𝑏 ∧ ∃𝑒 ∈ ω (𝐹𝑒) = 𝑐)))
6 reeanv 3105 . . . . 5 (∃𝑑 ∈ ω ∃𝑒 ∈ ω ((𝐹𝑑) = 𝑏 ∧ (𝐹𝑒) = 𝑐) ↔ (∃𝑑 ∈ ω (𝐹𝑑) = 𝑏 ∧ ∃𝑒 ∈ ω (𝐹𝑒) = 𝑐))
7 nnord 7070 . . . . . . . . . . 11 (𝑑 ∈ ω → Ord 𝑑)
8 nnord 7070 . . . . . . . . . . 11 (𝑒 ∈ ω → Ord 𝑒)
9 ordtri2or2 5821 . . . . . . . . . . 11 ((Ord 𝑑 ∧ Ord 𝑒) → (𝑑𝑒𝑒𝑑))
107, 8, 9syl2an 494 . . . . . . . . . 10 ((𝑑 ∈ ω ∧ 𝑒 ∈ ω) → (𝑑𝑒𝑒𝑑))
1110adantl 482 . . . . . . . . 9 (((𝐹 Fn ω ∧ ∀𝑎 ∈ ω ((𝐹𝑎)𝑅(𝐹‘suc 𝑎) ∨ (𝐹𝑎) = (𝐹‘suc 𝑎)) ∧ 𝑅 Po ran 𝐹) ∧ (𝑑 ∈ ω ∧ 𝑒 ∈ ω)) → (𝑑𝑒𝑒𝑑))
12 vex 3201 . . . . . . . . . . 11 𝑑 ∈ V
13 vex 3201 . . . . . . . . . . 11 𝑒 ∈ V
14 eleq1 2688 . . . . . . . . . . . . . 14 (𝑏 = 𝑑 → (𝑏 ∈ ω ↔ 𝑑 ∈ ω))
15 eleq1 2688 . . . . . . . . . . . . . 14 (𝑐 = 𝑒 → (𝑐 ∈ ω ↔ 𝑒 ∈ ω))
1614, 15bi2anan9 917 . . . . . . . . . . . . 13 ((𝑏 = 𝑑𝑐 = 𝑒) → ((𝑏 ∈ ω ∧ 𝑐 ∈ ω) ↔ (𝑑 ∈ ω ∧ 𝑒 ∈ ω)))
1716anbi2d 740 . . . . . . . . . . . 12 ((𝑏 = 𝑑𝑐 = 𝑒) → (((𝐹 Fn ω ∧ ∀𝑎 ∈ ω ((𝐹𝑎)𝑅(𝐹‘suc 𝑎) ∨ (𝐹𝑎) = (𝐹‘suc 𝑎)) ∧ 𝑅 Po ran 𝐹) ∧ (𝑏 ∈ ω ∧ 𝑐 ∈ ω)) ↔ ((𝐹 Fn ω ∧ ∀𝑎 ∈ ω ((𝐹𝑎)𝑅(𝐹‘suc 𝑎) ∨ (𝐹𝑎) = (𝐹‘suc 𝑎)) ∧ 𝑅 Po ran 𝐹) ∧ (𝑑 ∈ ω ∧ 𝑒 ∈ ω))))
18 sseq12 3626 . . . . . . . . . . . . 13 ((𝑏 = 𝑑𝑐 = 𝑒) → (𝑏𝑐𝑑𝑒))
19 fveq2 6189 . . . . . . . . . . . . . . 15 (𝑏 = 𝑑 → (𝐹𝑏) = (𝐹𝑑))
20 fveq2 6189 . . . . . . . . . . . . . . 15 (𝑐 = 𝑒 → (𝐹𝑐) = (𝐹𝑒))
2119, 20breqan12d 4667 . . . . . . . . . . . . . 14 ((𝑏 = 𝑑𝑐 = 𝑒) → ((𝐹𝑏)𝑅(𝐹𝑐) ↔ (𝐹𝑑)𝑅(𝐹𝑒)))
2219, 20eqeqan12d 2637 . . . . . . . . . . . . . 14 ((𝑏 = 𝑑𝑐 = 𝑒) → ((𝐹𝑏) = (𝐹𝑐) ↔ (𝐹𝑑) = (𝐹𝑒)))
2321, 22orbi12d 746 . . . . . . . . . . . . 13 ((𝑏 = 𝑑𝑐 = 𝑒) → (((𝐹𝑏)𝑅(𝐹𝑐) ∨ (𝐹𝑏) = (𝐹𝑐)) ↔ ((𝐹𝑑)𝑅(𝐹𝑒) ∨ (𝐹𝑑) = (𝐹𝑒))))
2418, 23imbi12d 334 . . . . . . . . . . . 12 ((𝑏 = 𝑑𝑐 = 𝑒) → ((𝑏𝑐 → ((𝐹𝑏)𝑅(𝐹𝑐) ∨ (𝐹𝑏) = (𝐹𝑐))) ↔ (𝑑𝑒 → ((𝐹𝑑)𝑅(𝐹𝑒) ∨ (𝐹𝑑) = (𝐹𝑒)))))
2517, 24imbi12d 334 . . . . . . . . . . 11 ((𝑏 = 𝑑𝑐 = 𝑒) → ((((𝐹 Fn ω ∧ ∀𝑎 ∈ ω ((𝐹𝑎)𝑅(𝐹‘suc 𝑎) ∨ (𝐹𝑎) = (𝐹‘suc 𝑎)) ∧ 𝑅 Po ran 𝐹) ∧ (𝑏 ∈ ω ∧ 𝑐 ∈ ω)) → (𝑏𝑐 → ((𝐹𝑏)𝑅(𝐹𝑐) ∨ (𝐹𝑏) = (𝐹𝑐)))) ↔ (((𝐹 Fn ω ∧ ∀𝑎 ∈ ω ((𝐹𝑎)𝑅(𝐹‘suc 𝑎) ∨ (𝐹𝑎) = (𝐹‘suc 𝑎)) ∧ 𝑅 Po ran 𝐹) ∧ (𝑑 ∈ ω ∧ 𝑒 ∈ ω)) → (𝑑𝑒 → ((𝐹𝑑)𝑅(𝐹𝑒) ∨ (𝐹𝑑) = (𝐹𝑒))))))
26 fveq2 6189 . . . . . . . . . . . . . . . . . 18 (𝑑 = 𝑏 → (𝐹𝑑) = (𝐹𝑏))
2726breq2d 4663 . . . . . . . . . . . . . . . . 17 (𝑑 = 𝑏 → ((𝐹𝑏)𝑅(𝐹𝑑) ↔ (𝐹𝑏)𝑅(𝐹𝑏)))
2826eqeq2d 2631 . . . . . . . . . . . . . . . . 17 (𝑑 = 𝑏 → ((𝐹𝑏) = (𝐹𝑑) ↔ (𝐹𝑏) = (𝐹𝑏)))
2927, 28orbi12d 746 . . . . . . . . . . . . . . . 16 (𝑑 = 𝑏 → (((𝐹𝑏)𝑅(𝐹𝑑) ∨ (𝐹𝑏) = (𝐹𝑑)) ↔ ((𝐹𝑏)𝑅(𝐹𝑏) ∨ (𝐹𝑏) = (𝐹𝑏))))
3029imbi2d 330 . . . . . . . . . . . . . . 15 (𝑑 = 𝑏 → (((𝐹 Fn ω ∧ ∀𝑎 ∈ ω ((𝐹𝑎)𝑅(𝐹‘suc 𝑎) ∨ (𝐹𝑎) = (𝐹‘suc 𝑎)) ∧ 𝑅 Po ran 𝐹) → ((𝐹𝑏)𝑅(𝐹𝑑) ∨ (𝐹𝑏) = (𝐹𝑑))) ↔ ((𝐹 Fn ω ∧ ∀𝑎 ∈ ω ((𝐹𝑎)𝑅(𝐹‘suc 𝑎) ∨ (𝐹𝑎) = (𝐹‘suc 𝑎)) ∧ 𝑅 Po ran 𝐹) → ((𝐹𝑏)𝑅(𝐹𝑏) ∨ (𝐹𝑏) = (𝐹𝑏)))))
31 fveq2 6189 . . . . . . . . . . . . . . . . . 18 (𝑑 = 𝑒 → (𝐹𝑑) = (𝐹𝑒))
3231breq2d 4663 . . . . . . . . . . . . . . . . 17 (𝑑 = 𝑒 → ((𝐹𝑏)𝑅(𝐹𝑑) ↔ (𝐹𝑏)𝑅(𝐹𝑒)))
3331eqeq2d 2631 . . . . . . . . . . . . . . . . 17 (𝑑 = 𝑒 → ((𝐹𝑏) = (𝐹𝑑) ↔ (𝐹𝑏) = (𝐹𝑒)))
3432, 33orbi12d 746 . . . . . . . . . . . . . . . 16 (𝑑 = 𝑒 → (((𝐹𝑏)𝑅(𝐹𝑑) ∨ (𝐹𝑏) = (𝐹𝑑)) ↔ ((𝐹𝑏)𝑅(𝐹𝑒) ∨ (𝐹𝑏) = (𝐹𝑒))))
3534imbi2d 330 . . . . . . . . . . . . . . 15 (𝑑 = 𝑒 → (((𝐹 Fn ω ∧ ∀𝑎 ∈ ω ((𝐹𝑎)𝑅(𝐹‘suc 𝑎) ∨ (𝐹𝑎) = (𝐹‘suc 𝑎)) ∧ 𝑅 Po ran 𝐹) → ((𝐹𝑏)𝑅(𝐹𝑑) ∨ (𝐹𝑏) = (𝐹𝑑))) ↔ ((𝐹 Fn ω ∧ ∀𝑎 ∈ ω ((𝐹𝑎)𝑅(𝐹‘suc 𝑎) ∨ (𝐹𝑎) = (𝐹‘suc 𝑎)) ∧ 𝑅 Po ran 𝐹) → ((𝐹𝑏)𝑅(𝐹𝑒) ∨ (𝐹𝑏) = (𝐹𝑒)))))
36 fveq2 6189 . . . . . . . . . . . . . . . . . 18 (𝑑 = suc 𝑒 → (𝐹𝑑) = (𝐹‘suc 𝑒))
3736breq2d 4663 . . . . . . . . . . . . . . . . 17 (𝑑 = suc 𝑒 → ((𝐹𝑏)𝑅(𝐹𝑑) ↔ (𝐹𝑏)𝑅(𝐹‘suc 𝑒)))
3836eqeq2d 2631 . . . . . . . . . . . . . . . . 17 (𝑑 = suc 𝑒 → ((𝐹𝑏) = (𝐹𝑑) ↔ (𝐹𝑏) = (𝐹‘suc 𝑒)))
3937, 38orbi12d 746 . . . . . . . . . . . . . . . 16 (𝑑 = suc 𝑒 → (((𝐹𝑏)𝑅(𝐹𝑑) ∨ (𝐹𝑏) = (𝐹𝑑)) ↔ ((𝐹𝑏)𝑅(𝐹‘suc 𝑒) ∨ (𝐹𝑏) = (𝐹‘suc 𝑒))))
4039imbi2d 330 . . . . . . . . . . . . . . 15 (𝑑 = suc 𝑒 → (((𝐹 Fn ω ∧ ∀𝑎 ∈ ω ((𝐹𝑎)𝑅(𝐹‘suc 𝑎) ∨ (𝐹𝑎) = (𝐹‘suc 𝑎)) ∧ 𝑅 Po ran 𝐹) → ((𝐹𝑏)𝑅(𝐹𝑑) ∨ (𝐹𝑏) = (𝐹𝑑))) ↔ ((𝐹 Fn ω ∧ ∀𝑎 ∈ ω ((𝐹𝑎)𝑅(𝐹‘suc 𝑎) ∨ (𝐹𝑎) = (𝐹‘suc 𝑎)) ∧ 𝑅 Po ran 𝐹) → ((𝐹𝑏)𝑅(𝐹‘suc 𝑒) ∨ (𝐹𝑏) = (𝐹‘suc 𝑒)))))
41 fveq2 6189 . . . . . . . . . . . . . . . . . 18 (𝑑 = 𝑐 → (𝐹𝑑) = (𝐹𝑐))
4241breq2d 4663 . . . . . . . . . . . . . . . . 17 (𝑑 = 𝑐 → ((𝐹𝑏)𝑅(𝐹𝑑) ↔ (𝐹𝑏)𝑅(𝐹𝑐)))
4341eqeq2d 2631 . . . . . . . . . . . . . . . . 17 (𝑑 = 𝑐 → ((𝐹𝑏) = (𝐹𝑑) ↔ (𝐹𝑏) = (𝐹𝑐)))
4442, 43orbi12d 746 . . . . . . . . . . . . . . . 16 (𝑑 = 𝑐 → (((𝐹𝑏)𝑅(𝐹𝑑) ∨ (𝐹𝑏) = (𝐹𝑑)) ↔ ((𝐹𝑏)𝑅(𝐹𝑐) ∨ (𝐹𝑏) = (𝐹𝑐))))
4544imbi2d 330 . . . . . . . . . . . . . . 15 (𝑑 = 𝑐 → (((𝐹 Fn ω ∧ ∀𝑎 ∈ ω ((𝐹𝑎)𝑅(𝐹‘suc 𝑎) ∨ (𝐹𝑎) = (𝐹‘suc 𝑎)) ∧ 𝑅 Po ran 𝐹) → ((𝐹𝑏)𝑅(𝐹𝑑) ∨ (𝐹𝑏) = (𝐹𝑑))) ↔ ((𝐹 Fn ω ∧ ∀𝑎 ∈ ω ((𝐹𝑎)𝑅(𝐹‘suc 𝑎) ∨ (𝐹𝑎) = (𝐹‘suc 𝑎)) ∧ 𝑅 Po ran 𝐹) → ((𝐹𝑏)𝑅(𝐹𝑐) ∨ (𝐹𝑏) = (𝐹𝑐)))))
46 eqid 2621 . . . . . . . . . . . . . . . . 17 (𝐹𝑏) = (𝐹𝑏)
4746olci 406 . . . . . . . . . . . . . . . 16 ((𝐹𝑏)𝑅(𝐹𝑏) ∨ (𝐹𝑏) = (𝐹𝑏))
48472a1i 12 . . . . . . . . . . . . . . 15 (𝑏 ∈ ω → ((𝐹 Fn ω ∧ ∀𝑎 ∈ ω ((𝐹𝑎)𝑅(𝐹‘suc 𝑎) ∨ (𝐹𝑎) = (𝐹‘suc 𝑎)) ∧ 𝑅 Po ran 𝐹) → ((𝐹𝑏)𝑅(𝐹𝑏) ∨ (𝐹𝑏) = (𝐹𝑏))))
49 simplll 798 . . . . . . . . . . . . . . . . . . 19 ((((𝑒 ∈ ω ∧ 𝑏 ∈ ω) ∧ 𝑏𝑒) ∧ (𝐹 Fn ω ∧ ∀𝑎 ∈ ω ((𝐹𝑎)𝑅(𝐹‘suc 𝑎) ∨ (𝐹𝑎) = (𝐹‘suc 𝑎)) ∧ 𝑅 Po ran 𝐹)) → 𝑒 ∈ ω)
50 simpr2 1067 . . . . . . . . . . . . . . . . . . 19 ((((𝑒 ∈ ω ∧ 𝑏 ∈ ω) ∧ 𝑏𝑒) ∧ (𝐹 Fn ω ∧ ∀𝑎 ∈ ω ((𝐹𝑎)𝑅(𝐹‘suc 𝑎) ∨ (𝐹𝑎) = (𝐹‘suc 𝑎)) ∧ 𝑅 Po ran 𝐹)) → ∀𝑎 ∈ ω ((𝐹𝑎)𝑅(𝐹‘suc 𝑎) ∨ (𝐹𝑎) = (𝐹‘suc 𝑎)))
51 fveq2 6189 . . . . . . . . . . . . . . . . . . . . . 22 (𝑎 = 𝑒 → (𝐹𝑎) = (𝐹𝑒))
52 suceq 5788 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑎 = 𝑒 → suc 𝑎 = suc 𝑒)
5352fveq2d 6193 . . . . . . . . . . . . . . . . . . . . . 22 (𝑎 = 𝑒 → (𝐹‘suc 𝑎) = (𝐹‘suc 𝑒))
5451, 53breq12d 4664 . . . . . . . . . . . . . . . . . . . . 21 (𝑎 = 𝑒 → ((𝐹𝑎)𝑅(𝐹‘suc 𝑎) ↔ (𝐹𝑒)𝑅(𝐹‘suc 𝑒)))
5551, 53eqeq12d 2636 . . . . . . . . . . . . . . . . . . . . 21 (𝑎 = 𝑒 → ((𝐹𝑎) = (𝐹‘suc 𝑎) ↔ (𝐹𝑒) = (𝐹‘suc 𝑒)))
5654, 55orbi12d 746 . . . . . . . . . . . . . . . . . . . 20 (𝑎 = 𝑒 → (((𝐹𝑎)𝑅(𝐹‘suc 𝑎) ∨ (𝐹𝑎) = (𝐹‘suc 𝑎)) ↔ ((𝐹𝑒)𝑅(𝐹‘suc 𝑒) ∨ (𝐹𝑒) = (𝐹‘suc 𝑒))))
5756rspcva 3305 . . . . . . . . . . . . . . . . . . 19 ((𝑒 ∈ ω ∧ ∀𝑎 ∈ ω ((𝐹𝑎)𝑅(𝐹‘suc 𝑎) ∨ (𝐹𝑎) = (𝐹‘suc 𝑎))) → ((𝐹𝑒)𝑅(𝐹‘suc 𝑒) ∨ (𝐹𝑒) = (𝐹‘suc 𝑒)))
5849, 50, 57syl2anc 693 . . . . . . . . . . . . . . . . . 18 ((((𝑒 ∈ ω ∧ 𝑏 ∈ ω) ∧ 𝑏𝑒) ∧ (𝐹 Fn ω ∧ ∀𝑎 ∈ ω ((𝐹𝑎)𝑅(𝐹‘suc 𝑎) ∨ (𝐹𝑎) = (𝐹‘suc 𝑎)) ∧ 𝑅 Po ran 𝐹)) → ((𝐹𝑒)𝑅(𝐹‘suc 𝑒) ∨ (𝐹𝑒) = (𝐹‘suc 𝑒)))
59 simprr 796 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((𝑒 ∈ ω ∧ 𝑏 ∈ ω) ∧ 𝑏𝑒) ∧ (𝐹 Fn ω ∧ 𝑅 Po ran 𝐹)) → 𝑅 Po ran 𝐹)
60 simprl 794 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((((𝑒 ∈ ω ∧ 𝑏 ∈ ω) ∧ 𝑏𝑒) ∧ (𝐹 Fn ω ∧ 𝑅 Po ran 𝐹)) → 𝐹 Fn ω)
61 simpllr 799 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((((𝑒 ∈ ω ∧ 𝑏 ∈ ω) ∧ 𝑏𝑒) ∧ (𝐹 Fn ω ∧ 𝑅 Po ran 𝐹)) → 𝑏 ∈ ω)
62 fnfvelrn 6354 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝐹 Fn ω ∧ 𝑏 ∈ ω) → (𝐹𝑏) ∈ ran 𝐹)
6360, 61, 62syl2anc 693 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((𝑒 ∈ ω ∧ 𝑏 ∈ ω) ∧ 𝑏𝑒) ∧ (𝐹 Fn ω ∧ 𝑅 Po ran 𝐹)) → (𝐹𝑏) ∈ ran 𝐹)
64 simplll 798 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((((𝑒 ∈ ω ∧ 𝑏 ∈ ω) ∧ 𝑏𝑒) ∧ (𝐹 Fn ω ∧ 𝑅 Po ran 𝐹)) → 𝑒 ∈ ω)
65 fnfvelrn 6354 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝐹 Fn ω ∧ 𝑒 ∈ ω) → (𝐹𝑒) ∈ ran 𝐹)
6660, 64, 65syl2anc 693 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((𝑒 ∈ ω ∧ 𝑏 ∈ ω) ∧ 𝑏𝑒) ∧ (𝐹 Fn ω ∧ 𝑅 Po ran 𝐹)) → (𝐹𝑒) ∈ ran 𝐹)
67 peano2 7083 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝑒 ∈ ω → suc 𝑒 ∈ ω)
6867ad3antrrr 766 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((((𝑒 ∈ ω ∧ 𝑏 ∈ ω) ∧ 𝑏𝑒) ∧ (𝐹 Fn ω ∧ 𝑅 Po ran 𝐹)) → suc 𝑒 ∈ ω)
69 fnfvelrn 6354 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝐹 Fn ω ∧ suc 𝑒 ∈ ω) → (𝐹‘suc 𝑒) ∈ ran 𝐹)
7060, 68, 69syl2anc 693 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((𝑒 ∈ ω ∧ 𝑏 ∈ ω) ∧ 𝑏𝑒) ∧ (𝐹 Fn ω ∧ 𝑅 Po ran 𝐹)) → (𝐹‘suc 𝑒) ∈ ran 𝐹)
71 potr 5045 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝑅 Po ran 𝐹 ∧ ((𝐹𝑏) ∈ ran 𝐹 ∧ (𝐹𝑒) ∈ ran 𝐹 ∧ (𝐹‘suc 𝑒) ∈ ran 𝐹)) → (((𝐹𝑏)𝑅(𝐹𝑒) ∧ (𝐹𝑒)𝑅(𝐹‘suc 𝑒)) → (𝐹𝑏)𝑅(𝐹‘suc 𝑒)))
7259, 63, 66, 70, 71syl13anc 1327 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((𝑒 ∈ ω ∧ 𝑏 ∈ ω) ∧ 𝑏𝑒) ∧ (𝐹 Fn ω ∧ 𝑅 Po ran 𝐹)) → (((𝐹𝑏)𝑅(𝐹𝑒) ∧ (𝐹𝑒)𝑅(𝐹‘suc 𝑒)) → (𝐹𝑏)𝑅(𝐹‘suc 𝑒)))
7372imp 445 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((𝑒 ∈ ω ∧ 𝑏 ∈ ω) ∧ 𝑏𝑒) ∧ (𝐹 Fn ω ∧ 𝑅 Po ran 𝐹)) ∧ ((𝐹𝑏)𝑅(𝐹𝑒) ∧ (𝐹𝑒)𝑅(𝐹‘suc 𝑒))) → (𝐹𝑏)𝑅(𝐹‘suc 𝑒))
7473ancom2s 844 . . . . . . . . . . . . . . . . . . . . . . . 24 (((((𝑒 ∈ ω ∧ 𝑏 ∈ ω) ∧ 𝑏𝑒) ∧ (𝐹 Fn ω ∧ 𝑅 Po ran 𝐹)) ∧ ((𝐹𝑒)𝑅(𝐹‘suc 𝑒) ∧ (𝐹𝑏)𝑅(𝐹𝑒))) → (𝐹𝑏)𝑅(𝐹‘suc 𝑒))
7574orcd 407 . . . . . . . . . . . . . . . . . . . . . . 23 (((((𝑒 ∈ ω ∧ 𝑏 ∈ ω) ∧ 𝑏𝑒) ∧ (𝐹 Fn ω ∧ 𝑅 Po ran 𝐹)) ∧ ((𝐹𝑒)𝑅(𝐹‘suc 𝑒) ∧ (𝐹𝑏)𝑅(𝐹𝑒))) → ((𝐹𝑏)𝑅(𝐹‘suc 𝑒) ∨ (𝐹𝑏) = (𝐹‘suc 𝑒)))
7675expr 643 . . . . . . . . . . . . . . . . . . . . . 22 (((((𝑒 ∈ ω ∧ 𝑏 ∈ ω) ∧ 𝑏𝑒) ∧ (𝐹 Fn ω ∧ 𝑅 Po ran 𝐹)) ∧ (𝐹𝑒)𝑅(𝐹‘suc 𝑒)) → ((𝐹𝑏)𝑅(𝐹𝑒) → ((𝐹𝑏)𝑅(𝐹‘suc 𝑒) ∨ (𝐹𝑏) = (𝐹‘suc 𝑒))))
77 breq1 4654 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝐹𝑏) = (𝐹𝑒) → ((𝐹𝑏)𝑅(𝐹‘suc 𝑒) ↔ (𝐹𝑒)𝑅(𝐹‘suc 𝑒)))
7877biimprcd 240 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝐹𝑒)𝑅(𝐹‘suc 𝑒) → ((𝐹𝑏) = (𝐹𝑒) → (𝐹𝑏)𝑅(𝐹‘suc 𝑒)))
79 orc 400 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝐹𝑏)𝑅(𝐹‘suc 𝑒) → ((𝐹𝑏)𝑅(𝐹‘suc 𝑒) ∨ (𝐹𝑏) = (𝐹‘suc 𝑒)))
8078, 79syl6 35 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝐹𝑒)𝑅(𝐹‘suc 𝑒) → ((𝐹𝑏) = (𝐹𝑒) → ((𝐹𝑏)𝑅(𝐹‘suc 𝑒) ∨ (𝐹𝑏) = (𝐹‘suc 𝑒))))
8180adantl 482 . . . . . . . . . . . . . . . . . . . . . 22 (((((𝑒 ∈ ω ∧ 𝑏 ∈ ω) ∧ 𝑏𝑒) ∧ (𝐹 Fn ω ∧ 𝑅 Po ran 𝐹)) ∧ (𝐹𝑒)𝑅(𝐹‘suc 𝑒)) → ((𝐹𝑏) = (𝐹𝑒) → ((𝐹𝑏)𝑅(𝐹‘suc 𝑒) ∨ (𝐹𝑏) = (𝐹‘suc 𝑒))))
8276, 81jaod 395 . . . . . . . . . . . . . . . . . . . . 21 (((((𝑒 ∈ ω ∧ 𝑏 ∈ ω) ∧ 𝑏𝑒) ∧ (𝐹 Fn ω ∧ 𝑅 Po ran 𝐹)) ∧ (𝐹𝑒)𝑅(𝐹‘suc 𝑒)) → (((𝐹𝑏)𝑅(𝐹𝑒) ∨ (𝐹𝑏) = (𝐹𝑒)) → ((𝐹𝑏)𝑅(𝐹‘suc 𝑒) ∨ (𝐹𝑏) = (𝐹‘suc 𝑒))))
8382ex 450 . . . . . . . . . . . . . . . . . . . 20 ((((𝑒 ∈ ω ∧ 𝑏 ∈ ω) ∧ 𝑏𝑒) ∧ (𝐹 Fn ω ∧ 𝑅 Po ran 𝐹)) → ((𝐹𝑒)𝑅(𝐹‘suc 𝑒) → (((𝐹𝑏)𝑅(𝐹𝑒) ∨ (𝐹𝑏) = (𝐹𝑒)) → ((𝐹𝑏)𝑅(𝐹‘suc 𝑒) ∨ (𝐹𝑏) = (𝐹‘suc 𝑒)))))
84 breq2 4655 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝐹𝑒) = (𝐹‘suc 𝑒) → ((𝐹𝑏)𝑅(𝐹𝑒) ↔ (𝐹𝑏)𝑅(𝐹‘suc 𝑒)))
85 eqeq2 2632 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝐹𝑒) = (𝐹‘suc 𝑒) → ((𝐹𝑏) = (𝐹𝑒) ↔ (𝐹𝑏) = (𝐹‘suc 𝑒)))
8684, 85orbi12d 746 . . . . . . . . . . . . . . . . . . . . . 22 ((𝐹𝑒) = (𝐹‘suc 𝑒) → (((𝐹𝑏)𝑅(𝐹𝑒) ∨ (𝐹𝑏) = (𝐹𝑒)) ↔ ((𝐹𝑏)𝑅(𝐹‘suc 𝑒) ∨ (𝐹𝑏) = (𝐹‘suc 𝑒))))
8786biimpd 219 . . . . . . . . . . . . . . . . . . . . 21 ((𝐹𝑒) = (𝐹‘suc 𝑒) → (((𝐹𝑏)𝑅(𝐹𝑒) ∨ (𝐹𝑏) = (𝐹𝑒)) → ((𝐹𝑏)𝑅(𝐹‘suc 𝑒) ∨ (𝐹𝑏) = (𝐹‘suc 𝑒))))
8887a1i 11 . . . . . . . . . . . . . . . . . . . 20 ((((𝑒 ∈ ω ∧ 𝑏 ∈ ω) ∧ 𝑏𝑒) ∧ (𝐹 Fn ω ∧ 𝑅 Po ran 𝐹)) → ((𝐹𝑒) = (𝐹‘suc 𝑒) → (((𝐹𝑏)𝑅(𝐹𝑒) ∨ (𝐹𝑏) = (𝐹𝑒)) → ((𝐹𝑏)𝑅(𝐹‘suc 𝑒) ∨ (𝐹𝑏) = (𝐹‘suc 𝑒)))))
8983, 88jaod 395 . . . . . . . . . . . . . . . . . . 19 ((((𝑒 ∈ ω ∧ 𝑏 ∈ ω) ∧ 𝑏𝑒) ∧ (𝐹 Fn ω ∧ 𝑅 Po ran 𝐹)) → (((𝐹𝑒)𝑅(𝐹‘suc 𝑒) ∨ (𝐹𝑒) = (𝐹‘suc 𝑒)) → (((𝐹𝑏)𝑅(𝐹𝑒) ∨ (𝐹𝑏) = (𝐹𝑒)) → ((𝐹𝑏)𝑅(𝐹‘suc 𝑒) ∨ (𝐹𝑏) = (𝐹‘suc 𝑒)))))
90893adantr2 1220 . . . . . . . . . . . . . . . . . 18 ((((𝑒 ∈ ω ∧ 𝑏 ∈ ω) ∧ 𝑏𝑒) ∧ (𝐹 Fn ω ∧ ∀𝑎 ∈ ω ((𝐹𝑎)𝑅(𝐹‘suc 𝑎) ∨ (𝐹𝑎) = (𝐹‘suc 𝑎)) ∧ 𝑅 Po ran 𝐹)) → (((𝐹𝑒)𝑅(𝐹‘suc 𝑒) ∨ (𝐹𝑒) = (𝐹‘suc 𝑒)) → (((𝐹𝑏)𝑅(𝐹𝑒) ∨ (𝐹𝑏) = (𝐹𝑒)) → ((𝐹𝑏)𝑅(𝐹‘suc 𝑒) ∨ (𝐹𝑏) = (𝐹‘suc 𝑒)))))
9158, 90mpd 15 . . . . . . . . . . . . . . . . 17 ((((𝑒 ∈ ω ∧ 𝑏 ∈ ω) ∧ 𝑏𝑒) ∧ (𝐹 Fn ω ∧ ∀𝑎 ∈ ω ((𝐹𝑎)𝑅(𝐹‘suc 𝑎) ∨ (𝐹𝑎) = (𝐹‘suc 𝑎)) ∧ 𝑅 Po ran 𝐹)) → (((𝐹𝑏)𝑅(𝐹𝑒) ∨ (𝐹𝑏) = (𝐹𝑒)) → ((𝐹𝑏)𝑅(𝐹‘suc 𝑒) ∨ (𝐹𝑏) = (𝐹‘suc 𝑒))))
9291ex 450 . . . . . . . . . . . . . . . 16 (((𝑒 ∈ ω ∧ 𝑏 ∈ ω) ∧ 𝑏𝑒) → ((𝐹 Fn ω ∧ ∀𝑎 ∈ ω ((𝐹𝑎)𝑅(𝐹‘suc 𝑎) ∨ (𝐹𝑎) = (𝐹‘suc 𝑎)) ∧ 𝑅 Po ran 𝐹) → (((𝐹𝑏)𝑅(𝐹𝑒) ∨ (𝐹𝑏) = (𝐹𝑒)) → ((𝐹𝑏)𝑅(𝐹‘suc 𝑒) ∨ (𝐹𝑏) = (𝐹‘suc 𝑒)))))
9392a2d 29 . . . . . . . . . . . . . . 15 (((𝑒 ∈ ω ∧ 𝑏 ∈ ω) ∧ 𝑏𝑒) → (((𝐹 Fn ω ∧ ∀𝑎 ∈ ω ((𝐹𝑎)𝑅(𝐹‘suc 𝑎) ∨ (𝐹𝑎) = (𝐹‘suc 𝑎)) ∧ 𝑅 Po ran 𝐹) → ((𝐹𝑏)𝑅(𝐹𝑒) ∨ (𝐹𝑏) = (𝐹𝑒))) → ((𝐹 Fn ω ∧ ∀𝑎 ∈ ω ((𝐹𝑎)𝑅(𝐹‘suc 𝑎) ∨ (𝐹𝑎) = (𝐹‘suc 𝑎)) ∧ 𝑅 Po ran 𝐹) → ((𝐹𝑏)𝑅(𝐹‘suc 𝑒) ∨ (𝐹𝑏) = (𝐹‘suc 𝑒)))))
9430, 35, 40, 45, 48, 93findsg 7090 . . . . . . . . . . . . . 14 (((𝑐 ∈ ω ∧ 𝑏 ∈ ω) ∧ 𝑏𝑐) → ((𝐹 Fn ω ∧ ∀𝑎 ∈ ω ((𝐹𝑎)𝑅(𝐹‘suc 𝑎) ∨ (𝐹𝑎) = (𝐹‘suc 𝑎)) ∧ 𝑅 Po ran 𝐹) → ((𝐹𝑏)𝑅(𝐹𝑐) ∨ (𝐹𝑏) = (𝐹𝑐))))
9594ancom1s 847 . . . . . . . . . . . . 13 (((𝑏 ∈ ω ∧ 𝑐 ∈ ω) ∧ 𝑏𝑐) → ((𝐹 Fn ω ∧ ∀𝑎 ∈ ω ((𝐹𝑎)𝑅(𝐹‘suc 𝑎) ∨ (𝐹𝑎) = (𝐹‘suc 𝑎)) ∧ 𝑅 Po ran 𝐹) → ((𝐹𝑏)𝑅(𝐹𝑐) ∨ (𝐹𝑏) = (𝐹𝑐))))
9695impcom 446 . . . . . . . . . . . 12 (((𝐹 Fn ω ∧ ∀𝑎 ∈ ω ((𝐹𝑎)𝑅(𝐹‘suc 𝑎) ∨ (𝐹𝑎) = (𝐹‘suc 𝑎)) ∧ 𝑅 Po ran 𝐹) ∧ ((𝑏 ∈ ω ∧ 𝑐 ∈ ω) ∧ 𝑏𝑐)) → ((𝐹𝑏)𝑅(𝐹𝑐) ∨ (𝐹𝑏) = (𝐹𝑐)))
9796expr 643 . . . . . . . . . . 11 (((𝐹 Fn ω ∧ ∀𝑎 ∈ ω ((𝐹𝑎)𝑅(𝐹‘suc 𝑎) ∨ (𝐹𝑎) = (𝐹‘suc 𝑎)) ∧ 𝑅 Po ran 𝐹) ∧ (𝑏 ∈ ω ∧ 𝑐 ∈ ω)) → (𝑏𝑐 → ((𝐹𝑏)𝑅(𝐹𝑐) ∨ (𝐹𝑏) = (𝐹𝑐))))
9812, 13, 25, 97vtocl2 3259 . . . . . . . . . 10 (((𝐹 Fn ω ∧ ∀𝑎 ∈ ω ((𝐹𝑎)𝑅(𝐹‘suc 𝑎) ∨ (𝐹𝑎) = (𝐹‘suc 𝑎)) ∧ 𝑅 Po ran 𝐹) ∧ (𝑑 ∈ ω ∧ 𝑒 ∈ ω)) → (𝑑𝑒 → ((𝐹𝑑)𝑅(𝐹𝑒) ∨ (𝐹𝑑) = (𝐹𝑒))))
99 eleq1 2688 . . . . . . . . . . . . . . 15 (𝑏 = 𝑒 → (𝑏 ∈ ω ↔ 𝑒 ∈ ω))
100 eleq1 2688 . . . . . . . . . . . . . . 15 (𝑐 = 𝑑 → (𝑐 ∈ ω ↔ 𝑑 ∈ ω))
10199, 100bi2anan9 917 . . . . . . . . . . . . . 14 ((𝑏 = 𝑒𝑐 = 𝑑) → ((𝑏 ∈ ω ∧ 𝑐 ∈ ω) ↔ (𝑒 ∈ ω ∧ 𝑑 ∈ ω)))
102101anbi2d 740 . . . . . . . . . . . . 13 ((𝑏 = 𝑒𝑐 = 𝑑) → (((𝐹 Fn ω ∧ ∀𝑎 ∈ ω ((𝐹𝑎)𝑅(𝐹‘suc 𝑎) ∨ (𝐹𝑎) = (𝐹‘suc 𝑎)) ∧ 𝑅 Po ran 𝐹) ∧ (𝑏 ∈ ω ∧ 𝑐 ∈ ω)) ↔ ((𝐹 Fn ω ∧ ∀𝑎 ∈ ω ((𝐹𝑎)𝑅(𝐹‘suc 𝑎) ∨ (𝐹𝑎) = (𝐹‘suc 𝑎)) ∧ 𝑅 Po ran 𝐹) ∧ (𝑒 ∈ ω ∧ 𝑑 ∈ ω))))
103 sseq12 3626 . . . . . . . . . . . . . 14 ((𝑏 = 𝑒𝑐 = 𝑑) → (𝑏𝑐𝑒𝑑))
104 fveq2 6189 . . . . . . . . . . . . . . . 16 (𝑏 = 𝑒 → (𝐹𝑏) = (𝐹𝑒))
105 fveq2 6189 . . . . . . . . . . . . . . . 16 (𝑐 = 𝑑 → (𝐹𝑐) = (𝐹𝑑))
106104, 105breqan12d 4667 . . . . . . . . . . . . . . 15 ((𝑏 = 𝑒𝑐 = 𝑑) → ((𝐹𝑏)𝑅(𝐹𝑐) ↔ (𝐹𝑒)𝑅(𝐹𝑑)))
107104, 105eqeqan12d 2637 . . . . . . . . . . . . . . 15 ((𝑏 = 𝑒𝑐 = 𝑑) → ((𝐹𝑏) = (𝐹𝑐) ↔ (𝐹𝑒) = (𝐹𝑑)))
108106, 107orbi12d 746 . . . . . . . . . . . . . 14 ((𝑏 = 𝑒𝑐 = 𝑑) → (((𝐹𝑏)𝑅(𝐹𝑐) ∨ (𝐹𝑏) = (𝐹𝑐)) ↔ ((𝐹𝑒)𝑅(𝐹𝑑) ∨ (𝐹𝑒) = (𝐹𝑑))))
109103, 108imbi12d 334 . . . . . . . . . . . . 13 ((𝑏 = 𝑒𝑐 = 𝑑) → ((𝑏𝑐 → ((𝐹𝑏)𝑅(𝐹𝑐) ∨ (𝐹𝑏) = (𝐹𝑐))) ↔ (𝑒𝑑 → ((𝐹𝑒)𝑅(𝐹𝑑) ∨ (𝐹𝑒) = (𝐹𝑑)))))
110102, 109imbi12d 334 . . . . . . . . . . . 12 ((𝑏 = 𝑒𝑐 = 𝑑) → ((((𝐹 Fn ω ∧ ∀𝑎 ∈ ω ((𝐹𝑎)𝑅(𝐹‘suc 𝑎) ∨ (𝐹𝑎) = (𝐹‘suc 𝑎)) ∧ 𝑅 Po ran 𝐹) ∧ (𝑏 ∈ ω ∧ 𝑐 ∈ ω)) → (𝑏𝑐 → ((𝐹𝑏)𝑅(𝐹𝑐) ∨ (𝐹𝑏) = (𝐹𝑐)))) ↔ (((𝐹 Fn ω ∧ ∀𝑎 ∈ ω ((𝐹𝑎)𝑅(𝐹‘suc 𝑎) ∨ (𝐹𝑎) = (𝐹‘suc 𝑎)) ∧ 𝑅 Po ran 𝐹) ∧ (𝑒 ∈ ω ∧ 𝑑 ∈ ω)) → (𝑒𝑑 → ((𝐹𝑒)𝑅(𝐹𝑑) ∨ (𝐹𝑒) = (𝐹𝑑))))))
11113, 12, 110, 97vtocl2 3259 . . . . . . . . . . 11 (((𝐹 Fn ω ∧ ∀𝑎 ∈ ω ((𝐹𝑎)𝑅(𝐹‘suc 𝑎) ∨ (𝐹𝑎) = (𝐹‘suc 𝑎)) ∧ 𝑅 Po ran 𝐹) ∧ (𝑒 ∈ ω ∧ 𝑑 ∈ ω)) → (𝑒𝑑 → ((𝐹𝑒)𝑅(𝐹𝑑) ∨ (𝐹𝑒) = (𝐹𝑑))))
112111ancom2s 844 . . . . . . . . . 10 (((𝐹 Fn ω ∧ ∀𝑎 ∈ ω ((𝐹𝑎)𝑅(𝐹‘suc 𝑎) ∨ (𝐹𝑎) = (𝐹‘suc 𝑎)) ∧ 𝑅 Po ran 𝐹) ∧ (𝑑 ∈ ω ∧ 𝑒 ∈ ω)) → (𝑒𝑑 → ((𝐹𝑒)𝑅(𝐹𝑑) ∨ (𝐹𝑒) = (𝐹𝑑))))
11398, 112orim12d 883 . . . . . . . . 9 (((𝐹 Fn ω ∧ ∀𝑎 ∈ ω ((𝐹𝑎)𝑅(𝐹‘suc 𝑎) ∨ (𝐹𝑎) = (𝐹‘suc 𝑎)) ∧ 𝑅 Po ran 𝐹) ∧ (𝑑 ∈ ω ∧ 𝑒 ∈ ω)) → ((𝑑𝑒𝑒𝑑) → (((𝐹𝑑)𝑅(𝐹𝑒) ∨ (𝐹𝑑) = (𝐹𝑒)) ∨ ((𝐹𝑒)𝑅(𝐹𝑑) ∨ (𝐹𝑒) = (𝐹𝑑)))))
11411, 113mpd 15 . . . . . . . 8 (((𝐹 Fn ω ∧ ∀𝑎 ∈ ω ((𝐹𝑎)𝑅(𝐹‘suc 𝑎) ∨ (𝐹𝑎) = (𝐹‘suc 𝑎)) ∧ 𝑅 Po ran 𝐹) ∧ (𝑑 ∈ ω ∧ 𝑒 ∈ ω)) → (((𝐹𝑑)𝑅(𝐹𝑒) ∨ (𝐹𝑑) = (𝐹𝑒)) ∨ ((𝐹𝑒)𝑅(𝐹𝑑) ∨ (𝐹𝑒) = (𝐹𝑑))))
115 3mix1 1229 . . . . . . . . . 10 ((𝐹𝑑)𝑅(𝐹𝑒) → ((𝐹𝑑)𝑅(𝐹𝑒) ∨ (𝐹𝑑) = (𝐹𝑒) ∨ (𝐹𝑒)𝑅(𝐹𝑑)))
116 3mix2 1230 . . . . . . . . . 10 ((𝐹𝑑) = (𝐹𝑒) → ((𝐹𝑑)𝑅(𝐹𝑒) ∨ (𝐹𝑑) = (𝐹𝑒) ∨ (𝐹𝑒)𝑅(𝐹𝑑)))
117115, 116jaoi 394 . . . . . . . . 9 (((𝐹𝑑)𝑅(𝐹𝑒) ∨ (𝐹𝑑) = (𝐹𝑒)) → ((𝐹𝑑)𝑅(𝐹𝑒) ∨ (𝐹𝑑) = (𝐹𝑒) ∨ (𝐹𝑒)𝑅(𝐹𝑑)))
118 3mix3 1231 . . . . . . . . . 10 ((𝐹𝑒)𝑅(𝐹𝑑) → ((𝐹𝑑)𝑅(𝐹𝑒) ∨ (𝐹𝑑) = (𝐹𝑒) ∨ (𝐹𝑒)𝑅(𝐹𝑑)))
119116eqcoms 2629 . . . . . . . . . 10 ((𝐹𝑒) = (𝐹𝑑) → ((𝐹𝑑)𝑅(𝐹𝑒) ∨ (𝐹𝑑) = (𝐹𝑒) ∨ (𝐹𝑒)𝑅(𝐹𝑑)))
120118, 119jaoi 394 . . . . . . . . 9 (((𝐹𝑒)𝑅(𝐹𝑑) ∨ (𝐹𝑒) = (𝐹𝑑)) → ((𝐹𝑑)𝑅(𝐹𝑒) ∨ (𝐹𝑑) = (𝐹𝑒) ∨ (𝐹𝑒)𝑅(𝐹𝑑)))
121117, 120jaoi 394 . . . . . . . 8 ((((𝐹𝑑)𝑅(𝐹𝑒) ∨ (𝐹𝑑) = (𝐹𝑒)) ∨ ((𝐹𝑒)𝑅(𝐹𝑑) ∨ (𝐹𝑒) = (𝐹𝑑))) → ((𝐹𝑑)𝑅(𝐹𝑒) ∨ (𝐹𝑑) = (𝐹𝑒) ∨ (𝐹𝑒)𝑅(𝐹𝑑)))
122114, 121syl 17 . . . . . . 7 (((𝐹 Fn ω ∧ ∀𝑎 ∈ ω ((𝐹𝑎)𝑅(𝐹‘suc 𝑎) ∨ (𝐹𝑎) = (𝐹‘suc 𝑎)) ∧ 𝑅 Po ran 𝐹) ∧ (𝑑 ∈ ω ∧ 𝑒 ∈ ω)) → ((𝐹𝑑)𝑅(𝐹𝑒) ∨ (𝐹𝑑) = (𝐹𝑒) ∨ (𝐹𝑒)𝑅(𝐹𝑑)))
123 breq12 4656 . . . . . . . 8 (((𝐹𝑑) = 𝑏 ∧ (𝐹𝑒) = 𝑐) → ((𝐹𝑑)𝑅(𝐹𝑒) ↔ 𝑏𝑅𝑐))
124 eqeq12 2634 . . . . . . . 8 (((𝐹𝑑) = 𝑏 ∧ (𝐹𝑒) = 𝑐) → ((𝐹𝑑) = (𝐹𝑒) ↔ 𝑏 = 𝑐))
125 breq12 4656 . . . . . . . . 9 (((𝐹𝑒) = 𝑐 ∧ (𝐹𝑑) = 𝑏) → ((𝐹𝑒)𝑅(𝐹𝑑) ↔ 𝑐𝑅𝑏))
126125ancoms 469 . . . . . . . 8 (((𝐹𝑑) = 𝑏 ∧ (𝐹𝑒) = 𝑐) → ((𝐹𝑒)𝑅(𝐹𝑑) ↔ 𝑐𝑅𝑏))
127123, 124, 1263orbi123d 1397 . . . . . . 7 (((𝐹𝑑) = 𝑏 ∧ (𝐹𝑒) = 𝑐) → (((𝐹𝑑)𝑅(𝐹𝑒) ∨ (𝐹𝑑) = (𝐹𝑒) ∨ (𝐹𝑒)𝑅(𝐹𝑑)) ↔ (𝑏𝑅𝑐𝑏 = 𝑐𝑐𝑅𝑏)))
128122, 127syl5ibcom 235 . . . . . 6 (((𝐹 Fn ω ∧ ∀𝑎 ∈ ω ((𝐹𝑎)𝑅(𝐹‘suc 𝑎) ∨ (𝐹𝑎) = (𝐹‘suc 𝑎)) ∧ 𝑅 Po ran 𝐹) ∧ (𝑑 ∈ ω ∧ 𝑒 ∈ ω)) → (((𝐹𝑑) = 𝑏 ∧ (𝐹𝑒) = 𝑐) → (𝑏𝑅𝑐𝑏 = 𝑐𝑐𝑅𝑏)))
129128rexlimdvva 3036 . . . . 5 ((𝐹 Fn ω ∧ ∀𝑎 ∈ ω ((𝐹𝑎)𝑅(𝐹‘suc 𝑎) ∨ (𝐹𝑎) = (𝐹‘suc 𝑎)) ∧ 𝑅 Po ran 𝐹) → (∃𝑑 ∈ ω ∃𝑒 ∈ ω ((𝐹𝑑) = 𝑏 ∧ (𝐹𝑒) = 𝑐) → (𝑏𝑅𝑐𝑏 = 𝑐𝑐𝑅𝑏)))
1306, 129syl5bir 233 . . . 4 ((𝐹 Fn ω ∧ ∀𝑎 ∈ ω ((𝐹𝑎)𝑅(𝐹‘suc 𝑎) ∨ (𝐹𝑎) = (𝐹‘suc 𝑎)) ∧ 𝑅 Po ran 𝐹) → ((∃𝑑 ∈ ω (𝐹𝑑) = 𝑏 ∧ ∃𝑒 ∈ ω (𝐹𝑒) = 𝑐) → (𝑏𝑅𝑐𝑏 = 𝑐𝑐𝑅𝑏)))
1315, 130sylbid 230 . . 3 ((𝐹 Fn ω ∧ ∀𝑎 ∈ ω ((𝐹𝑎)𝑅(𝐹‘suc 𝑎) ∨ (𝐹𝑎) = (𝐹‘suc 𝑎)) ∧ 𝑅 Po ran 𝐹) → ((𝑏 ∈ ran 𝐹𝑐 ∈ ran 𝐹) → (𝑏𝑅𝑐𝑏 = 𝑐𝑐𝑅𝑏)))
132131ralrimivv 2969 . 2 ((𝐹 Fn ω ∧ ∀𝑎 ∈ ω ((𝐹𝑎)𝑅(𝐹‘suc 𝑎) ∨ (𝐹𝑎) = (𝐹‘suc 𝑎)) ∧ 𝑅 Po ran 𝐹) → ∀𝑏 ∈ ran 𝐹𝑐 ∈ ran 𝐹(𝑏𝑅𝑐𝑏 = 𝑐𝑐𝑅𝑏))
133 df-so 5034 . 2 (𝑅 Or ran 𝐹 ↔ (𝑅 Po ran 𝐹 ∧ ∀𝑏 ∈ ran 𝐹𝑐 ∈ ran 𝐹(𝑏𝑅𝑐𝑏 = 𝑐𝑐𝑅𝑏)))
1341, 132, 133sylanbrc 698 1 ((𝐹 Fn ω ∧ ∀𝑎 ∈ ω ((𝐹𝑎)𝑅(𝐹‘suc 𝑎) ∨ (𝐹𝑎) = (𝐹‘suc 𝑎)) ∧ 𝑅 Po ran 𝐹) → 𝑅 Or ran 𝐹)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 196  wo 383  wa 384  w3o 1036  w3a 1037   = wceq 1482  wcel 1989  wral 2911  wrex 2912  wss 3572   class class class wbr 4651   Po wpo 5031   Or wor 5032  ran crn 5113  Ord word 5720  suc csuc 5723   Fn wfn 5881  cfv 5886  ωcom 7062
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1721  ax-4 1736  ax-5 1838  ax-6 1887  ax-7 1934  ax-8 1991  ax-9 1998  ax-10 2018  ax-11 2033  ax-12 2046  ax-13 2245  ax-ext 2601  ax-sep 4779  ax-nul 4787  ax-pr 4904  ax-un 6946
This theorem depends on definitions:  df-bi 197  df-or 385  df-an 386  df-3or 1038  df-3an 1039  df-tru 1485  df-ex 1704  df-nf 1709  df-sb 1880  df-eu 2473  df-mo 2474  df-clab 2608  df-cleq 2614  df-clel 2617  df-nfc 2752  df-ne 2794  df-ral 2916  df-rex 2917  df-rab 2920  df-v 3200  df-sbc 3434  df-dif 3575  df-un 3577  df-in 3579  df-ss 3586  df-pss 3588  df-nul 3914  df-if 4085  df-pw 4158  df-sn 4176  df-pr 4178  df-tp 4180  df-op 4182  df-uni 4435  df-br 4652  df-opab 4711  df-mpt 4728  df-tr 4751  df-id 5022  df-eprel 5027  df-po 5033  df-so 5034  df-fr 5071  df-we 5073  df-xp 5118  df-rel 5119  df-cnv 5120  df-co 5121  df-dm 5122  df-rn 5123  df-ord 5724  df-on 5725  df-lim 5726  df-suc 5727  df-iota 5849  df-fun 5888  df-fn 5889  df-fv 5894  df-om 7063
This theorem is referenced by:  fin23lem40  9170
  Copyright terms: Public domain W3C validator