Mercurial > repos > public > sbplib_julia

comparison src/SbpOperators/volumeops/volume_operator.jl @ 834:a8d64785f51b operator_storage_array_of_table

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Merge refactor/sbp_operators_method_signatures
author Jonatan Werpers <jonatan@werpers.com>
date Thu, 13 Jan 2022 08:51:26 +0100
parents ae28f1d7ef5e
children b41180efb6c2 469ed954b493 0a856fb96db4
comparison
equal deleted inserted replaced
833:454ba1efa644 834:a8d64785f51b
7 corresponding `VolumeOperator` tensor mapping is returned. 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 8 returned operator is the appropriate outer product of a one-dimensional
9 operators and `IdentityMapping`s, e.g for `Dim=3` the volume operator in the 9 operators and `IdentityMapping`s, e.g for `Dim=3` the volume operator in the
10 y-direction is `I⊗op⊗I`. 10 y-direction is `I⊗op⊗I`.
11 """ 11 """
12 function volume_operator(grid::EquidistantGrid{Dim,T}, inner_stencil, closure_stencils, parity, direction) where {Dim,T} 12 function volume_operator(grid::EquidistantGrid, inner_stencil, closure_stencils, parity, direction)
13 #TODO: Check that direction <= Dim? 13 #TODO: Check that direction <= Dim?
14 14
15 # Create 1D volume operator in along coordinate direction 15 # Create 1D volume operator in along coordinate direction
16 op = VolumeOperator(restrict(grid, direction), inner_stencil, closure_stencils, parity) 16 op = VolumeOperator(restrict(grid, direction), inner_stencil, closure_stencils, parity)
17 # Create 1D IdentityMappings for each coordinate direction 17 # Create 1D IdentityMappings for each coordinate direction
18 one_d_grids = restrict.(Ref(grid), Tuple(1:Dim)) 18 one_d_grids = restrict.(Ref(grid), Tuple(1:dimension(grid)))
19 Is = IdentityMapping{T}.(size.(one_d_grids)) 19 Is = IdentityMapping{eltype(grid)}.(size.(one_d_grids))
20 # Formulate the correct outer product sequence of the identity mappings and 20 # Formulate the correct outer product sequence of the identity mappings and
21 # the volume operator 21 # the volume operator
22 parts = Base.setindex(Is, op, direction) 22 parts = Base.setindex(Is, op, direction)
23 return foldl(⊗, parts) 23 return foldl(⊗, parts)
24 end 24 end