DiffusiveFluxMethod_ESAtmo2D Subroutine

  1. SELF_ESAtmo2D.f90
  2. SELF_ESAtmo2D
  3. DiffusiveFluxMethod_ESAtmo2D

public subroutine DiffusiveFluxMethod_ESAtmo2D(this)

GPU-resident fill of diffFlux%interior with the constant-coefficient Laplacian flux F_d(iVar) = -coeff(iVar) * d(s_iVar)/dx_d.

Arguments

TypeIntentOptionalAttributesName
class(ESAtmo2D), intent(inout) :: this

Calls

proc~~diffusivefluxmethod_esatmo2d~~CallsGraph proc~diffusivefluxmethod_esatmo2d DiffusiveFluxMethod_ESAtmo2D interface~diffusiveflux_esatmo2d_gpu diffusiveflux_esatmo2d_gpu proc~diffusivefluxmethod_esatmo2d->interface~diffusiveflux_esatmo2d_gpu

Contents

Source Code

DiffusiveFluxMethod_ESAtmo2D

Source Code

  subroutine DiffusiveFluxMethod_ESAtmo2D(this)
    !! GPU-resident fill of diffFlux%interior with the constant-coefficient
    !! Laplacian flux F_d(iVar) = -coeff(iVar) * d(s_iVar)/dx_d.
    implicit none
    class(ESAtmo2D),intent(inout) :: this

    call diffusiveflux_esatmo2d_gpu( &
      this%diffFlux%interior_gpu, &
      this%solutionGradient%interior_gpu, &
      this%nu,this%kappa, &
      this%solution%interp%N, &
      this%solution%nvar, &
      this%solution%nelem)

  endsubroutine DiffusiveFluxMethod_ESAtmo2D