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

Theorem addclsr 7278
Description: Closure of addition on signed reals. (Contributed by NM, 25-Jul-1995.)
Assertion
Ref Expression
addclsr ((𝐴R𝐵R) → (𝐴 +R 𝐵) ∈ R)

Proof of Theorem addclsr
Dummy variables 𝑥 𝑦 𝑧 𝑤 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 df-nr 7252 . . 3 R = ((P × P) / ~R )
2 oveq1 5641 . . . 4 ([⟨𝑥, 𝑦⟩] ~R = 𝐴 → ([⟨𝑥, 𝑦⟩] ~R +R [⟨𝑧, 𝑤⟩] ~R ) = (𝐴 +R [⟨𝑧, 𝑤⟩] ~R ))
32eleq1d 2156 . . 3 ([⟨𝑥, 𝑦⟩] ~R = 𝐴 → (([⟨𝑥, 𝑦⟩] ~R +R [⟨𝑧, 𝑤⟩] ~R ) ∈ ((P × P) / ~R ) ↔ (𝐴 +R [⟨𝑧, 𝑤⟩] ~R ) ∈ ((P × P) / ~R )))
4 oveq2 5642 . . . 4 ([⟨𝑧, 𝑤⟩] ~R = 𝐵 → (𝐴 +R [⟨𝑧, 𝑤⟩] ~R ) = (𝐴 +R 𝐵))
54eleq1d 2156 . . 3 ([⟨𝑧, 𝑤⟩] ~R = 𝐵 → ((𝐴 +R [⟨𝑧, 𝑤⟩] ~R ) ∈ ((P × P) / ~R ) ↔ (𝐴 +R 𝐵) ∈ ((P × P) / ~R )))
6 addsrpr 7270 . . . 4 (((𝑥P𝑦P) ∧ (𝑧P𝑤P)) → ([⟨𝑥, 𝑦⟩] ~R +R [⟨𝑧, 𝑤⟩] ~R ) = [⟨(𝑥 +P 𝑧), (𝑦 +P 𝑤)⟩] ~R )
7 addclpr 7075 . . . . . . 7 ((𝑥P𝑧P) → (𝑥 +P 𝑧) ∈ P)
8 addclpr 7075 . . . . . . 7 ((𝑦P𝑤P) → (𝑦 +P 𝑤) ∈ P)
97, 8anim12i 331 . . . . . 6 (((𝑥P𝑧P) ∧ (𝑦P𝑤P)) → ((𝑥 +P 𝑧) ∈ P ∧ (𝑦 +P 𝑤) ∈ P))
109an4s 555 . . . . 5 (((𝑥P𝑦P) ∧ (𝑧P𝑤P)) → ((𝑥 +P 𝑧) ∈ P ∧ (𝑦 +P 𝑤) ∈ P))
11 opelxpi 4459 . . . . 5 (((𝑥 +P 𝑧) ∈ P ∧ (𝑦 +P 𝑤) ∈ P) → ⟨(𝑥 +P 𝑧), (𝑦 +P 𝑤)⟩ ∈ (P × P))
12 enrex 7262 . . . . . 6 ~R ∈ V
1312ecelqsi 6326 . . . . 5 (⟨(𝑥 +P 𝑧), (𝑦 +P 𝑤)⟩ ∈ (P × P) → [⟨(𝑥 +P 𝑧), (𝑦 +P 𝑤)⟩] ~R ∈ ((P × P) / ~R ))
1410, 11, 133syl 17 . . . 4 (((𝑥P𝑦P) ∧ (𝑧P𝑤P)) → [⟨(𝑥 +P 𝑧), (𝑦 +P 𝑤)⟩] ~R ∈ ((P × P) / ~R ))
156, 14eqeltrd 2164 . . 3 (((𝑥P𝑦P) ∧ (𝑧P𝑤P)) → ([⟨𝑥, 𝑦⟩] ~R +R [⟨𝑧, 𝑤⟩] ~R ) ∈ ((P × P) / ~R ))
161, 3, 5, 152ecoptocl 6360 . 2 ((𝐴R𝐵R) → (𝐴 +R 𝐵) ∈ ((P × P) / ~R ))
1716, 1syl6eleqr 2181 1 ((𝐴R𝐵R) → (𝐴 +R 𝐵) ∈ R)
Colors of variables: wff set class
Syntax hints:  wi 4  wa 102   = wceq 1289  wcel 1438  cop 3444   × cxp 4426  (class class class)co 5634  [cec 6270   / cqs 6271  Pcnp 6829   +P cpp 6831   ~R cer 6834  Rcnr 6835   +R cplr 6839
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-in1 579  ax-in2 580  ax-io 665  ax-5 1381  ax-7 1382  ax-gen 1383  ax-ie1 1427  ax-ie2 1428  ax-8 1440  ax-10 1441  ax-11 1442  ax-i12 1443  ax-bndl 1444  ax-4 1445  ax-13 1449  ax-14 1450  ax-17 1464  ax-i9 1468  ax-ial 1472  ax-i5r 1473  ax-ext 2070  ax-coll 3946  ax-sep 3949  ax-nul 3957  ax-pow 4001  ax-pr 4027  ax-un 4251  ax-setind 4343  ax-iinf 4393
This theorem depends on definitions:  df-bi 115  df-dc 781  df-3or 925  df-3an 926  df-tru 1292  df-fal 1295  df-nf 1395  df-sb 1693  df-eu 1951  df-mo 1952  df-clab 2075  df-cleq 2081  df-clel 2084  df-nfc 2217  df-ne 2256  df-ral 2364  df-rex 2365  df-reu 2366  df-rab 2368  df-v 2621  df-sbc 2839  df-csb 2932  df-dif 2999  df-un 3001  df-in 3003  df-ss 3010  df-nul 3285  df-pw 3427  df-sn 3447  df-pr 3448  df-op 3450  df-uni 3649  df-int 3684  df-iun 3727  df-br 3838  df-opab 3892  df-mpt 3893  df-tr 3929  df-eprel 4107  df-id 4111  df-po 4114  df-iso 4115  df-iord 4184  df-on 4186  df-suc 4189  df-iom 4396  df-xp 4434  df-rel 4435  df-cnv 4436  df-co 4437  df-dm 4438  df-rn 4439  df-res 4440  df-ima 4441  df-iota 4967  df-fun 5004  df-fn 5005  df-f 5006  df-f1 5007  df-fo 5008  df-f1o 5009  df-fv 5010  df-ov 5637  df-oprab 5638  df-mpt2 5639  df-1st 5893  df-2nd 5894  df-recs 6052  df-irdg 6117  df-1o 6163  df-2o 6164  df-oadd 6167  df-omul 6168  df-er 6272  df-ec 6274  df-qs 6278  df-ni 6842  df-pli 6843  df-mi 6844  df-lti 6845  df-plpq 6882  df-mpq 6883  df-enq 6885  df-nqqs 6886  df-plqqs 6887  df-mqqs 6888  df-1nqqs 6889  df-rq 6890  df-ltnqqs 6891  df-enq0 6962  df-nq0 6963  df-0nq0 6964  df-plq0 6965  df-mq0 6966  df-inp 7004  df-iplp 7006  df-enr 7251  df-nr 7252  df-plr 7253
This theorem is referenced by:  caucvgsrlemoffval  7320  caucvgsrlemofff  7321  caucvgsrlemoffcau  7322  caucvgsrlemoffres  7324  caucvgsr  7326  addcnsr  7350  mulcnsr  7351  addcnsrec  7358  mulcnsrec  7359  axaddcl  7380  axaddrcl  7381  axmulcl  7382  axaddass  7386  axmulass  7387  axdistr  7388
  Copyright terms: Public domain W3C validator