/[MITgcm]/MITgcm/pkg/kpp/kpp_transport_s.F
ViewVC logotype

Diff of /MITgcm/pkg/kpp/kpp_transport_s.F

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph | View Patch Patch

revision 1.11 by jmc, Wed Oct 20 21:54:17 2004 UTC revision 1.12 by jmc, Thu May 3 21:33:42 2007 UTC
# Line 8  C $Name$ Line 8  C $Name$
8    
9        subroutine KPP_TRANSPORT_S (        subroutine KPP_TRANSPORT_S (
10       I     iMin,iMax,jMin,jMax,bi,bj,k,km1,       I     iMin,iMax,jMin,jMax,bi,bj,k,km1,
11       O     df )       O     df,
12         I     myTime, myIter, myThid )
13  C     /==========================================================\  C     /==========================================================\
14  C     | o SUBROUTINE KPP_TRANSPORT_S                             |  C     | o SUBROUTINE KPP_TRANSPORT_S                             |
15  C     |   Add non local KPP transport term (ghat) to diffusive   |  C     |   Add non local KPP transport term (ghat) to diffusive   |
# Line 40  C     == Routine arguments == Line 41  C     == Routine arguments ==
41  C     iMin,iMax,jMin,  - Range of points for which calculation  C     iMin,iMax,jMin,  - Range of points for which calculation
42  C     jMax,bi,bj,k,km1   results will be set.  C     jMax,bi,bj,k,km1   results will be set.
43  C     df               - Diffusive flux component work array.  C     df               - Diffusive flux component work array.
44    C     myTime :: Current time in simulation
45    C     myIter :: Current iteration number in simulation
46    C     myThid :: My Thread Id. number
47        INTEGER iMin,iMax,jMin,jMax,bi,bj,k,km1        INTEGER iMin,iMax,jMin,jMax,bi,bj,k,km1
48        _RL df     (1-OLx:sNx+OLx,1-OLy:sNy+OLy)        _RL df     (1-OLx:sNx+OLx,1-OLy:sNy+OLy)
49          _RL     myTime
50          INTEGER myIter
51          INTEGER myThid
52    
53  #if defined(ALLOW_KPP) && defined(KPP_GHAT)  #if defined(ALLOW_KPP) && defined(KPP_GHAT)
54    
Legend:
Removed from v.1.11  
changed lines
  Added in v.1.12
  ViewVC Help
Powered by ViewVC 1.1.22