AverageSides_Scalar1D Subroutine

  1. SELF_Scalar_1D.f90
  2. SELF_Scalar_1D
  3. AverageSides_Scalar1D

public subroutine AverageSides_Scalar1D(this)

Arguments

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

Calls

proc~~averagesides_scalar1d~~CallsGraph proc~averagesides_scalar1d AverageSides_Scalar1D interface~average_gpu Average_gpu proc~averagesides_scalar1d->interface~average_gpu

Contents

Source Code

AverageSides_Scalar1D

Source Code

  subroutine AverageSides_Scalar1D(this)
    implicit none
    class(Scalar1D),intent(inout) :: this

    call Average_gpu(this%avgBoundary_gpu,this%boundary_gpu,this%extBoundary_gpu,size(this%avgBoundary))

  endsubroutine AverageSides_Scalar1D