grad3D3_curv_periodic Function

private pure function grad3D3_curv_periodic(f, x, lbnd, ubnd)

this assumes that the backward difference for hte first cell has been set the the same as the forward difference for the final cell, i.e. x%dx3all(lbnd)==x%dx3all(ubnd+1). In general when doing periodic grids it is probably best to hard code all of the differences outside the domain to be equal (or to use uniform meshes)

Arguments

Type IntentOptional AttributesName
real(kind=wp), intent(in), dimension(:,:,:):: f
type(curvmesh), intent(in) :: x
integer, intent(in) :: lbnd
integer, intent(in) :: ubnd

Return Value real(kind=wp), dimension(1:size(f,1),1:size(f,2),1:size(f,3))


Contents

None