Divergence_Vector3D Subroutine

public subroutine Divergence_Vector3D(this, df)

Arguments

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

Calls

proc~~divergence_vector3d~~CallsGraph proc~divergence_vector3d Divergence_Vector3D interface~vectordivergence_3d_gpu VectorDivergence_3D_gpu proc~divergence_vector3d->interface~vectordivergence_3d_gpu

Contents

Source Code


Source Code

  subroutine Divergence_Vector3D(this,df)
    implicit none
    class(Vector3D),intent(in) :: this
    type(c_ptr),intent(inout) :: df

    call VectorDivergence_3D_gpu(this%interp%dMatrix_gpu,this%interior_gpu,df, &
                                 this%interp%N,this%nvar,this%nelem)

  endsubroutine Divergence_Vector3D