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

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

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

revision 1.2 by cnh, Thu Apr 23 20:37:30 1998 UTC revision 1.3 by cnh, Wed Oct 28 03:11:34 1998 UTC
# Line 25  C     === Local variables === Line 25  C     === Local variables ===
25        WRITE(msgBuf,'(A)') '                '        WRITE(msgBuf,'(A)') '                '
26        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
27       &  SQUEEZE_RIGHT , 1)       &  SQUEEZE_RIGHT , 1)
28        WRITE(msgBuf,'(A)') '// ======================================================'        WRITE(msgBuf,'(A)')
29         &'// ======================================================'
30        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
31       &  SQUEEZE_RIGHT , 1)       &  SQUEEZE_RIGHT , 1)
32        WRITE(msgBuf,'(A)') '//                      MITgcm UV'        WRITE(msgBuf,'(A)') '//                      MITgcm UV'
# Line 34  C     === Local variables === Line 35  C     === Local variables ===
35        WRITE(msgBuf,'(A)') '//                      ========='        WRITE(msgBuf,'(A)') '//                      ========='
36        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
37       &  SQUEEZE_RIGHT , 1)       &  SQUEEZE_RIGHT , 1)
38        WRITE(msgBuf,'(A)') '// ======================================================'        WRITE(msgBuf,'(A)')
39         &'// ======================================================'
40        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
41       &  SQUEEZE_RIGHT , 1)       &  SQUEEZE_RIGHT , 1)
42        WRITE(msgBuf,'(A)') '// execution environment starting up...'        WRITE(msgBuf,'(A)') '// execution environment starting up...'
Legend:
Removed from v.1.2  
changed lines
  Added in v.1.3
  ViewVC Help
Powered by ViewVC 1.1.22