test_Paper_example.jl

# THE example
println("\n\"THE\" example")
f(x) = exp(x) / sqrt(sin(x)^3 + cos(x)^3)
println("f(1.5) = $(f(1.5))")
println()
t0 = hyper(1.5, 1.0, 1.0, 0.0)
t1 = exp(t0)
t2 = sin(t0)
t3 = t2^3
t4 = cos(t0)
t5 = t4^3
t5a = (cos(t0))^3
t6 = t3 + t5
t7 = t6^-0.5
t8 = t1*t7

println("t0 = ", t0)
println("t1 = ", t1)
println("t2 = ", t2)
println("t3 = ", t3)
println("t4 = ", t4)
println("t5 = ", t5)
println("t5a = ", t5a)
println("t6 = ", t6)
println("t7 = ", t7)
println("t8 = ", t8)

println()
println("f(t0) = ", f(t0))

@test abs(f(1.5) - realpart(f(t0))) < 5eps(1.0)
@test abs(ε₁part(f(t0))-4.053427893898621) < 5eps(1.0) && ε₁part(f(t0)) == ε₂part(f(t0))
@test abs(ε₁ε₂part(f(t0))-9.463073681596601) < 5eps(1.0)