Broadcast_ColumnOperators3D Subroutine

  1. SELF_ColumnOperators_3D.f90
  2. SELF_ColumnOperators_3D
  3. Broadcast_ColumnOperators3D

public subroutine Broadcast_ColumnOperators3D(this, qbar, q)

Device version of Broadcast_ColumnOperators3D_t

Arguments

TypeIntentOptionalAttributesName
class(ColumnOperators3D), intent(in) :: this
class(Scalar2D), intent(in) :: qbar
class(Scalar3D), intent(inout) :: q

Calls

proc~~broadcast_columnoperators3d~~CallsGraph proc~broadcast_columnoperators3d Broadcast_ColumnOperators3D proc~checkfields_columnoperators3d_t CheckFields_ColumnOperators3D_t proc~broadcast_columnoperators3d->proc~checkfields_columnoperators3d_t interface~columnbroadcast_3d_gpu ColumnBroadcast_3D_gpu proc~broadcast_columnoperators3d->interface~columnbroadcast_3d_gpu

Contents

Source Code

Broadcast_ColumnOperators3D

Source Code

  subroutine Broadcast_ColumnOperators3D(this,qbar,q)
    !! Device version of Broadcast_ColumnOperators3D_t
    implicit none
    class(ColumnOperators3D),intent(in) :: this
    class(Scalar2D),intent(in) :: qbar
    class(Scalar3D),intent(inout) :: q

    call CheckFields_ColumnOperators3D_t(this,q,qbar,"Broadcast")
    call ColumnBroadcast_3D_gpu(qbar%interior_gpu,q%interior_gpu, &
                                this%N,this%nLayers,this%nColumns,q%nVar)

  endsubroutine Broadcast_ColumnOperators3D