/[MITgcm]/MITgcm/eesupp/src/print.F
ViewVC logotype

Diff of /MITgcm/eesupp/src/print.F

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

revision 1.6 by cnh, Thu May 21 18:30:08 1998 UTC revision 1.7 by cnh, Mon Jun 8 21:43:00 1998 UTC
# Line 148  C     K    - Loop counter Line 148  C     K    - Loop counter
148        INTEGER nDup        INTEGER nDup
149        INTEGER xNew, xOld        INTEGER xNew, xOld
150        CHARACTER punc        CHARACTER punc
151        CHARACTER(MAX_LEN_MBUF) msgBuf        CHARACTER*(MAX_LEN_MBUF) msgBuf
152        CHARACTER*2 commOpen,commClose        CHARACTER*2 commOpen,commClose
153        CHARACTER*3 index_lab        CHARACTER*3 index_lab
154        INTEGER K        INTEGER K
# Line 251  C     K    - Loop counter Line 251  C     K    - Loop counter
251        INTEGER nDup        INTEGER nDup
252        LOGICAL xNew, xOld        LOGICAL xNew, xOld
253        CHARACTER punc        CHARACTER punc
254        CHARACTER(MAX_LEN_MBUF) msgBuf        CHARACTER*(MAX_LEN_MBUF) msgBuf
255        CHARACTER*2 commOpen,commClose        CHARACTER*2 commOpen,commClose
256        CHARACTER*3 index_lab        CHARACTER*3 index_lab
257        INTEGER K        INTEGER K
# Line 354  C     K    - Loop counter Line 354  C     K    - Loop counter
354        INTEGER nDup        INTEGER nDup
355        Real*8 xNew, xOld        Real*8 xNew, xOld
356        CHARACTER punc        CHARACTER punc
357        CHARACTER(MAX_LEN_MBUF) msgBuf        CHARACTER*(MAX_LEN_MBUF) msgBuf
358        CHARACTER*2 commOpen,commClose        CHARACTER*2 commOpen,commClose
359        CHARACTER*3 index_lab        CHARACTER*3 index_lab
360        INTEGER K        INTEGER K
Legend:
Removed from v.1.6  
changed lines
  Added in v.1.7
  ViewVC Help
Powered by ViewVC 1.1.22