function test_arctan_all()
    print(rpad("Math.Series.arctan[h](1/x)...", 50, ' '))

    arctan = Brainstorm._Math._Series._Arctan.arctan
    arctanh = Brainstorm._Math._Series._Arctan.arctanh

    setprecision(400_000) do
        @test all([arctan(d, x)  - trunc(BigInt,  atan(1//big(x))*(big(10)^d)) for x in (2, 3, 5, 17), d in (1, 10, 100, 1_000, 10_000, 100_000)] .== 0)
        @test all([arctanh(d, x) - trunc(BigInt, atanh(1//big(x))*(big(10)^d)) for x in (2, 3, 5, 17), d in (1, 10, 100, 1_000, 10_000, 100_000)] .== 0)
    end

    println("PASS")
end
