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

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

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

revision 1.31 by molod, Mon Dec 15 23:00:44 2003 UTC revision 1.32 by heimbach, Mon Mar 1 19:13:58 2004 UTC
# Line 123  c--   Map the control variables onto the Line 123  c--   Map the control variables onto the
123    
124  #ifdef ALLOW_EXF  #ifdef ALLOW_EXF
125        CALL EXF_INIT( mythid )        CALL EXF_INIT( mythid )
126  #else  cph#else
       CALL INI_FORCING( mythid )  
127  #endif  #endif
128          CALL INI_FORCING( mythid )
129    cph#endif
130    
131  #ifdef ALLOW_COST  #ifdef ALLOW_COST
132  c--   Initialise the cost function.  c--   Initialise the cost function.
Legend:
Removed from v.1.31  
changed lines
  Added in v.1.32
  ViewVC Help
Powered by ViewVC 1.1.22