MappedDGDerivative_MappedScalar1D Subroutine

  1. SELF_MappedScalar_1D.f90
  2. SELF_MappedScalar_1D
  3. MappedDGDerivative_MappedScalar1D

public subroutine MappedDGDerivative_MappedScalar1D(this, df)

Arguments

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

Calls

proc~~mappeddgderivative_mappedscalar1d~~CallsGraph proc~mappeddgderivative_mappedscalar1d MappedDGDerivative_MappedScalar1D matrixop_1d_gpu matrixop_1d_gpu proc~mappeddgderivative_mappedscalar1d->matrixop_1d_gpu interface~dgderivative_boundarycontribution_1d_gpu DGDerivative_BoundaryContribution_1D_gpu proc~mappeddgderivative_mappedscalar1d->interface~dgderivative_boundarycontribution_1d_gpu interface~jacobianweight_1d_gpu JacobianWeight_1D_gpu proc~mappeddgderivative_mappedscalar1d->interface~jacobianweight_1d_gpu

Contents

Source Code

MappedDGDerivative_MappedScalar1D

Source Code

  subroutine MappedDGDerivative_MappedScalar1D(this,dF)
    implicit none
    class(MappedScalar1D),intent(in) :: this
    type(c_ptr),intent(inout) :: df

    call MatrixOp_1D_gpu(this%interp%dgMatrix_gpu, &
                         this%interior_gpu, &
                         df,this%N+1,this%N+1, &
                         this%nvar*this%nelem)

    call DGDerivative_BoundaryContribution_1D_gpu(this%interp%bMatrix_gpu, &
                                                  this%interp%qWeights_gpu, &
                                                  this%boundarynormal_gpu,df, &
                                                  this%N,this%nVar,this%nelem)

    call JacobianWeight_1D_gpu(df,this%geometry%dxds%interior_gpu,this%N,this%nVar,this%nelem)

  endsubroutine MappedDGDerivative_MappedScalar1D