/[MITgcm]/MITgcm/pkg/longstep/longstep_average_3d.F
ViewVC logotype

Diff of /MITgcm/pkg/longstep/longstep_average_3d.F

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

revision 1.1 by jahn, Fri Jun 26 23:10:10 2009 UTC revision 1.2 by jmc, Sat Jun 27 02:40:41 2009 UTC
# Line 32  C      lsCnt :: Counter to update Line 32  C      lsCnt :: Counter to update
32  C      lsFld :: average to update  C      lsFld :: average to update
33  C       myNr :: number of levels to update  C       myNr :: number of levels to update
34  C     myThid :: my Thread Id number  C     myThid :: my Thread Id number
35          INTEGER myNr
36        _RL lsFld(1-OLx:sNx+OLx,1-OLy:sNy+OLy,myNr,nSx,nSy)        _RL lsFld(1-OLx:sNx+OLx,1-OLy:sNy+OLy,myNr,nSx,nSy)
37        INTEGER lsCnt        INTEGER lsCnt
       INTEGER myNr  
38        INTEGER myThid        INTEGER myThid
39    
40  #ifdef ALLOW_LONGSTEP  #ifdef ALLOW_LONGSTEP
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2
  ViewVC Help
Powered by ViewVC 1.1.22