SourceMethod_ESAtmo3D Subroutine

public subroutine SourceMethod_ESAtmo3D(this)

Souza et al. (2023) non-conservative gravity flux differencing on GPU. The geopotential lives at solution(:,:,:,:,6); the source for rho*w is computed via the SBP-EC two-point form using log-mean density and the contravariant metric. Fully device-resident.

Arguments

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

Calls

proc~~sourcemethod_esatmo3d~~CallsGraph proc~sourcemethod_esatmo3d SourceMethod_ESAtmo3D interface~sourcemethod_esatmo3d_gpu sourcemethod_esatmo3d_gpu proc~sourcemethod_esatmo3d->interface~sourcemethod_esatmo3d_gpu

Contents

Source Code


Source Code

  subroutine SourceMethod_ESAtmo3D(this)
    !! Souza et al. (2023) non-conservative gravity flux differencing on
    !! GPU. The geopotential lives at solution(:,:,:,:,6); the source for
    !! rho*w is computed via the SBP-EC two-point form using log-mean
    !! density and the contravariant metric. Fully device-resident.
    implicit none
    class(ESAtmo3D),intent(inout) :: this

    call sourcemethod_esatmo3d_gpu( &
      this%source%interior_gpu, &
      this%solution%interior_gpu, &
      this%geometry%dsdx%interior_gpu, &
      this%geometry%J%interior_gpu, &
      this%solution%interp%dSplitMatrix_gpu, &
      this%solution%interp%N, &
      this%solution%nvar, &
      this%solution%nelem)

  endsubroutine SourceMethod_ESAtmo3D