Mercurial > repos > public > sbplib_julia
comparison src/SbpOperators/volumeops/volume_operator.jl @ 2057:8a2a0d678d6f feature/lazy_tensors/pretty_printing
Merge default
| author | Jonatan Werpers <jonatan@werpers.com> |
|---|---|
| date | Tue, 10 Feb 2026 22:41:19 +0100 |
| parents | 0656b46a1a74 |
| children |
comparison
equal
deleted
inserted
replaced
| 1110:c0bff9f6e0fb | 2057:8a2a0d678d6f |
|---|---|
| 1 """ | |
| 2 volume_operator(grid, inner_stencil, closure_stencils, parity, direction) | |
| 3 | |
| 4 Creates a volume operator on a `Dim`-dimensional grid acting along the | |
| 5 specified coordinate `direction`. The action of the operator is determined by | |
| 6 the stencils `inner_stencil` and `closure_stencils`. When `Dim=1`, the | |
| 7 corresponding `VolumeOperator` tensor mapping is returned. When `Dim>1`, the | |
| 8 returned operator is the appropriate outer product of a one-dimensional | |
| 9 operators and `IdentityTensor`s, e.g for `Dim=3` the volume operator in the | |
| 10 y-direction is `I⊗op⊗I`. | |
| 11 """ | |
| 12 function volume_operator(grid::EquidistantGrid, inner_stencil, closure_stencils, parity, direction) | |
| 13 #TODO: Check that direction <= Dim? | |
| 14 | |
| 15 # Create 1D volume operator in along coordinate direction | |
| 16 op = VolumeOperator(restrict(grid, direction), inner_stencil, closure_stencils, parity) | |
| 17 # Create 1D IdentityTensors for each coordinate direction | |
| 18 one_d_grids = restrict.(Ref(grid), Tuple(1:dimension(grid))) | |
| 19 Is = IdentityTensor{eltype(grid)}.(size.(one_d_grids)) | |
| 20 # Formulate the correct outer product sequence of the identity mappings and | |
| 21 # the volume operator | |
| 22 parts = Base.setindex(Is, op, direction) | |
| 23 return foldl(⊗, parts) | |
| 24 end | |
| 25 | |
| 26 """ | 1 """ |
| 27 VolumeOperator{T,N,M,K} <: LazyTensor{T,1,1} | 2 VolumeOperator{T,N,M,K} <: LazyTensor{T,1,1} |
| 28 Implements a one-dimensional constant coefficients volume operator | 3 |
| 4 A one-dimensional constant coefficients stencil operator. | |
| 29 """ | 5 """ |
| 30 struct VolumeOperator{T,N,M,K} <: LazyTensor{T,1,1} | 6 struct VolumeOperator{T,N,M,K} <: LazyTensor{T,1,1} |
| 31 inner_stencil::Stencil{T,N} | 7 inner_stencil::Stencil{T,N} |
| 32 closure_stencils::NTuple{M,Stencil{T,K}} | 8 closure_stencils::NTuple{M,Stencil{T,K}} |
| 33 size::NTuple{1,Int} | 9 size::Int |
| 34 parity::Parity | 10 parity::Parity |
| 11 | |
| 12 function VolumeOperator(inner_stencil::Stencil{T,N}, closure_stencils::Tuple{Stencil{T,K}, Vararg{Stencil{T,K}}}, size::Int, parity::Parity) where {T,N,K} | |
| 13 M = length(closure_stencils) | |
| 14 return new{T,N,M,K}(inner_stencil, closure_stencils, size, parity) | |
| 15 end | |
| 35 end | 16 end |
| 36 | 17 |
| 37 function VolumeOperator(grid::EquidistantGrid{1}, inner_stencil, closure_stencils, parity) | 18 function VolumeOperator(grid::EquidistantGrid, inner_stencil, closure_stencils, parity) |
| 38 return VolumeOperator(inner_stencil, Tuple(closure_stencils), size(grid), parity) | 19 return VolumeOperator(inner_stencil, Tuple(closure_stencils), size(grid,1), parity) |
| 39 end | 20 end # TBD: Remove this function? |
| 40 | 21 |
| 41 closure_size(::VolumeOperator{T,N,M}) where {T,N,M} = M | 22 closure_size(::VolumeOperator{T,N,M}) where {T,N,M} = M |
| 42 | 23 |
| 43 LazyTensors.range_size(op::VolumeOperator) = op.size | 24 LazyTensors.range_size(op::VolumeOperator) = (op.size,) |
| 44 LazyTensors.domain_size(op::VolumeOperator) = op.size | 25 LazyTensors.domain_size(op::VolumeOperator) = (op.size,) |
| 45 | 26 |
| 46 function LazyTensors.apply(op::VolumeOperator, v::AbstractVector, i::Index{Lower}) | 27 function LazyTensors.apply(op::VolumeOperator, v::AbstractVector, i::Index{Lower}) |
| 47 return @inbounds apply_stencil(op.closure_stencils[Int(i)], v, Int(i)) | 28 return @inbounds apply_stencil(op.closure_stencils[Int(i)], v, Int(i)) |
| 48 end | 29 end |
| 49 | 30 |
| 50 function LazyTensors.apply(op::VolumeOperator, v::AbstractVector, i::Index{Interior}) | 31 function LazyTensors.apply(op::VolumeOperator, v::AbstractVector, i::Index{Interior}) |
| 51 return apply_stencil(op.inner_stencil, v, Int(i)) | 32 return apply_stencil(op.inner_stencil, v, Int(i)) |
| 52 end | 33 end |
| 53 | 34 |
| 54 function LazyTensors.apply(op::VolumeOperator, v::AbstractVector, i::Index{Upper}) | 35 function LazyTensors.apply(op::VolumeOperator, v::AbstractVector, i::Index{Upper}) |
| 55 return @inbounds Int(op.parity)*apply_stencil_backwards(op.closure_stencils[op.size[1]-Int(i)+1], v, Int(i)) | 36 return @inbounds Int(op.parity)*apply_stencil_backwards(op.closure_stencils[op.size-Int(i)+1], v, Int(i)) |
| 56 end | 37 end |
| 57 | 38 |
| 58 function LazyTensors.apply(op::VolumeOperator, v::AbstractVector, i) | 39 function LazyTensors.apply(op::VolumeOperator, v::AbstractVector, i) |
| 59 r = getregion(i, closure_size(op), op.size[1]) | 40 r = getregion(i, closure_size(op), op.size) |
| 60 return LazyTensors.apply(op, v, Index(i, r)) | 41 return LazyTensors.apply(op, v, Index(i, r)) |
| 61 end | 42 end |
| 43 # TODO: Move this to LazyTensors when we have the region communication down. |
