Mercurial > repos > public > sbplib_julia
annotate test/SbpOperators/volumeops/derivatives/first_derivative_test.jl @ 978:1a05009e731b feature/first_derivative
Add tests for constructors
author | Jonatan Werpers <jonatan@werpers.com> |
---|---|
date | Tue, 15 Mar 2022 21:17:58 +0100 |
parents | ba023fc09961 |
children | b90446eb5f27 |
rev | line source |
---|---|
972
803f60f461c1
Start adding the first derivative
Jonatan Werpers <jonatan@werpers.com>
parents:
diff
changeset
|
1 using Test |
803f60f461c1
Start adding the first derivative
Jonatan Werpers <jonatan@werpers.com>
parents:
diff
changeset
|
2 |
978
1a05009e731b
Add tests for constructors
Jonatan Werpers <jonatan@werpers.com>
parents:
974
diff
changeset
|
3 |
972
803f60f461c1
Start adding the first derivative
Jonatan Werpers <jonatan@werpers.com>
parents:
diff
changeset
|
4 using Sbplib.SbpOperators |
803f60f461c1
Start adding the first derivative
Jonatan Werpers <jonatan@werpers.com>
parents:
diff
changeset
|
5 using Sbplib.Grids |
978
1a05009e731b
Add tests for constructors
Jonatan Werpers <jonatan@werpers.com>
parents:
974
diff
changeset
|
6 using Sbplib.LazyTensors |
972
803f60f461c1
Start adding the first derivative
Jonatan Werpers <jonatan@werpers.com>
parents:
diff
changeset
|
7 |
978
1a05009e731b
Add tests for constructors
Jonatan Werpers <jonatan@werpers.com>
parents:
974
diff
changeset
|
8 using Sbplib.SbpOperators: closure_size, Stencil |
974
ba023fc09961
Add stencil_set method and accuracy tests
Jonatan Werpers <jonatan@werpers.com>
parents:
972
diff
changeset
|
9 |
ba023fc09961
Add stencil_set method and accuracy tests
Jonatan Werpers <jonatan@werpers.com>
parents:
972
diff
changeset
|
10 """ |
ba023fc09961
Add stencil_set method and accuracy tests
Jonatan Werpers <jonatan@werpers.com>
parents:
972
diff
changeset
|
11 monomial(x,k) |
ba023fc09961
Add stencil_set method and accuracy tests
Jonatan Werpers <jonatan@werpers.com>
parents:
972
diff
changeset
|
12 |
ba023fc09961
Add stencil_set method and accuracy tests
Jonatan Werpers <jonatan@werpers.com>
parents:
972
diff
changeset
|
13 Evaluates ``x^k/k!` with the convetion that it is ``0`` for all ``k<0``. |
ba023fc09961
Add stencil_set method and accuracy tests
Jonatan Werpers <jonatan@werpers.com>
parents:
972
diff
changeset
|
14 Has the property that ``d/dx monomial(x,k) = monomial(x,k-1)`` |
ba023fc09961
Add stencil_set method and accuracy tests
Jonatan Werpers <jonatan@werpers.com>
parents:
972
diff
changeset
|
15 """ |
ba023fc09961
Add stencil_set method and accuracy tests
Jonatan Werpers <jonatan@werpers.com>
parents:
972
diff
changeset
|
16 function monomial(x,k) |
ba023fc09961
Add stencil_set method and accuracy tests
Jonatan Werpers <jonatan@werpers.com>
parents:
972
diff
changeset
|
17 if k < 0 |
ba023fc09961
Add stencil_set method and accuracy tests
Jonatan Werpers <jonatan@werpers.com>
parents:
972
diff
changeset
|
18 return zero(x) |
ba023fc09961
Add stencil_set method and accuracy tests
Jonatan Werpers <jonatan@werpers.com>
parents:
972
diff
changeset
|
19 end |
ba023fc09961
Add stencil_set method and accuracy tests
Jonatan Werpers <jonatan@werpers.com>
parents:
972
diff
changeset
|
20 x^k/factorial(k) |
ba023fc09961
Add stencil_set method and accuracy tests
Jonatan Werpers <jonatan@werpers.com>
parents:
972
diff
changeset
|
21 end |
ba023fc09961
Add stencil_set method and accuracy tests
Jonatan Werpers <jonatan@werpers.com>
parents:
972
diff
changeset
|
22 |
ba023fc09961
Add stencil_set method and accuracy tests
Jonatan Werpers <jonatan@werpers.com>
parents:
972
diff
changeset
|
23 @testset "first_derivative" begin |
978
1a05009e731b
Add tests for constructors
Jonatan Werpers <jonatan@werpers.com>
parents:
974
diff
changeset
|
24 @testset "Constructors" begin |
1a05009e731b
Add tests for constructors
Jonatan Werpers <jonatan@werpers.com>
parents:
974
diff
changeset
|
25 stencil_set = read_stencil_set(sbp_operators_path()*"standard_diagonal.toml"; order=2) |
1a05009e731b
Add tests for constructors
Jonatan Werpers <jonatan@werpers.com>
parents:
974
diff
changeset
|
26 |
1a05009e731b
Add tests for constructors
Jonatan Werpers <jonatan@werpers.com>
parents:
974
diff
changeset
|
27 g₁ = EquidistantGrid(11, 0., 1.) |
1a05009e731b
Add tests for constructors
Jonatan Werpers <jonatan@werpers.com>
parents:
974
diff
changeset
|
28 g₂ = EquidistantGrid((11,14), (0.,1.), (1.,3.)) |
1a05009e731b
Add tests for constructors
Jonatan Werpers <jonatan@werpers.com>
parents:
974
diff
changeset
|
29 |
1a05009e731b
Add tests for constructors
Jonatan Werpers <jonatan@werpers.com>
parents:
974
diff
changeset
|
30 @test first_derivative(g₁, stencil_set, 1) isa TensorMapping{Float64,1,1} |
1a05009e731b
Add tests for constructors
Jonatan Werpers <jonatan@werpers.com>
parents:
974
diff
changeset
|
31 @test first_derivative(g₂, stencil_set, 2) isa TensorMapping{Float64,2,2} |
1a05009e731b
Add tests for constructors
Jonatan Werpers <jonatan@werpers.com>
parents:
974
diff
changeset
|
32 |
1a05009e731b
Add tests for constructors
Jonatan Werpers <jonatan@werpers.com>
parents:
974
diff
changeset
|
33 interior_stencil = CenteredStencil(-1,0,1) |
1a05009e731b
Add tests for constructors
Jonatan Werpers <jonatan@werpers.com>
parents:
974
diff
changeset
|
34 closure_stencils = [Stencil(-1,1, center=1)] |
1a05009e731b
Add tests for constructors
Jonatan Werpers <jonatan@werpers.com>
parents:
974
diff
changeset
|
35 |
1a05009e731b
Add tests for constructors
Jonatan Werpers <jonatan@werpers.com>
parents:
974
diff
changeset
|
36 @test first_derivative(g₁, interior_stencil, closure_stencils, 1) isa TensorMapping{Float64,1,1} |
1a05009e731b
Add tests for constructors
Jonatan Werpers <jonatan@werpers.com>
parents:
974
diff
changeset
|
37 @test first_derivative(g₂, interior_stencil, closure_stencils, 2) isa TensorMapping{Float64,2,2} |
1a05009e731b
Add tests for constructors
Jonatan Werpers <jonatan@werpers.com>
parents:
974
diff
changeset
|
38 end |
1a05009e731b
Add tests for constructors
Jonatan Werpers <jonatan@werpers.com>
parents:
974
diff
changeset
|
39 |
1a05009e731b
Add tests for constructors
Jonatan Werpers <jonatan@werpers.com>
parents:
974
diff
changeset
|
40 @testset "Accuracy" begin |
974
ba023fc09961
Add stencil_set method and accuracy tests
Jonatan Werpers <jonatan@werpers.com>
parents:
972
diff
changeset
|
41 N = 20 |
ba023fc09961
Add stencil_set method and accuracy tests
Jonatan Werpers <jonatan@werpers.com>
parents:
972
diff
changeset
|
42 g = EquidistantGrid(N, 0//1,2//1) |
ba023fc09961
Add stencil_set method and accuracy tests
Jonatan Werpers <jonatan@werpers.com>
parents:
972
diff
changeset
|
43 @testset for order ∈ [2,4] |
ba023fc09961
Add stencil_set method and accuracy tests
Jonatan Werpers <jonatan@werpers.com>
parents:
972
diff
changeset
|
44 stencil_set = read_stencil_set(sbp_operators_path()*"standard_diagonal.toml"; order) |
ba023fc09961
Add stencil_set method and accuracy tests
Jonatan Werpers <jonatan@werpers.com>
parents:
972
diff
changeset
|
45 D₁ = first_derivative(g, stencil_set, 1) |
ba023fc09961
Add stencil_set method and accuracy tests
Jonatan Werpers <jonatan@werpers.com>
parents:
972
diff
changeset
|
46 |
978
1a05009e731b
Add tests for constructors
Jonatan Werpers <jonatan@werpers.com>
parents:
974
diff
changeset
|
47 @testset "boundary x^$k" for k ∈ 0:order÷2 |
974
ba023fc09961
Add stencil_set method and accuracy tests
Jonatan Werpers <jonatan@werpers.com>
parents:
972
diff
changeset
|
48 v = evalOn(g, x->monomial(x,k)) |
ba023fc09961
Add stencil_set method and accuracy tests
Jonatan Werpers <jonatan@werpers.com>
parents:
972
diff
changeset
|
49 |
ba023fc09961
Add stencil_set method and accuracy tests
Jonatan Werpers <jonatan@werpers.com>
parents:
972
diff
changeset
|
50 @testset for i ∈ 1:closure_size(D₁) |
ba023fc09961
Add stencil_set method and accuracy tests
Jonatan Werpers <jonatan@werpers.com>
parents:
972
diff
changeset
|
51 x, = points(g)[i] |
ba023fc09961
Add stencil_set method and accuracy tests
Jonatan Werpers <jonatan@werpers.com>
parents:
972
diff
changeset
|
52 @test (D₁*v)[i] == monomial(x,k-1) |
ba023fc09961
Add stencil_set method and accuracy tests
Jonatan Werpers <jonatan@werpers.com>
parents:
972
diff
changeset
|
53 end |
ba023fc09961
Add stencil_set method and accuracy tests
Jonatan Werpers <jonatan@werpers.com>
parents:
972
diff
changeset
|
54 |
ba023fc09961
Add stencil_set method and accuracy tests
Jonatan Werpers <jonatan@werpers.com>
parents:
972
diff
changeset
|
55 @testset for i ∈ (N-closure_size(D₁)+1):N |
ba023fc09961
Add stencil_set method and accuracy tests
Jonatan Werpers <jonatan@werpers.com>
parents:
972
diff
changeset
|
56 x, = points(g)[i] |
ba023fc09961
Add stencil_set method and accuracy tests
Jonatan Werpers <jonatan@werpers.com>
parents:
972
diff
changeset
|
57 @test (D₁*v)[i] == monomial(x,k-1) |
ba023fc09961
Add stencil_set method and accuracy tests
Jonatan Werpers <jonatan@werpers.com>
parents:
972
diff
changeset
|
58 end |
ba023fc09961
Add stencil_set method and accuracy tests
Jonatan Werpers <jonatan@werpers.com>
parents:
972
diff
changeset
|
59 end |
ba023fc09961
Add stencil_set method and accuracy tests
Jonatan Werpers <jonatan@werpers.com>
parents:
972
diff
changeset
|
60 |
978
1a05009e731b
Add tests for constructors
Jonatan Werpers <jonatan@werpers.com>
parents:
974
diff
changeset
|
61 @testset "interior x^$k" for k ∈ 0:order |
974
ba023fc09961
Add stencil_set method and accuracy tests
Jonatan Werpers <jonatan@werpers.com>
parents:
972
diff
changeset
|
62 v = evalOn(g, x->monomial(x,k)) |
ba023fc09961
Add stencil_set method and accuracy tests
Jonatan Werpers <jonatan@werpers.com>
parents:
972
diff
changeset
|
63 |
ba023fc09961
Add stencil_set method and accuracy tests
Jonatan Werpers <jonatan@werpers.com>
parents:
972
diff
changeset
|
64 x, = points(g)[10] |
ba023fc09961
Add stencil_set method and accuracy tests
Jonatan Werpers <jonatan@werpers.com>
parents:
972
diff
changeset
|
65 @test (D₁*v)[10] == monomial(x,k-1) |
ba023fc09961
Add stencil_set method and accuracy tests
Jonatan Werpers <jonatan@werpers.com>
parents:
972
diff
changeset
|
66 end |
ba023fc09961
Add stencil_set method and accuracy tests
Jonatan Werpers <jonatan@werpers.com>
parents:
972
diff
changeset
|
67 end |
ba023fc09961
Add stencil_set method and accuracy tests
Jonatan Werpers <jonatan@werpers.com>
parents:
972
diff
changeset
|
68 end |
ba023fc09961
Add stencil_set method and accuracy tests
Jonatan Werpers <jonatan@werpers.com>
parents:
972
diff
changeset
|
69 end |
ba023fc09961
Add stencil_set method and accuracy tests
Jonatan Werpers <jonatan@werpers.com>
parents:
972
diff
changeset
|
70 |