ILE Home Intuitionistic Logic Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  ILE Home  >  Th. List  >  caucvgprprlemcbv GIF version

Theorem caucvgprprlemcbv 6877
Description: Lemma for caucvgprpr 6902. Change bound variables in Cauchy condition. (Contributed by Jim Kingdon, 12-Feb-2021.)
Hypotheses
Ref Expression
caucvgprpr.f (𝜑𝐹:NP)
caucvgprpr.cau (𝜑 → ∀𝑛N𝑘N (𝑛 <N 𝑘 → ((𝐹𝑛)<P ((𝐹𝑘) +P ⟨{𝑙𝑙 <Q (*Q‘[⟨𝑛, 1𝑜⟩] ~Q )}, {𝑢 ∣ (*Q‘[⟨𝑛, 1𝑜⟩] ~Q ) <Q 𝑢}⟩) ∧ (𝐹𝑘)<P ((𝐹𝑛) +P ⟨{𝑙𝑙 <Q (*Q‘[⟨𝑛, 1𝑜⟩] ~Q )}, {𝑢 ∣ (*Q‘[⟨𝑛, 1𝑜⟩] ~Q ) <Q 𝑢}⟩))))
Assertion
Ref Expression
caucvgprprlemcbv (𝜑 → ∀𝑎N𝑏N (𝑎 <N 𝑏 → ((𝐹𝑎)<P ((𝐹𝑏) +P ⟨{𝑙𝑙 <Q (*Q‘[⟨𝑎, 1𝑜⟩] ~Q )}, {𝑢 ∣ (*Q‘[⟨𝑎, 1𝑜⟩] ~Q ) <Q 𝑢}⟩) ∧ (𝐹𝑏)<P ((𝐹𝑎) +P ⟨{𝑙𝑙 <Q (*Q‘[⟨𝑎, 1𝑜⟩] ~Q )}, {𝑢 ∣ (*Q‘[⟨𝑎, 1𝑜⟩] ~Q ) <Q 𝑢}⟩))))
Distinct variable groups:   𝐹,𝑎,𝑏,𝑘   𝑛,𝐹,𝑎,𝑘   𝑎,𝑙,𝑏,𝑘   𝑢,𝑎,𝑏,𝑘   𝑛,𝑙   𝑢,𝑛
Allowed substitution hints:   𝜑(𝑢,𝑘,𝑛,𝑎,𝑏,𝑙)   𝐹(𝑢,𝑙)

