This commit is contained in:
Gaspard Jankowiak 2025-02-12 11:04:31 +01:00
commit 65c394743b
3 changed files with 2 additions and 34 deletions

View file

@ -38,23 +38,6 @@ end
@test TaylorTest.check(J_gauss, H_gauss, p; x=x)
end
function check_symmetry(a)
R = true
if ndims(a) == 2
R = norm(a - a') < 1e-10
else
for i in axes(a, 1)
r = a[i, :, :]' == a[i, :, :]
R &= r
if !r
n = maximum(abs, a[i, :, :]' - a[i, :, :])
@warn "Tensor not symmetric at i=$i: $n"
end
end
end
return R
end
@testset "Composed Gauss function" begin
p = 1 .+ 5rand(6)