MappedDerivative_MappedScalar1D Subroutine

  1. SELF_MappedScalar_1D.f90
  2. SELF_MappedScalar_1D
  3. MappedDerivative_MappedScalar1D

public subroutine MappedDerivative_MappedScalar1D(this, df)

Arguments

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

Contents

Source Code

MappedDerivative_MappedScalar1D

Source Code

  subroutine MappedDerivative_MappedScalar1D(this,dF)
    implicit none
    class(MappedScalar1D),intent(in) :: this
    type(c_ptr),intent(inout) :: df
    ! Local
    integer :: iEl,iVar,i,ii
    real(prec) :: dfloc

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

  endsubroutine MappedDerivative_MappedScalar1D