Proof of Theorem caucvgprprlemcbv
StepHypRef Expression
1 caucvgprpr.cau . 2 (𝜑 → ∀𝑛N𝑘N (𝑛 <N 𝑘 → ((𝐹𝑛)<P ((𝐹𝑘) +P ⟨{𝑙𝑙 <Q (*Q‘[⟨𝑛, 1𝑜⟩] ~Q )}, {𝑢 ∣ (*Q‘[⟨𝑛, 1𝑜⟩] ~Q ) <Q 𝑢}⟩) ∧ (𝐹𝑘)<P ((𝐹𝑛) +P ⟨{𝑙𝑙 <Q (*Q‘[⟨𝑛, 1𝑜⟩] ~Q )}, {𝑢 ∣ (*Q‘[⟨𝑛, 1𝑜⟩] ~Q ) <Q 𝑢}⟩))))
2 breq1 3788 . . . 4 (𝑛 = 𝑎 → (𝑛 <N 𝑘𝑎 <N 𝑘))
3 fveq2 5198 . . . . . 6 (𝑛 = 𝑎 → (𝐹𝑛) = (𝐹𝑎))
4 opeq1 3570 . . . . . . . . . . . 12 (𝑛 = 𝑎 → ⟨𝑛, 1𝑜⟩ = ⟨𝑎, 1𝑜⟩)
54eceq1d 6165 . . . . . . . . . . 11 (𝑛 = 𝑎 → [⟨𝑛, 1𝑜⟩] ~Q = [⟨𝑎, 1𝑜⟩] ~Q )
65fveq2d 5202 . . . . . . . . . 10 (𝑛 = 𝑎 → (*Q‘[⟨𝑛, 1𝑜⟩] ~Q ) = (*Q‘[⟨𝑎, 1𝑜⟩] ~Q ))
76breq2d 3797 . . . . . . . . 9 (𝑛 = 𝑎 → (𝑙 <Q (*Q‘[⟨𝑛, 1𝑜⟩] ~Q ) ↔ 𝑙 <Q (*Q‘[⟨𝑎, 1𝑜⟩] ~Q )))
87abbidv 2196 . . . . . . . 8 (𝑛 = 𝑎 → {𝑙𝑙 <Q (*Q‘[⟨𝑛, 1𝑜⟩] ~Q )} = {𝑙𝑙 <Q (*Q‘[⟨𝑎, 1𝑜⟩] ~Q )})
96breq1d 3795 . . . . . . . . 9 (𝑛 = 𝑎 → ((*Q‘[⟨𝑛, 1𝑜⟩] ~Q ) <Q 𝑢 ↔ (*Q‘[⟨𝑎, 1𝑜⟩] ~Q ) <Q 𝑢))
109abbidv 2196 . . . . . . . 8 (𝑛 = 𝑎 → {𝑢 ∣ (*Q‘[⟨𝑛, 1𝑜⟩] ~Q ) <Q 𝑢} = {𝑢 ∣ (*Q‘[⟨𝑎, 1𝑜⟩] ~Q ) <Q 𝑢})
118, 10opeq12d 3578 . . . . . . 7 (𝑛 = 𝑎 → ⟨{𝑙𝑙 <Q (*Q‘[⟨𝑛, 1𝑜⟩] ~Q )}, {𝑢 ∣ (*Q‘[⟨𝑛, 1𝑜⟩] ~Q ) <Q 𝑢}⟩ = ⟨{𝑙𝑙 <Q (*Q‘[⟨𝑎, 1𝑜⟩] ~Q )}, {𝑢 ∣ (*Q‘[⟨𝑎, 1𝑜⟩] ~Q ) <Q 𝑢}⟩)
1211oveq2d 5548 . . . . . 6 (𝑛 = 𝑎 → ((𝐹𝑘) +P ⟨{𝑙𝑙 <Q (*Q‘[⟨𝑛, 1𝑜⟩] ~Q )}, {𝑢 ∣ (*Q‘[⟨𝑛, 1𝑜⟩] ~Q ) <Q 𝑢}⟩) = ((𝐹𝑘) +P ⟨{𝑙𝑙 <Q (*Q‘[⟨𝑎, 1𝑜⟩] ~Q )}, {𝑢 ∣ (*Q‘[⟨𝑎, 1𝑜⟩] ~Q ) <Q 𝑢}⟩))
133, 12breq12d 3798 . . . . 5 (𝑛 = 𝑎 → ((𝐹𝑛)<P ((𝐹𝑘) +P ⟨{𝑙𝑙 <Q (*Q‘[⟨𝑛, 1𝑜⟩] ~Q )}, {𝑢 ∣ (*Q‘[⟨𝑛, 1𝑜⟩] ~Q ) <Q 𝑢}⟩) ↔ (𝐹𝑎)<P ((𝐹𝑘) +P ⟨{𝑙𝑙 <Q (*Q‘[⟨𝑎, 1𝑜⟩] ~Q )}, {𝑢 ∣ (*Q‘[⟨𝑎, 1𝑜⟩] ~Q ) <Q 𝑢}⟩)))
143, 11oveq12d 5550 . . . . . 6 (𝑛 = 𝑎 → ((𝐹𝑛) +P ⟨{𝑙𝑙 <Q (*Q‘[⟨𝑛, 1𝑜⟩] ~Q )}, {𝑢 ∣ (*Q‘[⟨𝑛, 1𝑜⟩] ~Q ) <Q 𝑢}⟩) = ((𝐹𝑎) +P ⟨{𝑙𝑙 <Q (*Q‘[⟨𝑎, 1𝑜⟩] ~Q )}, {𝑢 ∣ (*Q‘[⟨𝑎, 1𝑜⟩] ~Q ) <Q 𝑢}⟩))
1514breq2d 3797 . . . . 5 (𝑛 = 𝑎 → ((𝐹𝑘)<P ((𝐹𝑛) +P ⟨{𝑙𝑙 <Q (*Q‘[⟨𝑛, 1𝑜⟩] ~Q )}, {𝑢 ∣ (*Q‘[⟨𝑛, 1𝑜⟩] ~Q ) <Q 𝑢}⟩) ↔ (𝐹𝑘)<P ((𝐹𝑎) +P ⟨{𝑙𝑙 <Q (*Q‘[⟨𝑎, 1𝑜⟩] ~Q )}, {𝑢 ∣ (*Q‘[⟨𝑎, 1𝑜⟩] ~Q ) <Q 𝑢}⟩)))
1613, 15anbi12d 456 . . . 4 (𝑛 = 𝑎 → (((𝐹𝑛)<P ((𝐹𝑘) +P ⟨{𝑙𝑙 <Q (*Q‘[⟨𝑛, 1𝑜⟩] ~Q )}, {𝑢 ∣ (*Q‘[⟨𝑛, 1𝑜⟩] ~Q ) <Q 𝑢}⟩) ∧ (𝐹𝑘)<P ((𝐹𝑛) +P ⟨{𝑙𝑙 <Q (*Q‘[⟨𝑛, 1𝑜⟩] ~Q )}, {𝑢 ∣ (*Q‘[⟨𝑛, 1𝑜⟩] ~Q ) <Q 𝑢}⟩)) ↔ ((𝐹𝑎)<P ((𝐹𝑘) +P ⟨{𝑙𝑙 <Q (*Q‘[⟨𝑎, 1𝑜⟩] ~Q )}, {𝑢 ∣ (*Q‘[⟨𝑎, 1𝑜⟩] ~Q ) <Q 𝑢}⟩) ∧ (𝐹𝑘)<P ((𝐹𝑎) +P ⟨{𝑙𝑙 <Q (*Q‘[⟨𝑎, 1𝑜⟩] ~Q )}, {𝑢 ∣ (*Q‘[⟨𝑎, 1𝑜⟩] ~Q ) <Q 𝑢}⟩))))
172, 16imbi12d 232 . . 3 (𝑛 = 𝑎 → ((𝑛 <N 𝑘 → ((𝐹𝑛)<P ((𝐹𝑘) +P ⟨{𝑙𝑙 <Q (*Q‘[⟨𝑛, 1𝑜⟩] ~Q )}, {𝑢 ∣ (*Q‘[⟨𝑛, 1𝑜⟩] ~Q ) <Q 𝑢}⟩) ∧ (𝐹𝑘)<P ((𝐹𝑛) +P ⟨{𝑙𝑙 <Q (*Q‘[⟨𝑛, 1𝑜⟩] ~Q )}, {𝑢 ∣ (*Q‘[⟨𝑛, 1𝑜⟩] ~Q ) <Q 𝑢}⟩))) ↔ (𝑎 <N 𝑘 → ((𝐹𝑎)<P ((𝐹𝑘) +P ⟨{𝑙𝑙 <Q (*Q‘[⟨𝑎, 1𝑜⟩] ~Q )}, {𝑢 ∣ (*Q‘[⟨𝑎, 1𝑜⟩] ~Q ) <Q 𝑢}⟩) ∧ (𝐹𝑘)<P ((𝐹𝑎) +P ⟨{𝑙𝑙 <Q (*Q‘[⟨𝑎, 1𝑜⟩] ~Q )}, {𝑢 ∣ (*Q‘[⟨𝑎, 1𝑜⟩] ~Q ) <Q 𝑢}⟩)))))
18 breq2 3789 . . . 4 (𝑘 = 𝑏 → (𝑎 <N 𝑘𝑎 <N 𝑏))
19 fveq2 5198 . . . . . . 7 (𝑘 = 𝑏 → (𝐹𝑘) = (𝐹𝑏))
2019oveq1d 5547 . . . . . 6 (𝑘 = 𝑏 → ((𝐹𝑘) +P ⟨{𝑙𝑙 <Q (*Q‘[⟨𝑎, 1𝑜⟩] ~Q )}, {𝑢 ∣ (*Q‘[⟨𝑎, 1𝑜⟩] ~Q ) <Q 𝑢}⟩) = ((𝐹𝑏) +P ⟨{𝑙𝑙 <Q (*Q‘[⟨𝑎, 1𝑜⟩] ~Q )}, {𝑢 ∣ (*Q‘[⟨𝑎, 1𝑜⟩] ~Q ) <Q 𝑢}⟩))
2120breq2d 3797 . . . . 5 (𝑘 = 𝑏 → ((𝐹𝑎)<P ((𝐹𝑘) +P ⟨{𝑙𝑙 <Q (*Q‘[⟨𝑎, 1𝑜⟩] ~Q )}, {𝑢 ∣ (*Q‘[⟨𝑎, 1𝑜⟩] ~Q ) <Q 𝑢}⟩) ↔ (𝐹𝑎)<P ((𝐹𝑏) +P ⟨{𝑙𝑙 <Q (*Q‘[⟨𝑎, 1𝑜⟩] ~Q )}, {𝑢 ∣ (*Q‘[⟨𝑎, 1𝑜⟩] ~Q ) <Q 𝑢}⟩)))
2219breq1d 3795 . . . . 5 (𝑘 = 𝑏 → ((𝐹𝑘)<P ((𝐹𝑎) +P ⟨{𝑙𝑙 <Q (*Q‘[⟨𝑎, 1𝑜⟩] ~Q )}, {𝑢 ∣ (*Q‘[⟨𝑎, 1𝑜⟩] ~Q ) <Q 𝑢}⟩) ↔ (𝐹𝑏)<P ((𝐹𝑎) +P ⟨{𝑙𝑙 <Q (*Q‘[⟨𝑎, 1𝑜⟩] ~Q )}, {𝑢 ∣ (*Q‘[⟨𝑎, 1𝑜⟩] ~Q ) <Q 𝑢}⟩)))
2321, 22anbi12d 456 . . . 4 (𝑘 = 𝑏 → (((𝐹𝑎)<P ((𝐹𝑘) +P ⟨{𝑙𝑙 <Q (*Q‘[⟨𝑎, 1𝑜⟩] ~Q )}, {𝑢 ∣ (*Q‘[⟨𝑎, 1𝑜⟩] ~Q ) <Q 𝑢}⟩) ∧ (𝐹𝑘)<P ((𝐹𝑎) +P ⟨{𝑙𝑙 <Q (*Q‘[⟨𝑎, 1𝑜⟩] ~Q )}, {𝑢 ∣ (*Q‘[⟨𝑎, 1𝑜⟩] ~Q ) <Q 𝑢}⟩)) ↔ ((𝐹𝑎)<P ((𝐹𝑏) +P ⟨{𝑙𝑙 <Q (*Q‘[⟨𝑎, 1𝑜⟩] ~Q )}, {𝑢 ∣ (*Q‘[⟨𝑎, 1𝑜⟩] ~Q ) <Q 𝑢}⟩) ∧ (𝐹𝑏)<P ((𝐹𝑎) +P ⟨{𝑙𝑙 <Q (*Q‘[⟨𝑎, 1𝑜⟩] ~Q )}, {𝑢 ∣ (*Q‘[⟨𝑎, 1𝑜⟩] ~Q ) <Q 𝑢}⟩))))
2418, 23imbi12d 232 . . 3 (𝑘 = 𝑏 → ((𝑎 <N 𝑘 → ((𝐹𝑎)<P ((𝐹𝑘) +P ⟨{𝑙𝑙 <Q (*Q‘[⟨𝑎, 1𝑜⟩] ~Q )}, {𝑢 ∣ (*Q‘[⟨𝑎, 1𝑜⟩] ~Q ) <Q 𝑢}⟩) ∧ (𝐹𝑘)<P ((𝐹𝑎) +P ⟨{𝑙𝑙 <Q (*Q‘[⟨𝑎, 1𝑜⟩] ~Q )}, {𝑢 ∣ (*Q‘[⟨𝑎, 1𝑜⟩] ~Q ) <Q 𝑢}⟩))) ↔ (𝑎 <N 𝑏 → ((𝐹𝑎)<P ((𝐹𝑏) +P ⟨{𝑙𝑙 <Q (*Q‘[⟨𝑎, 1𝑜⟩] ~Q )}, {𝑢 ∣ (*Q‘[⟨𝑎, 1𝑜⟩] ~Q ) <Q 𝑢}⟩) ∧ (𝐹𝑏)<P ((𝐹𝑎) +P ⟨{𝑙𝑙 <Q (*Q‘[⟨𝑎, 1𝑜⟩] ~Q )}, {𝑢 ∣ (*Q‘[⟨𝑎, 1𝑜⟩] ~Q ) <Q 𝑢}⟩)))))
2517, 24cbvral2v 2585 . 2 (∀𝑛N𝑘N (𝑛 <N 𝑘 → ((𝐹𝑛)<P ((𝐹𝑘) +P ⟨{𝑙𝑙 <Q (*Q‘[⟨𝑛, 1𝑜⟩] ~Q )}, {𝑢 ∣ (*Q‘[⟨𝑛, 1𝑜⟩] ~Q ) <Q 𝑢}⟩) ∧ (𝐹𝑘)<P ((𝐹𝑛) +P ⟨{𝑙𝑙 <Q (*Q‘[⟨𝑛, 1𝑜⟩] ~Q )}, {𝑢 ∣ (*Q‘[⟨𝑛, 1𝑜⟩] ~Q ) <Q 𝑢}⟩))) ↔ ∀𝑎N𝑏N (𝑎 <N 𝑏 → ((𝐹𝑎)<P ((𝐹𝑏) +P ⟨{𝑙𝑙 <Q (*Q‘[⟨𝑎, 1𝑜⟩] ~Q )}, {𝑢 ∣ (*Q‘[⟨𝑎, 1𝑜⟩] ~Q ) <Q 𝑢}⟩) ∧ (𝐹𝑏)<P ((𝐹𝑎) +P ⟨{𝑙𝑙 <Q (*Q‘[⟨𝑎, 1𝑜⟩] ~Q )}, {𝑢 ∣ (*Q‘[⟨𝑎, 1𝑜⟩] ~Q ) <Q 𝑢}⟩))))
261, 25sylib 120 1 (𝜑 → ∀𝑎N𝑏N (𝑎 <N 𝑏 → ((𝐹𝑎)<P ((𝐹𝑏) +P ⟨{𝑙𝑙 <Q (*Q‘[⟨𝑎, 1𝑜⟩] ~Q )}, {𝑢 ∣ (*Q‘[⟨𝑎, 1𝑜⟩] ~Q ) <Q 𝑢}⟩) ∧ (𝐹𝑏)<P ((𝐹𝑎) +P ⟨{𝑙𝑙 <Q (*Q‘[⟨𝑎, 1𝑜⟩] ~Q )}, {𝑢 ∣ (*Q‘[⟨𝑎, 1𝑜⟩] ~Q ) <Q 𝑢}⟩))))
Colors of variables: wff set class
Syntax hints:  wi 4  wa 102  {cab 2067  wral 2348  cop 3401   class class class wbr 3785  wf 4918  cfv 4922  (class class class)co 5532  1𝑜c1o 6017  [cec 6127  Ncnpi 6462   <N clti 6465   ~Q ceq 6469  *Qcrq 6474   <Q cltq 6475  Pcnp 6481   +P cpp 6483  <P cltp 6485
This theorem was proved from axioms:  ax-1 5  ax-2 6  ax-mp 7  ax-ia1 104  ax-ia2 105  ax-ia3 106  ax-io 662  ax-5 1376  ax-7 1377  ax-gen 1378  ax-ie1 1422  ax-ie2 1423  ax-8 1435  ax-10 1436  ax-11 1437  ax-i12 1438  ax-bndl 1439  ax-4 1440  ax-17 1459  ax-i9 1463  ax-ial 1467  ax-i5r 1468  ax-ext 2063
This theorem depends on definitions:  df-bi 115  df-3an 921  df-tru 1287  df-nf 1390  df-sb 1686  df-clab 2068  df-cleq 2074  df-clel 2077  df-nfc 2208  df-ral 2353  df-rex 2354  df-v 2603  df-un 2977  df-in 2979  df-ss 2986  df-sn 3404  df-pr 3405  df-op 3407  df-uni 3602  df-br 3786  df-opab 3840  df-xp 4369  df-cnv 4371  df-dm 4373  df-rn 4374  df-res 4375  df-ima 4376  df-iota 4887  df-fv 4930  df-ov 5535  df-ec 6131
This theorem is referenced by:  caucvgprprlemval  6878
  Copyright terms: Public domain W3C validator