cyclichj Subroutine

private subroutine cyclichj()

Uses

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

Arguments

None

Calls

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

Called by

proc~~cyclichj~~CalledByGraph proc~cyclichj modboundary::cyclichj proc~boundary modboundary::boundary proc~boundary->proc~cyclichj 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

cyclichj

Source Code

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

      call excjs(thl0, ib, ie, jb, je, kb, ke + kh, ih, jh)
      call excjs(thlm, ib, ie, jb, je, kb, ke + kh, ih, jh)

      return
   end subroutine cyclichj