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

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

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

revision 1.6 by jmc, Mon Dec 5 14:37:41 2005 UTC revision 1.7 by jmc, Thu Dec 15 01:11:52 2005 UTC
# Line 60  C     PiLoc, zLoc, dzLoc, yLatLoc, phiLo Line 60  C     PiLoc, zLoc, dzLoc, yLatLoc, phiLo
60  C---+----1----+----2----+----3----+----4----+----5----+----6----+----7-|--+----|  C---+----1----+----2----+----3----+----4----+----5----+----6----+----7-|--+----|
61        CHARACTER*(MAX_LEN_MBUF) msgBuf        CHARACTER*(MAX_LEN_MBUF) msgBuf
62        INTEGER bi,bj,i,j,K, Ks        INTEGER bi,bj,i,j,K, Ks
63        _RL ddPI, Po_surf        _RL Po_surf
64        _RL hRef(2*Nr+1), rHalf(2*Nr+1)        _RL hRef(2*Nr+1), rHalf(2*Nr+1)
65        LOGICAL findPoSurf        LOGICAL findPoSurf
66    

Legend:
Removed from v.1.6  
changed lines
  Added in v.1.7

  ViewVC Help
Powered by ViewVC 1.1.22