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

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

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

revision 1.9 by adcroft, Wed Dec 9 16:11:52 1998 UTC revision 1.10 by adcroft, Tue May 18 18:01:13 1999 UTC
# Line 35  CEndOfInterface Line 35  CEndOfInterface
35  C     == Local variables ==  C     == Local variables ==
36  C     iC, jC - Center of domain  C     iC, jC - Center of domain
37  C     iD, jD - Disitance from domain center.  C     iD, jD - Disitance from domain center.
 C     rad    - Radius of initial patch  
 C     rD     - Radial displacement of point I,J  
38  C     iG, jG - Global coordinate index  C     iG, jG - Global coordinate index
39  C     bi,bj  - Loop counters  C     bi,bj  - Loop counters
40  C     I,J,K  C     I,J,K
# Line 44  C     I,J,K Line 42  C     I,J,K
42        INTEGER iG, jG        INTEGER iG, jG
43        INTEGER bi, bj        INTEGER bi, bj
44        INTEGER  I,  J, K        INTEGER  I,  J, K
       REAL rad, rD  
45    
46        _BARRIER        _BARRIER
47    
Legend:
Removed from v.1.9  
changed lines
  Added in v.1.10
  ViewVC Help
Powered by ViewVC 1.1.22