sbplib_julia: test/testSbpOperators.jl annotate

annotate test/testSbpOperators.jl @ 553:d5c45785d318 feature/quadrature_as_outer_product

Add test of accuracy conditions for DiagonalQuadrature

author	Vidar Stiernström <vidar.stiernstrom@it.uu.se>
date	Sun, 29 Nov 2020 18:57:29 +0100
parents	9bfecd6b6aac
children	dab9df9c4d66

rev	line source
314 accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	1 using Test
335 f4e3e71a4ff4 Fix `using` commands to refer to local modules within the Sbplib package/module Jonatan Werpers <jonatan@werpers.com> parents: 333 diff changeset	2 using Sbplib.SbpOperators
f4e3e71a4ff4 Fix `using` commands to refer to local modules within the Sbplib package/module Jonatan Werpers <jonatan@werpers.com> parents: 333 diff changeset	3 using Sbplib.Grids
f4e3e71a4ff4 Fix `using` commands to refer to local modules within the Sbplib package/module Jonatan Werpers <jonatan@werpers.com> parents: 333 diff changeset	4 using Sbplib.RegionIndices
f4e3e71a4ff4 Fix `using` commands to refer to local modules within the Sbplib package/module Jonatan Werpers <jonatan@werpers.com> parents: 333 diff changeset	5 using Sbplib.LazyTensors
395 737e597e0e6d Rewrite broken tests as testing that the norm is zero Jonatan Werpers <jonatan@werpers.com> parents: 389 diff changeset	6 using LinearAlgebra
314 accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	7
338 2b0c9b30ea3b Add test sets for each submodule to make the test output nicer Jonatan Werpers <jonatan@werpers.com> parents: 335 diff changeset	8 @testset "SbpOperators" begin
2b0c9b30ea3b Add test sets for each submodule to make the test output nicer Jonatan Werpers <jonatan@werpers.com> parents: 335 diff changeset	9
314 accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	10 # @testset "apply_quadrature" begin
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	11 # op = readOperator(sbp_operators_path()"d2_4th.txt",sbp_operators_path()"h_4th.txt")
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	12 # h = 0.5
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	13 #
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	14 # @test apply_quadrature(op, h, 1.0, 10, 100) == h
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	15 #
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	16 # N = 10
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	17 # qc = op.quadratureClosure
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	18 # q = h.(qc..., ones(N-2closuresize(op))..., reverse(qc)...)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	19 # @assert length(q) == N
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	20 #
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	21 # for i ∈ 1:N
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	22 # @test apply_quadrature(op, h, 1.0, i, N) == q[i]
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	23 # end
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	24 #
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	25 # v = [2.,3.,2.,4.,5.,4.,3.,4.,5.,4.5]
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	26 # for i ∈ 1:N
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	27 # @test apply_quadrature(op, h, v[i], i, N) == q[i]*v[i]
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	28 # end
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	29 # end
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	30
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	31 @testset "SecondDerivative" begin
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	32 op = readOperator(sbp_operators_path()"d2_4th.txt",sbp_operators_path()"h_4th.txt")
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	33 L = 3.5
388 5223872485cd Clean up grid creation Jonatan Werpers <jonatan@werpers.com> parents: 387 diff changeset	34 g = EquidistantGrid(101, 0.0, L)
356 0844069ab5ff Reinclude SbpOperators and fix most of the code and tests there. Jonatan Werpers <jonatan@werpers.com> parents: 338 diff changeset	35 Dₓₓ = SecondDerivative(g,op.innerStencil,op.closureStencils)
314 accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	36
396 9aff09ca0052 Remove some type annotations Jonatan Werpers <jonatan@werpers.com> parents: 395 diff changeset	37 f0(x) = 1.
9aff09ca0052 Remove some type annotations Jonatan Werpers <jonatan@werpers.com> parents: 395 diff changeset	38 f1(x) = x
9aff09ca0052 Remove some type annotations Jonatan Werpers <jonatan@werpers.com> parents: 395 diff changeset	39 f2(x) = 1/2*x^2
9aff09ca0052 Remove some type annotations Jonatan Werpers <jonatan@werpers.com> parents: 395 diff changeset	40 f3(x) = 1/6*x^3
9aff09ca0052 Remove some type annotations Jonatan Werpers <jonatan@werpers.com> parents: 395 diff changeset	41 f4(x) = 1/24*x^4
9aff09ca0052 Remove some type annotations Jonatan Werpers <jonatan@werpers.com> parents: 395 diff changeset	42 f5(x) = sin(x)
9aff09ca0052 Remove some type annotations Jonatan Werpers <jonatan@werpers.com> parents: 395 diff changeset	43 f5ₓₓ(x) = -f5(x)
314 accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	44
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	45 v0 = evalOn(g,f0)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	46 v1 = evalOn(g,f1)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	47 v2 = evalOn(g,f2)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	48 v3 = evalOn(g,f3)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	49 v4 = evalOn(g,f4)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	50 v5 = evalOn(g,f5)
219 69a6049e14d9 Create package SbpOperators Jonatan Werpers <jonatan@werpers.com> parents: diff changeset	51
356 0844069ab5ff Reinclude SbpOperators and fix most of the code and tests there. Jonatan Werpers <jonatan@werpers.com> parents: 338 diff changeset	52 @test Dₓₓ isa TensorMapping{T,1,1} where T
314 accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	53 @test Dₓₓ' isa TensorMapping{T,1,1} where T
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	54
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	55 # 4th order interior stencil, 2nd order boundary stencil,
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	56 # implies that L*v should be exact for v - monomial up to order 3.
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	57 # Exact differentiation is measured point-wise. For other grid functions
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	58 # the error is measured in the l2-norm.
395 737e597e0e6d Rewrite broken tests as testing that the norm is zero Jonatan Werpers <jonatan@werpers.com> parents: 389 diff changeset	59 @test norm(Dₓₓ*v0) ≈ 0.0 atol=5e-10
737e597e0e6d Rewrite broken tests as testing that the norm is zero Jonatan Werpers <jonatan@werpers.com> parents: 389 diff changeset	60 @test norm(Dₓₓ*v1) ≈ 0.0 atol=5e-10
387 4686c3509b54 Switch to using isapprox operator Jonatan Werpers <jonatan@werpers.com> parents: 385 diff changeset	61 @test Dₓₓ*v2 ≈ v0 atol=5e-11
4686c3509b54 Switch to using isapprox operator Jonatan Werpers <jonatan@werpers.com> parents: 385 diff changeset	62 @test Dₓₓ*v3 ≈ v1 atol=5e-11
388 5223872485cd Clean up grid creation Jonatan Werpers <jonatan@werpers.com> parents: 387 diff changeset	63
5223872485cd Clean up grid creation Jonatan Werpers <jonatan@werpers.com> parents: 387 diff changeset	64 h = spacing(g)[1];
389 0433ab553d13 Rewrite l2 norm comparison to use the norm key word of isapprox Jonatan Werpers <jonatan@werpers.com> parents: 388 diff changeset	65 l2(v) = sqrt(h*sum(v.^2))
0433ab553d13 Rewrite l2 norm comparison to use the norm key word of isapprox Jonatan Werpers <jonatan@werpers.com> parents: 388 diff changeset	66 @test Dₓₓ*v4 ≈ v2 atol=5e-4 norm=l2
0433ab553d13 Rewrite l2 norm comparison to use the norm key word of isapprox Jonatan Werpers <jonatan@werpers.com> parents: 388 diff changeset	67 @test Dₓₓ*v5 ≈ -v5 atol=5e-4 norm=l2
314 accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	68 end
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	69
387 4686c3509b54 Switch to using isapprox operator Jonatan Werpers <jonatan@werpers.com> parents: 385 diff changeset	70
314 accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	71 @testset "Laplace2D" begin
254 4ca3794fffef Add apply_quadrature to SbpOperators Jonatan Werpers <jonatan@werpers.com> parents: 219 diff changeset	72 op = readOperator(sbp_operators_path()"d2_4th.txt",sbp_operators_path()"h_4th.txt")
314 accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	73 Lx = 1.5
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	74 Ly = 3.2
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	75 g = EquidistantGrid((102,131), (0.0, 0.0), (Lx,Ly))
356 0844069ab5ff Reinclude SbpOperators and fix most of the code and tests there. Jonatan Werpers <jonatan@werpers.com> parents: 338 diff changeset	76 L = Laplace(g, op.innerStencil, op.closureStencils)
314 accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	77
254 4ca3794fffef Add apply_quadrature to SbpOperators Jonatan Werpers <jonatan@werpers.com> parents: 219 diff changeset	78
396 9aff09ca0052 Remove some type annotations Jonatan Werpers <jonatan@werpers.com> parents: 395 diff changeset	79 f0(x,y) = 2.
9aff09ca0052 Remove some type annotations Jonatan Werpers <jonatan@werpers.com> parents: 395 diff changeset	80 f1(x,y) = x+y
9aff09ca0052 Remove some type annotations Jonatan Werpers <jonatan@werpers.com> parents: 395 diff changeset	81 f2(x,y) = 1/2x^2 + 1/2y^2
9aff09ca0052 Remove some type annotations Jonatan Werpers <jonatan@werpers.com> parents: 395 diff changeset	82 f3(x,y) = 1/6x^3 + 1/6y^3
9aff09ca0052 Remove some type annotations Jonatan Werpers <jonatan@werpers.com> parents: 395 diff changeset	83 f4(x,y) = 1/24x^4 + 1/24y^4
9aff09ca0052 Remove some type annotations Jonatan Werpers <jonatan@werpers.com> parents: 395 diff changeset	84 f5(x,y) = sin(x) + cos(y)
9aff09ca0052 Remove some type annotations Jonatan Werpers <jonatan@werpers.com> parents: 395 diff changeset	85 f5ₓₓ(x,y) = -f5(x,y)
314 accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	86
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	87 v0 = evalOn(g,f0)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	88 v1 = evalOn(g,f1)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	89 v2 = evalOn(g,f2)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	90 v3 = evalOn(g,f3)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	91 v4 = evalOn(g,f4)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	92 v5 = evalOn(g,f5)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	93 v5ₓₓ = evalOn(g,f5ₓₓ)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	94
356 0844069ab5ff Reinclude SbpOperators and fix most of the code and tests there. Jonatan Werpers <jonatan@werpers.com> parents: 338 diff changeset	95 @test L isa TensorMapping{T,2,2} where T
314 accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	96 @test L' isa TensorMapping{T,2,2} where T
254 4ca3794fffef Add apply_quadrature to SbpOperators Jonatan Werpers <jonatan@werpers.com> parents: 219 diff changeset	97
314 accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	98 # 4th order interior stencil, 2nd order boundary stencil,
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	99 # implies that L*v should be exact for v - monomial up to order 3.
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	100 # Exact differentiation is measured point-wise. For other grid functions
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	101 # the error is measured in the H-norm.
395 737e597e0e6d Rewrite broken tests as testing that the norm is zero Jonatan Werpers <jonatan@werpers.com> parents: 389 diff changeset	102 @test norm(L*v0) ≈ 0 atol=5e-10
737e597e0e6d Rewrite broken tests as testing that the norm is zero Jonatan Werpers <jonatan@werpers.com> parents: 389 diff changeset	103 @test norm(L*v1) ≈ 0 atol=5e-10
387 4686c3509b54 Switch to using isapprox operator Jonatan Werpers <jonatan@werpers.com> parents: 385 diff changeset	104 @test L*v2 ≈ v0 # Seems to be more accurate
4686c3509b54 Switch to using isapprox operator Jonatan Werpers <jonatan@werpers.com> parents: 385 diff changeset	105 @test L*v3 ≈ v1 atol=5e-10
356 0844069ab5ff Reinclude SbpOperators and fix most of the code and tests there. Jonatan Werpers <jonatan@werpers.com> parents: 338 diff changeset	106
0844069ab5ff Reinclude SbpOperators and fix most of the code and tests there. Jonatan Werpers <jonatan@werpers.com> parents: 338 diff changeset	107 h = spacing(g)
389 0433ab553d13 Rewrite l2 norm comparison to use the norm key word of isapprox Jonatan Werpers <jonatan@werpers.com> parents: 388 diff changeset	108 l2(v) = sqrt(prod(h)*sum(v.^2))
0433ab553d13 Rewrite l2 norm comparison to use the norm key word of isapprox Jonatan Werpers <jonatan@werpers.com> parents: 388 diff changeset	109 @test L*v4 ≈ v2 atol=5e-4 norm=l2
0433ab553d13 Rewrite l2 norm comparison to use the norm key word of isapprox Jonatan Werpers <jonatan@werpers.com> parents: 388 diff changeset	110 @test L*v5 ≈ v5ₓₓ atol=5e-4 norm=l2
254 4ca3794fffef Add apply_quadrature to SbpOperators Jonatan Werpers <jonatan@werpers.com> parents: 219 diff changeset	111 end
328 9cc5d1498b2d Refactor 1D diagonal inner product in quadrature.jl to separate file. Write tests for quadratures. Clean up laplace and secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 314 diff changeset	112
504 21fba50cb5b0 Use LazyOuterProduct to construct multi-dimensional quadratures. This change allwed to: Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 397 diff changeset	113 @testset "DiagonalQuadrature" begin
328 9cc5d1498b2d Refactor 1D diagonal inner product in quadrature.jl to separate file. Write tests for quadratures. Clean up laplace and secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 314 diff changeset	114 op = readOperator(sbp_operators_path()"d2_4th.txt",sbp_operators_path()"h_4th.txt")
551 8ac1d0fcba41 Add more tests for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 505 diff changeset	115 Lx = π/2.
8ac1d0fcba41 Add more tests for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 505 diff changeset	116 Ly = Float64(π)
8ac1d0fcba41 Add more tests for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 505 diff changeset	117 g_1D = EquidistantGrid(77, 0.0, Lx)
8ac1d0fcba41 Add more tests for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 505 diff changeset	118 g_2D = EquidistantGrid((77,66), (0.0, 0.0), (Lx,Ly))
553 d5c45785d318 Add test of accuracy conditions for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 552 diff changeset	119 integral(H,v) = sum(H*v)
551 8ac1d0fcba41 Add more tests for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 505 diff changeset	120 @testset "Constructors" begin
8ac1d0fcba41 Add more tests for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 505 diff changeset	121 # 1D
8ac1d0fcba41 Add more tests for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 505 diff changeset	122 H_x = DiagonalQuadrature(spacing(g_1D)[1],op.quadratureClosure,size(g_1D));
8ac1d0fcba41 Add more tests for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 505 diff changeset	123 @test H_x == DiagonalQuadrature(g_1D,op.quadratureClosure)
8ac1d0fcba41 Add more tests for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 505 diff changeset	124 @test H_x == diagonal_quadrature(g_1D,op.quadratureClosure)
8ac1d0fcba41 Add more tests for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 505 diff changeset	125 @test H_x isa TensorMapping{T,1,1} where T
8ac1d0fcba41 Add more tests for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 505 diff changeset	126 @test H_x' isa TensorMapping{T,1,1} where T
328 9cc5d1498b2d Refactor 1D diagonal inner product in quadrature.jl to separate file. Write tests for quadratures. Clean up laplace and secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 314 diff changeset	127
551 8ac1d0fcba41 Add more tests for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 505 diff changeset	128 # 2D
8ac1d0fcba41 Add more tests for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 505 diff changeset	129 H_xy = diagonal_quadrature(g_2D,op.quadratureClosure)
8ac1d0fcba41 Add more tests for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 505 diff changeset	130 @test H_xy isa TensorMappingComposition
8ac1d0fcba41 Add more tests for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 505 diff changeset	131 @test H_xy isa TensorMapping{T,2,2} where T
8ac1d0fcba41 Add more tests for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 505 diff changeset	132 @test H_xy' isa TensorMapping{T,2,2} where T
8ac1d0fcba41 Add more tests for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 505 diff changeset	133 end
8ac1d0fcba41 Add more tests for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 505 diff changeset	134
8ac1d0fcba41 Add more tests for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 505 diff changeset	135 @testset "Sizes" begin
553 d5c45785d318 Add test of accuracy conditions for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 552 diff changeset	136 H_x = diagonal_quadrature(g_1D,op.quadratureClosure)
d5c45785d318 Add test of accuracy conditions for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 552 diff changeset	137 H_xy = diagonal_quadrature(g_2D,op.quadratureClosure)
551 8ac1d0fcba41 Add more tests for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 505 diff changeset	138 # 1D
552 9bfecd6b6aac Test range and domain size for DiagonalQuadratuer Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 551 diff changeset	139 @test domain_size(H_x) == size(g_1D)
9bfecd6b6aac Test range and domain size for DiagonalQuadratuer Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 551 diff changeset	140 @test range_size(H_x) == size(g_1D)
551 8ac1d0fcba41 Add more tests for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 505 diff changeset	141 # 2D
552 9bfecd6b6aac Test range and domain size for DiagonalQuadratuer Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 551 diff changeset	142 @test domain_size(H_xy) == size(g_2D)
9bfecd6b6aac Test range and domain size for DiagonalQuadratuer Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 551 diff changeset	143 @test range_size(H_xy) == size(g_2D)
551 8ac1d0fcba41 Add more tests for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 505 diff changeset	144 end
553 d5c45785d318 Add test of accuracy conditions for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 552 diff changeset	145
551 8ac1d0fcba41 Add more tests for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 505 diff changeset	146 @testset "Application" begin
553 d5c45785d318 Add test of accuracy conditions for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 552 diff changeset	147 H_x = diagonal_quadrature(g_1D,op.quadratureClosure)
d5c45785d318 Add test of accuracy conditions for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 552 diff changeset	148 H_xy = diagonal_quadrature(g_2D,op.quadratureClosure)
d5c45785d318 Add test of accuracy conditions for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 552 diff changeset	149 a = 3.2
d5c45785d318 Add test of accuracy conditions for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 552 diff changeset	150 b = 2.1
d5c45785d318 Add test of accuracy conditions for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 552 diff changeset	151 v_1D = a*ones(Float64, size(g_1D))
d5c45785d318 Add test of accuracy conditions for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 552 diff changeset	152 v_2D = b*ones(Float64, size(g_2D))
d5c45785d318 Add test of accuracy conditions for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 552 diff changeset	153 u_1D = evalOn(g_1D,x->sin(x))
d5c45785d318 Add test of accuracy conditions for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 552 diff changeset	154 u_2D = evalOn(g_2D,(x,y)->sin(x)+cos(y))
551 8ac1d0fcba41 Add more tests for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 505 diff changeset	155 # 1D
8ac1d0fcba41 Add more tests for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 505 diff changeset	156 @test integral(H_x,v_1D) ≈ a*Lx rtol = 1e-13
8ac1d0fcba41 Add more tests for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 505 diff changeset	157 @test integral(H_x,u_1D) ≈ 1. rtol = 1e-8
8ac1d0fcba41 Add more tests for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 505 diff changeset	158 @test H_xv_1D == H_x'v_1D
8ac1d0fcba41 Add more tests for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 505 diff changeset	159 # 2D
8ac1d0fcba41 Add more tests for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 505 diff changeset	160 @test integral(H_xy,v_2D) ≈ bLxLy rtol = 1e-13
8ac1d0fcba41 Add more tests for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 505 diff changeset	161 @test integral(H_xy,u_2D) ≈ π rtol = 1e-8
8ac1d0fcba41 Add more tests for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 505 diff changeset	162 @test H_xyv_2D ≈ H_xy'v_2D rtol = 1e-16 #Failed for exact equality. Must differ in operation order for some reason?
8ac1d0fcba41 Add more tests for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 505 diff changeset	163 end
382 5c10cd0ed1fe testSbpOperators.jl: Add a test for Quadrature and mark some tests broken Jonatan Werpers <jonatan@werpers.com> parents: 379 diff changeset	164
553 d5c45785d318 Add test of accuracy conditions for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 552 diff changeset	165 @testset "Accuracy" begin
d5c45785d318 Add test of accuracy conditions for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 552 diff changeset	166 v = ()
d5c45785d318 Add test of accuracy conditions for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 552 diff changeset	167 for i = 0:4
d5c45785d318 Add test of accuracy conditions for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 552 diff changeset	168 f_i(x) = 1/factorial(i)*x^i
d5c45785d318 Add test of accuracy conditions for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 552 diff changeset	169 v = (v...,evalOn(g_1D,f_i))
d5c45785d318 Add test of accuracy conditions for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 552 diff changeset	170 end
d5c45785d318 Add test of accuracy conditions for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 552 diff changeset	171 # # 2nd order
d5c45785d318 Add test of accuracy conditions for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 552 diff changeset	172 # op2 = readOperator(sbp_operators_path()"d2_2nd.txt",sbp_operators_path()"h_2nd.txt")
d5c45785d318 Add test of accuracy conditions for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 552 diff changeset	173 # H2 = diagonal_quadrature(g_1D,op2.quadratureClosure)
d5c45785d318 Add test of accuracy conditions for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 552 diff changeset	174 # for i = 1:3
d5c45785d318 Add test of accuracy conditions for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 552 diff changeset	175 # @test integral(H4,v[i]) ≈ v[i+1] rtol = 1e-14
d5c45785d318 Add test of accuracy conditions for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 552 diff changeset	176 # end
d5c45785d318 Add test of accuracy conditions for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 552 diff changeset	177
d5c45785d318 Add test of accuracy conditions for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 552 diff changeset	178 # 4th order
d5c45785d318 Add test of accuracy conditions for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 552 diff changeset	179 op4 = readOperator(sbp_operators_path()"d2_4th.txt",sbp_operators_path()"h_4th.txt")
d5c45785d318 Add test of accuracy conditions for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 552 diff changeset	180 H4 = diagonal_quadrature(g_1D,op4.quadratureClosure)
d5c45785d318 Add test of accuracy conditions for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 552 diff changeset	181 for i = 1:4
d5c45785d318 Add test of accuracy conditions for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 552 diff changeset	182 @test integral(H4,v[i]) ≈ v[i+1][end] - v[i+1][1] rtol = 1e-14
d5c45785d318 Add test of accuracy conditions for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 552 diff changeset	183 end
d5c45785d318 Add test of accuracy conditions for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 552 diff changeset	184 end
d5c45785d318 Add test of accuracy conditions for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 552 diff changeset	185
551 8ac1d0fcba41 Add more tests for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 505 diff changeset	186 @testset "Inferred" begin
553 d5c45785d318 Add test of accuracy conditions for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 552 diff changeset	187 H_x = diagonal_quadrature(g_1D,op.quadratureClosure)
d5c45785d318 Add test of accuracy conditions for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 552 diff changeset	188 H_xy = diagonal_quadrature(g_2D,op.quadratureClosure)
d5c45785d318 Add test of accuracy conditions for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 552 diff changeset	189 v_1D = ones(Float64, size(g_1D))
d5c45785d318 Add test of accuracy conditions for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 552 diff changeset	190 v_2D = ones(Float64, size(g_2D))
551 8ac1d0fcba41 Add more tests for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 505 diff changeset	191 @inferred H_x*v_1D
8ac1d0fcba41 Add more tests for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 505 diff changeset	192 @inferred H_x'*v_1D
8ac1d0fcba41 Add more tests for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 505 diff changeset	193 @inferred H_xy*v_2D
8ac1d0fcba41 Add more tests for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 505 diff changeset	194 @inferred H_xy'*v_2D
8ac1d0fcba41 Add more tests for DiagonalQuadrature Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 505 diff changeset	195 end
328 9cc5d1498b2d Refactor 1D diagonal inner product in quadrature.jl to separate file. Write tests for quadratures. Clean up laplace and secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 314 diff changeset	196 end
329 408c37b295c2 Refactor 1D tensor mapping in inverse quadrature to separate file, InverseDiagonalNorm. Add tests Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 328 diff changeset	197
504 21fba50cb5b0 Use LazyOuterProduct to construct multi-dimensional quadratures. This change allwed to: Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 397 diff changeset	198 @testset "InverseDiagonalQuadrature" begin
329 408c37b295c2 Refactor 1D tensor mapping in inverse quadrature to separate file, InverseDiagonalNorm. Add tests Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 328 diff changeset	199 op = readOperator(sbp_operators_path()"d2_4th.txt",sbp_operators_path()"h_4th.txt")
504 21fba50cb5b0 Use LazyOuterProduct to construct multi-dimensional quadratures. This change allwed to: Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 397 diff changeset	200 Lx = 2.3
21fba50cb5b0 Use LazyOuterProduct to construct multi-dimensional quadratures. This change allwed to: Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 397 diff changeset	201 g = EquidistantGrid(77, 0.0, Lx)
21fba50cb5b0 Use LazyOuterProduct to construct multi-dimensional quadratures. This change allwed to: Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 397 diff changeset	202 H = DiagonalQuadrature(g, op.quadratureClosure)
21fba50cb5b0 Use LazyOuterProduct to construct multi-dimensional quadratures. This change allwed to: Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 397 diff changeset	203 Hi = InverseDiagonalQuadrature(g,op.quadratureClosure)
329 408c37b295c2 Refactor 1D tensor mapping in inverse quadrature to separate file, InverseDiagonalNorm. Add tests Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 328 diff changeset	204 v = evalOn(g, x->sin(x))
408c37b295c2 Refactor 1D tensor mapping in inverse quadrature to separate file, InverseDiagonalNorm. Add tests Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 328 diff changeset	205
356 0844069ab5ff Reinclude SbpOperators and fix most of the code and tests there. Jonatan Werpers <jonatan@werpers.com> parents: 338 diff changeset	206 @test Hi isa TensorMapping{T,1,1} where T
329 408c37b295c2 Refactor 1D tensor mapping in inverse quadrature to separate file, InverseDiagonalNorm. Add tests Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 328 diff changeset	207 @test Hi' isa TensorMapping{T,1,1} where T
504 21fba50cb5b0 Use LazyOuterProduct to construct multi-dimensional quadratures. This change allwed to: Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 397 diff changeset	208 @test Hi == inverse_diagonal_quadrature(g,op.quadratureClosure)
387 4686c3509b54 Switch to using isapprox operator Jonatan Werpers <jonatan@werpers.com> parents: 385 diff changeset	209 @test HiHv ≈ v
383 aaf8e331cb80 Remove collects around TensorMappingApplications Jonatan Werpers <jonatan@werpers.com> parents: 382 diff changeset	210 @test Hiv == Hi'v
504 21fba50cb5b0 Use LazyOuterProduct to construct multi-dimensional quadratures. This change allwed to: Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 397 diff changeset	211 @inferred Hi*v
329 408c37b295c2 Refactor 1D tensor mapping in inverse quadrature to separate file, InverseDiagonalNorm. Add tests Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 328 diff changeset	212
504 21fba50cb5b0 Use LazyOuterProduct to construct multi-dimensional quadratures. This change allwed to: Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 397 diff changeset	213 # Test multiple dimension
21fba50cb5b0 Use LazyOuterProduct to construct multi-dimensional quadratures. This change allwed to: Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 397 diff changeset	214 Ly = 5.2
329 408c37b295c2 Refactor 1D tensor mapping in inverse quadrature to separate file, InverseDiagonalNorm. Add tests Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 328 diff changeset	215 g = EquidistantGrid((77,66), (0.0, 0.0), (Lx,Ly))
408c37b295c2 Refactor 1D tensor mapping in inverse quadrature to separate file, InverseDiagonalNorm. Add tests Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 328 diff changeset	216
504 21fba50cb5b0 Use LazyOuterProduct to construct multi-dimensional quadratures. This change allwed to: Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 397 diff changeset	217 H = diagonal_quadrature(g, op.quadratureClosure)
21fba50cb5b0 Use LazyOuterProduct to construct multi-dimensional quadratures. This change allwed to: Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 397 diff changeset	218 Hi = inverse_diagonal_quadrature(g, op.quadratureClosure)
329 408c37b295c2 Refactor 1D tensor mapping in inverse quadrature to separate file, InverseDiagonalNorm. Add tests Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 328 diff changeset	219 v = evalOn(g, (x,y)-> x^2 + (y-1)^2 + x*y)
408c37b295c2 Refactor 1D tensor mapping in inverse quadrature to separate file, InverseDiagonalNorm. Add tests Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 328 diff changeset	220
504 21fba50cb5b0 Use LazyOuterProduct to construct multi-dimensional quadratures. This change allwed to: Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 397 diff changeset	221 @test Hi isa TensorMapping{T,2,2} where T
21fba50cb5b0 Use LazyOuterProduct to construct multi-dimensional quadratures. This change allwed to: Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 397 diff changeset	222 @test Hi' isa TensorMapping{T,2,2} where T
21fba50cb5b0 Use LazyOuterProduct to construct multi-dimensional quadratures. This change allwed to: Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 397 diff changeset	223 @test HiHv ≈ v
505 26485066394a Add comments to broken tests. Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 504 diff changeset	224 @test_broken Hiv == Hi'v # apply_transpose not implemented for InflatedTensorMapping!
329 408c37b295c2 Refactor 1D tensor mapping in inverse quadrature to separate file, InverseDiagonalNorm. Add tests Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 328 diff changeset	225 end
314 accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	226 #
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	227 # @testset "BoundaryValue" begin
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	228 # op = readOperator(sbp_operators_path()"d2_4th.txt",sbp_operators_path()"h_4th.txt")
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	229 # g = EquidistantGrid((4,5), (0.0, 0.0), (1.0,1.0))
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	230 #
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	231 # e_w = BoundaryValue(op, g, CartesianBoundary{1,Lower}())
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	232 # e_e = BoundaryValue(op, g, CartesianBoundary{1,Upper}())
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	233 # e_s = BoundaryValue(op, g, CartesianBoundary{2,Lower}())
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	234 # e_n = BoundaryValue(op, g, CartesianBoundary{2,Upper}())
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	235 #
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	236 # v = zeros(Float64, 4, 5)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	237 # v[:,5] = [1, 2, 3,4]
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	238 # v[:,4] = [1, 2, 3,4]
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	239 # v[:,3] = [4, 5, 6, 7]
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	240 # v[:,2] = [7, 8, 9, 10]
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	241 # v[:,1] = [10, 11, 12, 13]
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	242 #
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	243 # @test e_w isa TensorMapping{T,2,1} where T
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	244 # @test e_w' isa TensorMapping{T,1,2} where T
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	245 #
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	246 # @test domain_size(e_w, (3,2)) == (2,)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	247 # @test domain_size(e_e, (3,2)) == (2,)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	248 # @test domain_size(e_s, (3,2)) == (3,)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	249 # @test domain_size(e_n, (3,2)) == (3,)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	250 #
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	251 # @test size(e_w'*v) == (5,)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	252 # @test size(e_e'*v) == (5,)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	253 # @test size(e_s'*v) == (4,)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	254 # @test size(e_n'*v) == (4,)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	255 #
383 aaf8e331cb80 Remove collects around TensorMappingApplications Jonatan Werpers <jonatan@werpers.com> parents: 382 diff changeset	256 # @test e_w'*v == [10,7,4,1.0,1]
aaf8e331cb80 Remove collects around TensorMappingApplications Jonatan Werpers <jonatan@werpers.com> parents: 382 diff changeset	257 # @test e_e'*v == [13,10,7,4,4.0]
aaf8e331cb80 Remove collects around TensorMappingApplications Jonatan Werpers <jonatan@werpers.com> parents: 382 diff changeset	258 # @test e_s'*v == [10,11,12,13.0]
aaf8e331cb80 Remove collects around TensorMappingApplications Jonatan Werpers <jonatan@werpers.com> parents: 382 diff changeset	259 # @test e_n'*v == [1,2,3,4.0]
314 accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	260 #
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	261 # g_x = [1,2,3,4.0]
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	262 # g_y = [5,4,3,2,1.0]
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	263 #
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	264 # G_w = zeros(Float64, (4,5))
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	265 # G_w[1,:] = g_y
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	266 #
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	267 # G_e = zeros(Float64, (4,5))
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	268 # G_e[4,:] = g_y
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	269 #
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	270 # G_s = zeros(Float64, (4,5))
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	271 # G_s[:,1] = g_x
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	272 #
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	273 # G_n = zeros(Float64, (4,5))
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	274 # G_n[:,5] = g_x
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	275 #
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	276 # @test size(e_w*g_y) == (UnknownDim,5)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	277 # @test size(e_e*g_y) == (UnknownDim,5)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	278 # @test size(e_s*g_x) == (4,UnknownDim)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	279 # @test size(e_n*g_x) == (4,UnknownDim)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	280 #
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	281 # # These tests should be moved to where they are possible (i.e we know what the grid should be)
383 aaf8e331cb80 Remove collects around TensorMappingApplications Jonatan Werpers <jonatan@werpers.com> parents: 382 diff changeset	282 # @test_broken e_w*g_y == G_w
aaf8e331cb80 Remove collects around TensorMappingApplications Jonatan Werpers <jonatan@werpers.com> parents: 382 diff changeset	283 # @test_broken e_e*g_y == G_e
aaf8e331cb80 Remove collects around TensorMappingApplications Jonatan Werpers <jonatan@werpers.com> parents: 382 diff changeset	284 # @test_broken e_s*g_x == G_s
aaf8e331cb80 Remove collects around TensorMappingApplications Jonatan Werpers <jonatan@werpers.com> parents: 382 diff changeset	285 # @test_broken e_n*g_x == G_n
314 accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	286 # end
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	287 #
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	288 # @testset "NormalDerivative" begin
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	289 # op = readOperator(sbp_operators_path()"d2_4th.txt",sbp_operators_path()"h_4th.txt")
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	290 # g = EquidistantGrid((5,6), (0.0, 0.0), (4.0,5.0))
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	291 #
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	292 # d_w = NormalDerivative(op, g, CartesianBoundary{1,Lower}())
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	293 # d_e = NormalDerivative(op, g, CartesianBoundary{1,Upper}())
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	294 # d_s = NormalDerivative(op, g, CartesianBoundary{2,Lower}())
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	295 # d_n = NormalDerivative(op, g, CartesianBoundary{2,Upper}())
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	296 #
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	297 #
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	298 # v = evalOn(g, (x,y)-> x^2 + (y-1)^2 + x*y)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	299 # v∂x = evalOn(g, (x,y)-> 2*x + y)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	300 # v∂y = evalOn(g, (x,y)-> 2*(y-1) + x)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	301 #
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	302 # @test d_w isa TensorMapping{T,2,1} where T
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	303 # @test d_w' isa TensorMapping{T,1,2} where T
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	304 #
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	305 # @test domain_size(d_w, (3,2)) == (2,)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	306 # @test domain_size(d_e, (3,2)) == (2,)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	307 # @test domain_size(d_s, (3,2)) == (3,)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	308 # @test domain_size(d_n, (3,2)) == (3,)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	309 #
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	310 # @test size(d_w'*v) == (6,)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	311 # @test size(d_e'*v) == (6,)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	312 # @test size(d_s'*v) == (5,)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	313 # @test size(d_n'*v) == (5,)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	314 #
387 4686c3509b54 Switch to using isapprox operator Jonatan Werpers <jonatan@werpers.com> parents: 385 diff changeset	315 # @test d_w'*v .≈ v∂x[1,:]
4686c3509b54 Switch to using isapprox operator Jonatan Werpers <jonatan@werpers.com> parents: 385 diff changeset	316 # @test d_e'*v .≈ v∂x[5,:]
4686c3509b54 Switch to using isapprox operator Jonatan Werpers <jonatan@werpers.com> parents: 385 diff changeset	317 # @test d_s'*v .≈ v∂y[:,1]
4686c3509b54 Switch to using isapprox operator Jonatan Werpers <jonatan@werpers.com> parents: 385 diff changeset	318 # @test d_n'*v .≈ v∂y[:,6]
314 accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	319 #
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	320 #
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	321 # d_x_l = zeros(Float64, 5)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	322 # d_x_u = zeros(Float64, 5)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	323 # for i ∈ eachindex(d_x_l)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	324 # d_x_l[i] = op.dClosure[i-1]
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	325 # d_x_u[i] = -op.dClosure[length(d_x_u)-i]
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	326 # end
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	327 #
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	328 # d_y_l = zeros(Float64, 6)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	329 # d_y_u = zeros(Float64, 6)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	330 # for i ∈ eachindex(d_y_l)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	331 # d_y_l[i] = op.dClosure[i-1]
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	332 # d_y_u[i] = -op.dClosure[length(d_y_u)-i]
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	333 # end
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	334 #
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	335 # function prod_matrix(x,y)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	336 # G = zeros(Float64, length(x), length(y))
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	337 # for I ∈ CartesianIndices(G)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	338 # G[I] = x[I[1]]*y[I[2]]
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	339 # end
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	340 #
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	341 # return G
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	342 # end
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	343 #
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	344 # g_x = [1,2,3,4.0,5]
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	345 # g_y = [5,4,3,2,1.0,11]
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	346 #
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	347 # G_w = prod_matrix(d_x_l, g_y)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	348 # G_e = prod_matrix(d_x_u, g_y)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	349 # G_s = prod_matrix(g_x, d_y_l)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	350 # G_n = prod_matrix(g_x, d_y_u)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	351 #
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	352 #
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	353 # @test size(d_w*g_y) == (UnknownDim,6)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	354 # @test size(d_e*g_y) == (UnknownDim,6)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	355 # @test size(d_s*g_x) == (5,UnknownDim)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	356 # @test size(d_n*g_x) == (5,UnknownDim)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	357 #
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	358 # # These tests should be moved to where they are possible (i.e we know what the grid should be)
387 4686c3509b54 Switch to using isapprox operator Jonatan Werpers <jonatan@werpers.com> parents: 385 diff changeset	359 # @test_broken d_w*g_y .≈ G_w
4686c3509b54 Switch to using isapprox operator Jonatan Werpers <jonatan@werpers.com> parents: 385 diff changeset	360 # @test_broken d_e*g_y .≈ G_e
4686c3509b54 Switch to using isapprox operator Jonatan Werpers <jonatan@werpers.com> parents: 385 diff changeset	361 # @test_broken d_s*g_x .≈ G_s
4686c3509b54 Switch to using isapprox operator Jonatan Werpers <jonatan@werpers.com> parents: 385 diff changeset	362 # @test_broken d_n*g_x .≈ G_n
314 accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	363 # end
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	364 #
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	365 # @testset "BoundaryQuadrature" begin
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	366 # op = readOperator(sbp_operators_path()"d2_4th.txt",sbp_operators_path()"h_4th.txt")
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	367 # g = EquidistantGrid((10,11), (0.0, 0.0), (1.0,1.0))
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	368 #
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	369 # H_w = BoundaryQuadrature(op, g, CartesianBoundary{1,Lower}())
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	370 # H_e = BoundaryQuadrature(op, g, CartesianBoundary{1,Upper}())
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	371 # H_s = BoundaryQuadrature(op, g, CartesianBoundary{2,Lower}())
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	372 # H_n = BoundaryQuadrature(op, g, CartesianBoundary{2,Upper}())
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	373 #
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	374 # v = evalOn(g, (x,y)-> x^2 + (y-1)^2 + x*y)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	375 #
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	376 # function get_quadrature(N)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	377 # qc = op.quadratureClosure
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	378 # q = (qc..., ones(N-2*closuresize(op))..., reverse(qc)...)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	379 # @assert length(q) == N
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	380 # return q
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	381 # end
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	382 #
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	383 # v_w = v[1,:]
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	384 # v_e = v[10,:]
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	385 # v_s = v[:,1]
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	386 # v_n = v[:,11]
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	387 #
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	388 # q_x = spacing(g)[1].*get_quadrature(10)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	389 # q_y = spacing(g)[2].*get_quadrature(11)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	390 #
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	391 # @test H_w isa TensorOperator{T,1} where T
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	392 #
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	393 # @test domain_size(H_w, (3,)) == (3,)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	394 # @test domain_size(H_n, (3,)) == (3,)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	395 #
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	396 # @test range_size(H_w, (3,)) == (3,)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	397 # @test range_size(H_n, (3,)) == (3,)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	398 #
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	399 # @test size(H_w*v_w) == (11,)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	400 # @test size(H_e*v_e) == (11,)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	401 # @test size(H_s*v_s) == (10,)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	402 # @test size(H_n*v_n) == (10,)
accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	403 #
387 4686c3509b54 Switch to using isapprox operator Jonatan Werpers <jonatan@werpers.com> parents: 385 diff changeset	404 # @test H_wv_w .≈ q_y.v_w
4686c3509b54 Switch to using isapprox operator Jonatan Werpers <jonatan@werpers.com> parents: 385 diff changeset	405 # @test H_ev_e .≈ q_y.v_e
4686c3509b54 Switch to using isapprox operator Jonatan Werpers <jonatan@werpers.com> parents: 385 diff changeset	406 # @test H_sv_s .≈ q_x.v_s
4686c3509b54 Switch to using isapprox operator Jonatan Werpers <jonatan@werpers.com> parents: 385 diff changeset	407 # @test H_nv_n .≈ q_x.v_n
314 accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	408 #
383 aaf8e331cb80 Remove collects around TensorMappingApplications Jonatan Werpers <jonatan@werpers.com> parents: 382 diff changeset	409 # @test H_w'v_w == H_w'v_w
aaf8e331cb80 Remove collects around TensorMappingApplications Jonatan Werpers <jonatan@werpers.com> parents: 382 diff changeset	410 # @test H_e'v_e == H_e'v_e
aaf8e331cb80 Remove collects around TensorMappingApplications Jonatan Werpers <jonatan@werpers.com> parents: 382 diff changeset	411 # @test H_s'v_s == H_s'v_s
aaf8e331cb80 Remove collects around TensorMappingApplications Jonatan Werpers <jonatan@werpers.com> parents: 382 diff changeset	412 # @test H_n'v_n == H_n'v_n
314 accb0876da12 Move tests for Laplace from DiffOps/test to SbpOperators/test and add test for Secondderivative Vidar Stiernström <vidar.stiernstrom@it.uu.se> parents: 254 diff changeset	413 # end
338 2b0c9b30ea3b Add test sets for each submodule to make the test output nicer Jonatan Werpers <jonatan@werpers.com> parents: 335 diff changeset	414
2b0c9b30ea3b Add test sets for each submodule to make the test output nicer Jonatan Werpers <jonatan@werpers.com> parents: 335 diff changeset	415 end

Mercurial > repos > public > sbplib_julia

annotate test/testSbpOperators.jl @ 553:d5c45785d318 feature/quadrature_as_outer_product