Proof of Theorem prarloclem3step
| Step | Hyp | Ref
 | Expression | 
| 1 |   | nfv 1542 | 
. . 3
⊢
Ⅎ𝑦(𝑋 ∈ ω ∧
(〈𝐿, 𝑈〉 ∈ P ∧ 𝐴 ∈ 𝐿 ∧ 𝑃 ∈ Q)) | 
| 2 |   | nfre1 2540 | 
. . 3
⊢
Ⅎ𝑦∃𝑦 ∈ ω ((𝐴 +Q0
([〈𝑦,
1o〉] ~Q0
·Q0 𝑃)) ∈ 𝐿 ∧ (𝐴 +Q ([〈((𝑦 +o 2o)
+o 𝑋),
1o〉] ~Q
·Q 𝑃)) ∈ 𝑈) | 
| 3 |   | prarloclemlo 7561 | 
. . . . 5
⊢ (((𝑋 ∈ ω ∧
(〈𝐿, 𝑈〉 ∈ P ∧ 𝐴 ∈ 𝐿 ∧ 𝑃 ∈ Q)) ∧ 𝑦 ∈ ω) → ((𝐴 +Q
([〈(𝑦 +o
1o), 1o〉] ~Q
·Q 𝑃)) ∈ 𝐿 → (((𝐴 +Q0 ([〈𝑦, 1o〉]
~Q0 ·Q0 𝑃)) ∈ 𝐿 ∧ (𝐴 +Q ([〈((𝑦 +o 2o)
+o suc 𝑋),
1o〉] ~Q
·Q 𝑃)) ∈ 𝑈) → ∃𝑦 ∈ ω ((𝐴 +Q0 ([〈𝑦, 1o〉]
~Q0 ·Q0 𝑃)) ∈ 𝐿 ∧ (𝐴 +Q ([〈((𝑦 +o 2o)
+o 𝑋),
1o〉] ~Q
·Q 𝑃)) ∈ 𝑈)))) | 
| 4 |   | prarloclemup 7562 | 
. . . . 5
⊢ (((𝑋 ∈ ω ∧
(〈𝐿, 𝑈〉 ∈ P ∧ 𝐴 ∈ 𝐿 ∧ 𝑃 ∈ Q)) ∧ 𝑦 ∈ ω) → ((𝐴 +Q
([〈((𝑦 +o
2o) +o 𝑋), 1o〉]
~Q ·Q 𝑃)) ∈ 𝑈 → (((𝐴 +Q0 ([〈𝑦, 1o〉]
~Q0 ·Q0 𝑃)) ∈ 𝐿 ∧ (𝐴 +Q ([〈((𝑦 +o 2o)
+o suc 𝑋),
1o〉] ~Q
·Q 𝑃)) ∈ 𝑈) → ∃𝑦 ∈ ω ((𝐴 +Q0 ([〈𝑦, 1o〉]
~Q0 ·Q0 𝑃)) ∈ 𝐿 ∧ (𝐴 +Q ([〈((𝑦 +o 2o)
+o 𝑋),
1o〉] ~Q
·Q 𝑃)) ∈ 𝑈)))) | 
| 5 |   | prarloclemlt 7560 | 
. . . . . 6
⊢ (((𝑋 ∈ ω ∧
(〈𝐿, 𝑈〉 ∈ P ∧ 𝐴 ∈ 𝐿 ∧ 𝑃 ∈ Q)) ∧ 𝑦 ∈ ω) → (𝐴 +Q
([〈(𝑦 +o
1o), 1o〉] ~Q
·Q 𝑃)) <Q (𝐴 +Q
([〈((𝑦 +o
2o) +o 𝑋), 1o〉]
~Q ·Q 𝑃))) | 
| 6 |   | prloc 7558 | 
. . . . . . . . 9
⊢
((〈𝐿, 𝑈〉 ∈ P
∧ (𝐴
+Q ([〈(𝑦 +o 1o),
1o〉] ~Q
·Q 𝑃)) <Q (𝐴 +Q
([〈((𝑦 +o
2o) +o 𝑋), 1o〉]
~Q ·Q 𝑃))) → ((𝐴 +Q ([〈(𝑦 +o 1o),
1o〉] ~Q
·Q 𝑃)) ∈ 𝐿 ∨ (𝐴 +Q ([〈((𝑦 +o 2o)
+o 𝑋),
1o〉] ~Q
·Q 𝑃)) ∈ 𝑈)) | 
| 7 | 6 | ex 115 | 
. . . . . . . 8
⊢
(〈𝐿, 𝑈〉 ∈ P
→ ((𝐴
+Q ([〈(𝑦 +o 1o),
1o〉] ~Q
·Q 𝑃)) <Q (𝐴 +Q
([〈((𝑦 +o
2o) +o 𝑋), 1o〉]
~Q ·Q 𝑃)) → ((𝐴 +Q ([〈(𝑦 +o 1o),
1o〉] ~Q
·Q 𝑃)) ∈ 𝐿 ∨ (𝐴 +Q ([〈((𝑦 +o 2o)
+o 𝑋),
1o〉] ~Q
·Q 𝑃)) ∈ 𝑈))) | 
| 8 | 7 | 3ad2ant1 1020 | 
. . . . . . 7
⊢
((〈𝐿, 𝑈〉 ∈ P
∧ 𝐴 ∈ 𝐿 ∧ 𝑃 ∈ Q) → ((𝐴 +Q
([〈(𝑦 +o
1o), 1o〉] ~Q
·Q 𝑃)) <Q (𝐴 +Q
([〈((𝑦 +o
2o) +o 𝑋), 1o〉]
~Q ·Q 𝑃)) → ((𝐴 +Q ([〈(𝑦 +o 1o),
1o〉] ~Q
·Q 𝑃)) ∈ 𝐿 ∨ (𝐴 +Q ([〈((𝑦 +o 2o)
+o 𝑋),
1o〉] ~Q
·Q 𝑃)) ∈ 𝑈))) | 
| 9 | 8 | ad2antlr 489 | 
. . . . . 6
⊢ (((𝑋 ∈ ω ∧
(〈𝐿, 𝑈〉 ∈ P ∧ 𝐴 ∈ 𝐿 ∧ 𝑃 ∈ Q)) ∧ 𝑦 ∈ ω) → ((𝐴 +Q
([〈(𝑦 +o
1o), 1o〉] ~Q
·Q 𝑃)) <Q (𝐴 +Q
([〈((𝑦 +o
2o) +o 𝑋), 1o〉]
~Q ·Q 𝑃)) → ((𝐴 +Q ([〈(𝑦 +o 1o),
1o〉] ~Q
·Q 𝑃)) ∈ 𝐿 ∨ (𝐴 +Q ([〈((𝑦 +o 2o)
+o 𝑋),
1o〉] ~Q
·Q 𝑃)) ∈ 𝑈))) | 
| 10 | 5, 9 | mpd 13 | 
. . . . 5
⊢ (((𝑋 ∈ ω ∧
(〈𝐿, 𝑈〉 ∈ P ∧ 𝐴 ∈ 𝐿 ∧ 𝑃 ∈ Q)) ∧ 𝑦 ∈ ω) → ((𝐴 +Q
([〈(𝑦 +o
1o), 1o〉] ~Q
·Q 𝑃)) ∈ 𝐿 ∨ (𝐴 +Q ([〈((𝑦 +o 2o)
+o 𝑋),
1o〉] ~Q
·Q 𝑃)) ∈ 𝑈)) | 
| 11 | 3, 4, 10 | mpjaod 719 | 
. . . 4
⊢ (((𝑋 ∈ ω ∧
(〈𝐿, 𝑈〉 ∈ P ∧ 𝐴 ∈ 𝐿 ∧ 𝑃 ∈ Q)) ∧ 𝑦 ∈ ω) → (((𝐴 +Q0
([〈𝑦,
1o〉] ~Q0
·Q0 𝑃)) ∈ 𝐿 ∧ (𝐴 +Q ([〈((𝑦 +o 2o)
+o suc 𝑋),
1o〉] ~Q
·Q 𝑃)) ∈ 𝑈) → ∃𝑦 ∈ ω ((𝐴 +Q0 ([〈𝑦, 1o〉]
~Q0 ·Q0 𝑃)) ∈ 𝐿 ∧ (𝐴 +Q ([〈((𝑦 +o 2o)
+o 𝑋),
1o〉] ~Q
·Q 𝑃)) ∈ 𝑈))) | 
| 12 | 11 | ex 115 | 
. . 3
⊢ ((𝑋 ∈ ω ∧
(〈𝐿, 𝑈〉 ∈ P ∧ 𝐴 ∈ 𝐿 ∧ 𝑃 ∈ Q)) → (𝑦 ∈ ω → (((𝐴 +Q0
([〈𝑦,
1o〉] ~Q0
·Q0 𝑃)) ∈ 𝐿 ∧ (𝐴 +Q ([〈((𝑦 +o 2o)
+o suc 𝑋),
1o〉] ~Q
·Q 𝑃)) ∈ 𝑈) → ∃𝑦 ∈ ω ((𝐴 +Q0 ([〈𝑦, 1o〉]
~Q0 ·Q0 𝑃)) ∈ 𝐿 ∧ (𝐴 +Q ([〈((𝑦 +o 2o)
+o 𝑋),
1o〉] ~Q
·Q 𝑃)) ∈ 𝑈)))) | 
| 13 | 1, 2, 12 | rexlimd 2611 | 
. 2
⊢ ((𝑋 ∈ ω ∧
(〈𝐿, 𝑈〉 ∈ P ∧ 𝐴 ∈ 𝐿 ∧ 𝑃 ∈ Q)) →
(∃𝑦 ∈ ω
((𝐴
+Q0 ([〈𝑦, 1o〉]
~Q0 ·Q0 𝑃)) ∈ 𝐿 ∧ (𝐴 +Q ([〈((𝑦 +o 2o)
+o suc 𝑋),
1o〉] ~Q
·Q 𝑃)) ∈ 𝑈) → ∃𝑦 ∈ ω ((𝐴 +Q0 ([〈𝑦, 1o〉]
~Q0 ·Q0 𝑃)) ∈ 𝐿 ∧ (𝐴 +Q ([〈((𝑦 +o 2o)
+o 𝑋),
1o〉] ~Q
·Q 𝑃)) ∈ 𝑈))) | 
| 14 | 13 | imp 124 | 
1
⊢ (((𝑋 ∈ ω ∧
(〈𝐿, 𝑈〉 ∈ P ∧ 𝐴 ∈ 𝐿 ∧ 𝑃 ∈ Q)) ∧ ∃𝑦 ∈ ω ((𝐴 +Q0
([〈𝑦,
1o〉] ~Q0
·Q0 𝑃)) ∈ 𝐿 ∧ (𝐴 +Q ([〈((𝑦 +o 2o)
+o suc 𝑋),
1o〉] ~Q
·Q 𝑃)) ∈ 𝑈)) → ∃𝑦 ∈ ω ((𝐴 +Q0 ([〈𝑦, 1o〉]
~Q0 ·Q0 𝑃)) ∈ 𝐿 ∧ (𝐴 +Q ([〈((𝑦 +o 2o)
+o 𝑋),
1o〉] ~Q
·Q 𝑃)) ∈ 𝑈)) |