---

Step * 2 1 of Lemma arctangent-reduction-1


1. x : ℝ
2. r(-1) < x
3. arctangent(x) = (arctangent(r1) + arctangent((x - r1/r1 + (x * r1))))
⊢ arctangent(x) = (MachinPi4() + arctangent((x - r1/r1 + x)))
BY
{ ((Assert r0 < (r1 + x) BY Auto) THEN (RWO "-2" 0 THEN Auto) THEN BLemma `radd_functionality` THEN Auto) }

1
1. x : ℝ
2. r(-1) < x
3. arctangent(x) = (arctangent(r1) + arctangent((x - r1/r1 + (x * r1))))
4. r0 < (r1 + x)
⊢ arctangent((x - r1/r1 + (x * r1))) = arctangent((x - r1/r1 + x))

2
1. x : ℝ
2. r(-1) < x
3. arctangent(x) = (arctangent(r1) + arctangent((x - r1/r1 + (x * r1))))
4. r0 < (r1 + x)
⊢ arctangent(r1) = MachinPi4()

---

Latex:

---

Latex:

1.  x  :  \mBbbR{}
2.  r(-1)  <  x
3.  arctangent(x)  =  (arctangent(r1)  +  arctangent((x  -  r1/r1  +  (x  *  r1))))
\mvdash{}  arctangent(x)  =  (MachinPi4()  +  arctangent((x  -  r1/r1  +  x)))


By

---

Latex:
((Assert  r0  <  (r1  +  x)  BY
                Auto)
  THEN  (RWO  "-2"  0  THEN  Auto)
  THEN  BLemma  `radd\_functionality`
  THEN  Auto)

---

Home Index