\[\frac{\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\alpha + \beta\right) + 2 \cdot i}}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2.0} + 1.0}{2.0}\]
Test:
Octave 3.8, jcobi/2
Bits:
128 bits
Bits error versus alpha
Bits error versus beta
Bits error versus i
Time: 53.2 s
Input Error: 23.3
Output Error: 0.7
Log: ⚲
Profile: 🕒
\(\begin{cases} \frac{\left(\frac{8.0}{{\alpha}^3} - \frac{\frac{4.0}{\alpha}}{\alpha}\right) + \frac{2.0}{\alpha}}{2.0} & \text{when } \frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\alpha + \beta\right) + 2 \cdot i} \le -1.7166091797141862 \cdot 10^{+41} \\ \frac{\frac{\frac{\alpha + \beta}{1} \cdot \sqrt[3]{{\left(\frac{\beta - \alpha}{i \cdot 2 + \left(\beta + \alpha\right)}\right)}^3}}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2.0} + 1.0}{2.0} & \text{otherwise} \end{cases}\)

    if (/ (* (+ alpha beta) (- beta alpha)) (+ (+ alpha beta) (* 2 i))) < -1.7166091797141862e+41

    1. Started with
      \[\frac{\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\alpha + \beta\right) + 2 \cdot i}}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2.0} + 1.0}{2.0}\]
      62.5
    2. Applied taylor to get
      \[\frac{\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\alpha + \beta\right) + 2 \cdot i}}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2.0} + 1.0}{2.0} \leadsto \frac{\left(8.0 \cdot \frac{1}{{\alpha}^{3}} + 2.0 \cdot \frac{1}{\alpha}\right) - 4.0 \cdot \frac{1}{{\alpha}^2}}{2.0}\]
      0.1
    3. Taylor expanded around inf to get
      \[\frac{\color{red}{\left(8.0 \cdot \frac{1}{{\alpha}^{3}} + 2.0 \cdot \frac{1}{\alpha}\right) - 4.0 \cdot \frac{1}{{\alpha}^2}}}{2.0} \leadsto \frac{\color{blue}{\left(8.0 \cdot \frac{1}{{\alpha}^{3}} + 2.0 \cdot \frac{1}{\alpha}\right) - 4.0 \cdot \frac{1}{{\alpha}^2}}}{2.0}\]
      0.1
    4. Applied simplify to get
      \[\color{red}{\frac{\left(8.0 \cdot \frac{1}{{\alpha}^{3}} + 2.0 \cdot \frac{1}{\alpha}\right) - 4.0 \cdot \frac{1}{{\alpha}^2}}{2.0}} \leadsto \color{blue}{\frac{\frac{2.0}{\alpha} + \left(\frac{\frac{8.0}{\alpha}}{\alpha \cdot \alpha} - \frac{4.0}{\alpha \cdot \alpha}\right)}{2.0}}\]
      0.1
    5. Applied simplify to get
      \[\frac{\color{red}{\frac{2.0}{\alpha} + \left(\frac{\frac{8.0}{\alpha}}{\alpha \cdot \alpha} - \frac{4.0}{\alpha \cdot \alpha}\right)}}{2.0} \leadsto \frac{\color{blue}{\left(\frac{8.0}{{\alpha}^3} - \frac{\frac{4.0}{\alpha}}{\alpha}\right) + \frac{2.0}{\alpha}}}{2.0}\]
      0.1

    if -1.7166091797141862e+41 < (/ (* (+ alpha beta) (- beta alpha)) (+ (+ alpha beta) (* 2 i)))

    1. Started with
      \[\frac{\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\alpha + \beta\right) + 2 \cdot i}}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2.0} + 1.0}{2.0}\]
      12.2
    2. Using strategy rm
      12.2
    3. Applied *-un-lft-identity to get
      \[\frac{\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\color{red}{\left(\alpha + \beta\right) + 2 \cdot i}}}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2.0} + 1.0}{2.0} \leadsto \frac{\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\color{blue}{1 \cdot \left(\left(\alpha + \beta\right) + 2 \cdot i\right)}}}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2.0} + 1.0}{2.0}\]
      12.2
    4. Applied times-frac to get
      \[\frac{\frac{\color{red}{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{1 \cdot \left(\left(\alpha + \beta\right) + 2 \cdot i\right)}}}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2.0} + 1.0}{2.0} \leadsto \frac{\frac{\color{blue}{\frac{\alpha + \beta}{1} \cdot \frac{\beta - \alpha}{\left(\alpha + \beta\right) + 2 \cdot i}}}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2.0} + 1.0}{2.0}\]
      0.9
    5. Using strategy rm
      0.9
    6. Applied add-cbrt-cube to get
      \[\frac{\frac{\frac{\alpha + \beta}{1} \cdot \frac{\beta - \alpha}{\color{red}{\left(\alpha + \beta\right) + 2 \cdot i}}}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2.0} + 1.0}{2.0} \leadsto \frac{\frac{\frac{\alpha + \beta}{1} \cdot \frac{\beta - \alpha}{\color{blue}{\sqrt[3]{{\left(\left(\alpha + \beta\right) + 2 \cdot i\right)}^3}}}}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2.0} + 1.0}{2.0}\]
      16.7
    7. Applied add-cbrt-cube to get
      \[\frac{\frac{\frac{\alpha + \beta}{1} \cdot \frac{\color{red}{\beta - \alpha}}{\sqrt[3]{{\left(\left(\alpha + \beta\right) + 2 \cdot i\right)}^3}}}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2.0} + 1.0}{2.0} \leadsto \frac{\frac{\frac{\alpha + \beta}{1} \cdot \frac{\color{blue}{\sqrt[3]{{\left(\beta - \alpha\right)}^3}}}{\sqrt[3]{{\left(\left(\alpha + \beta\right) + 2 \cdot i\right)}^3}}}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2.0} + 1.0}{2.0}\]
      21.8
    8. Applied cbrt-undiv to get
      \[\frac{\frac{\frac{\alpha + \beta}{1} \cdot \color{red}{\frac{\sqrt[3]{{\left(\beta - \alpha\right)}^3}}{\sqrt[3]{{\left(\left(\alpha + \beta\right) + 2 \cdot i\right)}^3}}}}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2.0} + 1.0}{2.0} \leadsto \frac{\frac{\frac{\alpha + \beta}{1} \cdot \color{blue}{\sqrt[3]{\frac{{\left(\beta - \alpha\right)}^3}{{\left(\left(\alpha + \beta\right) + 2 \cdot i\right)}^3}}}}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2.0} + 1.0}{2.0}\]
      21.8
    9. Applied simplify to get
      \[\frac{\frac{\frac{\alpha + \beta}{1} \cdot \sqrt[3]{\color{red}{\frac{{\left(\beta - \alpha\right)}^3}{{\left(\left(\alpha + \beta\right) + 2 \cdot i\right)}^3}}}}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2.0} + 1.0}{2.0} \leadsto \frac{\frac{\frac{\alpha + \beta}{1} \cdot \sqrt[3]{\color{blue}{{\left(\frac{\beta - \alpha}{i \cdot 2 + \left(\beta + \alpha\right)}\right)}^3}}}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2.0} + 1.0}{2.0}\]
      0.9
  1. Removed slow pow expressions

Original test:


(lambda ((alpha default) (beta default) (i default))
  #:name "Octave 3.8, jcobi/2"
  (/ (+ (/ (/ (* (+ alpha beta) (- beta alpha)) (+ (+ alpha beta) (* 2 i))) (+ (+ (+ alpha beta) (* 2 i)) 2.0)) 1.0) 2.0))