cyclicqj Subroutine

private subroutine cyclicqj()

Uses

  • proc~~cyclicqj~~UsesGraph proc~cyclicqj modboundary::cyclicqj module~modfields modfields proc~cyclicqj->module~modfields module~modglobal modglobal proc~cyclicqj->module~modglobal module~modmpi modmpi proc~cyclicqj->module~modmpi mpi mpi module~modmpi->mpi

Arguments

None

Calls

proc~~cyclicqj~~CallsGraph proc~cyclicqj modboundary::cyclicqj proc~excjs modmpi::excjs proc~cyclicqj->proc~excjs mpi_sendrecv mpi_sendrecv proc~excjs->mpi_sendrecv

Called by

proc~~cyclicqj~~CalledByGraph proc~cyclicqj modboundary::cyclicqj proc~boundary modboundary::boundary proc~boundary->proc~cyclicqj proc~readinitfiles modstartup::readinitfiles proc~readinitfiles->proc~boundary program~dalesurban DALESURBAN program~dalesurban->proc~boundary proc~startup modstartup::startup program~dalesurban->proc~startup proc~startup->proc~readinitfiles

Contents

Source Code

cyclicqj

Source Code

   subroutine cyclicqj
      use modglobal, only:ib, ie, jb, je, ih, jh, kb, ke, kh, nsv, dt, rk3step, dxhi, ihc, jhc, khc, dy
      use modfields, only:qt0, qtm
      use modmpi, only:excjs, myid, nprocs

      call excjs(qt0, ib, ie, jb, je, kb, ke + kh, ih, jh)
      call excjs(qtm, ib, ie, jb, je, kb, ke + kh, ih, jh)

      return
   end subroutine cyclicqj