/[MITgcm]/MITgcm/model/src/calc_r_star.F
ViewVC logotype

Diff of /MITgcm/model/src/calc_r_star.F

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

revision 1.13 by jmc, Mon Oct 29 18:15:29 2007 UTC revision 1.14 by jmc, Tue Dec 8 21:46:23 2009 UTC
# Line 44  C     etaFld :: current eta field used t Line 44  C     etaFld :: current eta field used t
44    
45  C     !LOCAL VARIABLES:  C     !LOCAL VARIABLES:
46  C     Local variables  C     Local variables
47  C     i,j,k,bi,bj  :: loop counter  C     i,j, bi,bj   :: loop counter
48  C     numbWrite    :: count the Number of warning written on STD-ERR file  C     numbWrite    :: count the Number of warning written on STD-ERR file
49  C     numbWrMax    ::  maximum  Number of warning written on STD-ERR file  C     numbWrMax    ::  maximum  Number of warning written on STD-ERR file
50        INTEGER i,j,k,bi,bj        INTEGER i,j,bi,bj
51        INTEGER numbWrite, numbWrMax        INTEGER numbWrite, numbWrMax
52        INTEGER icntc1, icntc2, icntw, icnts        INTEGER icntc1, icntc2, icntw, icnts
53        INTEGER iic, jjc, iic2, jjc2, iiw, jjw, iis, jjs        INTEGER iic, jjc, iic2, jjc2, iiw, jjw, iis, jjs
Legend:
Removed from v.1.13  
changed lines
  Added in v.1.14
  ViewVC Help
Powered by ViewVC 1.1.22