sourcemethod_LinearShallowWater2D Subroutine

public subroutine sourcemethod_LinearShallowWater2D(this)

Arguments

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

Calls

proc~~sourcemethod_linearshallowwater2d~~CallsGraph proc~sourcemethod_linearshallowwater2d sourcemethod_LinearShallowWater2D interface~sourcemethod_linearshallowwater2d_gpu sourcemethod_LinearShallowWater2D_gpu proc~sourcemethod_linearshallowwater2d->interface~sourcemethod_linearshallowwater2d_gpu

Contents


Source Code

  subroutine sourcemethod_LinearShallowWater2D(this)
    implicit none
    class(LinearShallowWater2D),intent(inout) :: this

    call sourcemethod_LinearShallowWater2D_gpu(this%solution%interior_gpu, &
                                               this%source%interior_gpu, &
                                               this%fCori%interior_gpu, &
                                               this%Cd, &
                                               this%solution%interp%N, &
                                               this%solution%nelem, &
                                               this%solution%nvar)

  endsubroutine sourcemethod_LinearShallowWater2D