---

Step * of Lemma lgc-req

∀[a,x:ℝ].  lgc(a;x) = log-contraction(a;x) supposing r0 < a
BY
{ (Auto
   THEN (Assert r0 < (a + e^x) BY
               ((InstLemma `rexp-positive` [⌜x⌝]⋅ THENA Auto) THEN RWO  "-1<" 0 THEN Auto))
   THEN RepUR ``lgc log-contraction`` 0) }

1
1. a : ℝ
2. x : ℝ
3. r0 < a
4. r0 < (a + e^x)
⊢ ((x - r(2)) + 4 * (a/a + real_exp(x))) = (x + (r(2) * (a - e^x/a + e^x)))

---

Latex:

---

Latex:
\mforall{}[a,x:\mBbbR{}].    lgc(a;x)  =  log-contraction(a;x)  supposing  r0  <  a


By

---

Latex:
(Auto
  THEN  (Assert  r0  <  (a  +  e\^{}x)  BY
                          ((InstLemma  `rexp-positive`  [\mkleeneopen{}x\mkleeneclose{}]\mcdot{}  THENA  Auto)  THEN  RWO    "-1<"  0  THEN  Auto))
  THEN  RepUR  ``lgc  log-contraction``  0)

---

Home Index