/[MITgcm]/MITgcm/pkg/mnc/mnc_cw_citer.F
ViewVC logotype

Diff of /MITgcm/pkg/mnc/mnc_cw_citer.F

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

revision 1.2 by edhill, Wed Sep 14 19:27:31 2005 UTC revision 1.3 by mlosch, Thu May 22 12:21:19 2008 UTC
# Line 19  C     Set CITER information for group "i Line 19  C     Set CITER information for group "i
19    
20  C     !USES:  C     !USES:
21        implicit none        implicit none
22  #include "mnc_common.h"  #include "MNC_COMMON.h"
23    
24  C     !INPUT PARAMETERS:  C     !INPUT PARAMETERS:
25        integer igroup, iflag, ival_curr, ival_next, myThid        integer igroup, iflag, ival_curr, ival_next, myThid
# Line 69  C     Get the current CITER information Line 69  C     Get the current CITER information
69    
70  C     !USES:  C     !USES:
71        implicit none        implicit none
72  #include "mnc_common.h"  #include "MNC_COMMON.h"
73    
74  C     !INPUT PARAMETERS:  C     !INPUT PARAMETERS:
75        integer igroup, iflag, ival_curr, ival_next, myThid        integer igroup, iflag, ival_curr, ival_next, myThid
# Line 99  C     Set the flag and/or current iterat Line 99  C     Set the flag and/or current iterat
99    
100  C     !USES:  C     !USES:
101        implicit none        implicit none
102  #include "mnc_common.h"  #include "MNC_COMMON.h"
103  #include "EEPARAMS.h"  #include "EEPARAMS.h"
104    
105  C     !INPUT PARAMETERS:  C     !INPUT PARAMETERS:
# Line 163  C     Set the flag and/or current iterat Line 163  C     Set the flag and/or current iterat
163    
164  C     !USES:  C     !USES:
165        implicit none        implicit none
166  #include "mnc_common.h"  #include "MNC_COMMON.h"
167  #include "EEPARAMS.h"  #include "EEPARAMS.h"
168    
169  C     !INPUT PARAMETERS:  C     !INPUT PARAMETERS:
Legend:
Removed from v.1.2  
changed lines
  Added in v.1.3
  ViewVC Help
Powered by ViewVC 1.1.22