Move tests to DerivableFunctionsBase.jl

Author: RafaelArutjunjan

Project.toml

@@ -1,7 +1,7 @@
 name = "DerivableFunctions"
 uuid = "b86e32d1-1d4d-4472-88d2-1980e9d19c92"
 authors = ["Rafael Arutjunjan"]
-version = "0.3"
+version = "0.3.1"
 
 [deps]
 DerivableFunctionsBase = "2a74400c-0885-457e-a858-e4f63fac11e2"
@@ -21,9 +21,7 @@ Zygote = "0.6"
 julia = "1"
 
 [extras]
-ForwardDiff = "f6369f11-7733-5829-9624-2563aa707210"
-SafeTestsets = "1bc83da4-3b8d-516f-aca4-4fe02f6d838f"
 Test = "8dfed614-e22c-5e08-85e1-65c5234f0b40"
 
 [targets]
-test = ["Test", "SafeTestsets", "ForwardDiff"]
+test = ["Test"]

src/DerivableFunctions.jl

@@ -20,8 +20,8 @@ using ReverseDiff, Zygote, FiniteDiff, FiniteDifferences
 # suff(x::ReverseDiff.TrackedReal) = typeof(x)
 
 ## Add new backends to the output of diff_backends()
-import DerivableFunctionsBase: AddedBackEnds
-AddedBackEnds(::Val{true}) = [:ReverseDiff, :Zygote, :FiniteDifferences, :FiniteDiff]
+# import DerivableFunctionsBase: AddedBackEnds
+# AddedBackEnds(::Val{true}) = [:ReverseDiff, :Zygote, :FiniteDifferences, :FiniteDiff]
 
 # include("DifferentiationOperators.jl")
 

test/runtests.jl

@@ -1,70 +1,7 @@
 
-using SafeTestsets
+using Test
 
-@safetestset "Bare Differentiation Operator Backends (out-of-place)" begin
-    using DerivableFunctions, Test, ForwardDiff
-    Metric3(x) = [sinh(x[3]) exp(x[1])*sin(x[2]) 0; 0 cosh(x[2]) cos(x[2])*x[3]*x[2]; exp(x[2]) cos(x[3])*x[1]*x[2] 1.]
-
-    X = ForwardDiff.gradient(x->x[1]^2 + exp(x[2]), [5,10.])
-    Y = ForwardDiff.jacobian(x->[x[1]^2, exp(x[2])], [5,10.])
-    Z = ForwardDiff.hessian(x->x[1]^2 + exp(x[2]) + x[1]*x[2], [5,10.])
-    Mat = reshape(ForwardDiff.jacobian(vec∘Metric3, [5,10,15.]), 3, 3, 3)
-    Djac = reshape(ForwardDiff.jacobian(p->vec(ForwardDiff.jacobian(x->[exp(x[1])*sin(x[2]), cosh(x[2])*x[1]*x[2]],p)), [5,10.]), 2,2,2)
-
-    function MyTest(ADmode::Symbol; atol::Real=2e-5, kwargs...)
-        Grad, Jac, Hess = GetGrad(ADmode; kwargs...), GetJac(ADmode; kwargs...), GetHess(ADmode; kwargs...)
-        MatrixJac = GetMatrixJac(ADmode; order=8, kwargs...)
-
-        @test isapprox(Grad(x->x[1]^2 + exp(x[2]), [5,10.]), X; atol=atol)
-        @test isapprox(Jac(x->[x[1]^2, exp(x[2])], [5,10.]), Y; atol=atol)
-        @test isapprox(Hess(x->x[1]^2 + exp(x[2]) + x[1]*x[2], [5,10.]), Z; atol=atol)
-        @test maximum(abs.(MatrixJac(Metric3, [5,10,15.]) - Mat)) < atol
-    end
-
-    for ADmode ∈ [:Zygote, :ReverseDiff, :FiniteDifferences]
-        MyTest(ADmode)
-    end
-    MyTest(:FiniteDiff; atol=0.2)
-
-
-    function TestDoubleJac(ADmode::Symbol; atol::Real=2e-5, kwargs...)
-        DoubleJac = GetDoubleJac(ADmode; order=8, kwargs...)
-        maximum(abs.(DoubleJac(x->[exp(x[1])*sin(x[2]), cosh(x[2])*x[1]*x[2]], [5,10.]) - Djac)) < atol
-    end
-
-    for ADmode ∈ [:ReverseDiff, :FiniteDifferences]
-        @test TestDoubleJac(ADmode)
-    end
-    # Zygote does not support mutating arrays
-    @test_broken TestDoubleJac(:Zygote)
-    @test_broken TestDoublejac(:FiniteDiff)
-end
-
-@safetestset "Bare Differentiation Operator Backends (in-place)" begin
-    using DerivableFunctions, Test, ForwardDiff
-    Metric3(x) = [sinh(x[3]) exp(x[1])*sin(x[2]) 0; 0 cosh(x[2]) cos(x[2])*x[3]*x[2]; exp(x[2]) cos(x[3])*x[1]*x[2] 1.]
-
-    X = ForwardDiff.gradient(x->x[1]^2 + exp(x[2]), [5,10.])
-    Y = ForwardDiff.jacobian(x->[x[1]^2, exp(x[2])], [5,10.])
-    Z = ForwardDiff.hessian(x->x[1]^2 + exp(x[2]) + x[1]*x[2], [5,10.])
-    Mat = reshape(ForwardDiff.jacobian(vec∘Metric3, [5,10,15.]), 3, 3, 3)
-
-    function MyInplaceTest(ADmode::Symbol; atol::Real=2e-5, kwargs...)
-        Grad! = GetGrad!(ADmode, x->x[1]^2 + exp(x[2]); kwargs...)
-        Jac! = GetJac!(ADmode, x->[x[1]^2, exp(x[2])]; kwargs...)
-        Hess! = GetHess!(ADmode, x->x[1]^2 + exp(x[2]) + x[1]*x[2]; kwargs...)
-        MatrixJac! = GetMatrixJac!(ADmode, Metric3; order=8, kwargs...)
-
-        Xres = similar(X);  Yres = similar(Y);  Zres = similar(Z);  Matres = similar(Mat)
-
-        Grad!(Xres, [5,10.]);   @test isapprox(Xres, X; atol=atol)
-        Jac!(Yres, [5,10.]);   @test isapprox(Yres, Y; atol=atol)
-        Hess!(Zres, [5,10.]);   @test isapprox(Zres, Z; atol=atol)
-        MatrixJac!(Matres, [5,10,15.]);   @test maximum(abs.(Matres - Mat)) < atol
-    end
-
-    for ADmode ∈ [:Zygote, :ReverseDiff, :FiniteDifferences]
-        MyInplaceTest(ADmode)
-    end
-    MyInplaceTest(:FiniteDiff; atol=0.2)
-end
+@testset "Compiles?" begin
+    using DerivableFunctions
+    @test true
+end