Divergence_TwoPointVector2D Subroutine

public subroutine Divergence_TwoPointVector2D(this, df)

GPU implementation of the reference-element split-form divergence. df must be a device pointer to a scalar field of size (N+1)(N+1)nElem*nVar.

Arguments

TypeIntentOptionalAttributesName
class(TwoPointVector2D), intent(in) :: this
type(c_ptr), intent(inout) :: df

Calls

proc~~divergence_twopointvector2d~~CallsGraph proc~divergence_twopointvector2d Divergence_TwoPointVector2D interface~twopointvectordivergence_2d_gpu TwoPointVectorDivergence_2D_gpu proc~divergence_twopointvector2d->interface~twopointvectordivergence_2d_gpu

Contents


Source Code

  subroutine Divergence_TwoPointVector2D(this,df)
    !! GPU implementation of the reference-element split-form divergence.
    !! df must be a device pointer to a scalar field of size
    !! (N+1)*(N+1)*nElem*nVar.
    implicit none
    class(TwoPointVector2D),intent(in) :: this
    type(c_ptr),intent(inout) :: df

    call TwoPointVectorDivergence_2D_gpu(this%interior_gpu,df, &
                                         this%interp%dSplitMatrix_gpu, &
                                         this%interp%N,this%nVar,this%nElem)

  endsubroutine Divergence_TwoPointVector2D