Mercurial > repos > public > sbplib_julia
comparison src/SbpOperators/boundaryops/boundary_operator.jl @ 1025:e74c41c4b60e feature/dissipation_operators
Merge refactor/sbpoperators/inflation
author | Jonatan Werpers <jonatan@werpers.com> |
---|---|
date | Mon, 21 Mar 2022 15:12:59 +0100 |
parents | 52f07c77299d |
children | 5a3281429a48 62f321caa964 05a25a5063bb |
comparison
equal
deleted
inserted
replaced
1021:ee5a641a8277 | 1025:e74c41c4b60e |
---|---|
4 Creates a boundary operator on a `Dim`-dimensional grid for the | 4 Creates a boundary operator on a `Dim`-dimensional grid for the |
5 specified `boundary`. The action of the operator is determined by `closure_stencil`. | 5 specified `boundary`. The action of the operator is determined by `closure_stencil`. |
6 | 6 |
7 When `Dim=1`, the corresponding `BoundaryOperator` tensor mapping is returned. | 7 When `Dim=1`, the corresponding `BoundaryOperator` tensor mapping is returned. |
8 When `Dim>1`, the `BoundaryOperator` `op` is inflated by the outer product | 8 When `Dim>1`, the `BoundaryOperator` `op` is inflated by the outer product |
9 of `IdentityMappings` in orthogonal coordinate directions, e.g for `Dim=3`, | 9 of `IdentityTensors` in orthogonal coordinate directions, e.g for `Dim=3`, |
10 the boundary restriction operator in the y-direction direction is `Ix⊗op⊗Iz`. | 10 the boundary restriction operator in the y-direction direction is `Ix⊗op⊗Iz`. |
11 """ | 11 """ |
12 function boundary_operator(grid::EquidistantGrid, closure_stencil, boundary::CartesianBoundary) | 12 function boundary_operator(grid::EquidistantGrid, closure_stencil, boundary::CartesianBoundary) |
13 #TODO:Check that dim(boundary) <= Dim? | 13 #TODO:Check that dim(boundary) <= Dim? |
14 | 14 |
15 # Create 1D boundary operator | |
16 r = region(boundary) | |
17 d = dim(boundary) | 15 d = dim(boundary) |
18 op = BoundaryOperator(restrict(grid, d), closure_stencil, r) | 16 op = BoundaryOperator(restrict(grid, d), closure_stencil, region(boundary)) |
19 | 17 |
20 # Create 1D IdentityMappings for each coordinate direction | 18 # Create 1D IdentityTensors for each coordinate direction |
21 one_d_grids = restrict.(Ref(grid), Tuple(1:dimension(grid))) | 19 one_d_grids = restrict.(Ref(grid), Tuple(1:dimension(grid))) |
22 Is = IdentityMapping{eltype(grid)}.(size.(one_d_grids)) | 20 Is = IdentityTensor{eltype(grid)}.(size.(one_d_grids)) |
23 | 21 |
24 # Formulate the correct outer product sequence of the identity mappings and | 22 return LazyTensors.inflate(op, size(grid), d) |
25 # the boundary operator | |
26 parts = Base.setindex(Is, op, d) | |
27 return foldl(⊗, parts) | |
28 end | 23 end |
29 | 24 |
30 """ | 25 """ |
31 BoundaryOperator{T,R,N} <: TensorMapping{T,0,1} | 26 BoundaryOperator{T,R,N} <: LazyTensor{T,0,1} |
32 | 27 |
33 Implements the boundary operator `op` for 1D as a `TensorMapping` | 28 Implements the boundary operator `op` for 1D as a `LazyTensor` |
34 | 29 |
35 `op` is the restriction of a grid function to the boundary using some closure `Stencil{T,N}`. | 30 `op` is the restriction of a grid function to the boundary using some closure `Stencil{T,N}`. |
36 The boundary to restrict to is determined by `R`. | 31 The boundary to restrict to is determined by `R`. |
37 `op'` is the prolongation of a zero dimensional array to the whole grid using the same closure stencil. | 32 `op'` is the prolongation of a zero dimensional array to the whole grid using the same closure stencil. |
38 """ | 33 """ |
39 struct BoundaryOperator{T,R<:Region,N} <: TensorMapping{T,0,1} | 34 struct BoundaryOperator{T,R<:Region,N} <: LazyTensor{T,0,1} |
40 stencil::Stencil{T,N} | 35 stencil::Stencil{T,N} |
41 size::Int | 36 size::Int |
42 end | 37 end |
43 | 38 |
44 BoundaryOperator{R}(stencil::Stencil{T,N}, size::Int) where {T,R,N} = BoundaryOperator{T,R,N}(stencil, size) | 39 BoundaryOperator{R}(stencil::Stencil{T,N}, size::Int) where {T,R,N} = BoundaryOperator{T,R,N}(stencil, size) |