parallel_gradient_supp Subroutine

public subroutine parallel_gradient_supp(comm, mesh, mesh_staggered, qsupp_fwd, qsupp_bwd, u, du)

Parallel gradient (from full to staggered mesh)

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: comm

MPI communicator

type(mesh_cart_t), intent(in) :: mesh

Mesh

type(mesh_cart_t), intent(in) :: mesh_staggered

Mesh at toroidally staggered (fwd) position

type(csrmat_t), intent(in) :: qsupp_fwd

Parallel gradient matrix (fwd direction)

type(csrmat_t), intent(in) :: qsupp_bwd

Parallel gradient matrix (fwd direction)

real(kind=FP), intent(in), dimension(mesh%get_n_points()) :: u

Variable u

real(kind=FP), intent(out), dimension(mesh_staggered%get_n_points()) :: du

Parallel gradient of variable u on staggered grid