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

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

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

revision 1.10 by jmc, Mon Feb 21 22:26:50 2011 UTC revision 1.11 by jmc, Sun Aug 28 22:26:39 2011 UTC
# Line 107  C--   Call external CheapAML forcing pac Line 107  C--   Call external CheapAML forcing pac
107        ENDIF        ENDIF
108  #endif /*ALLOW_CHEAPAML */  #endif /*ALLOW_CHEAPAML */
109    
110  c     IF ( .NOT.useEXF ) THEN        IF ( .NOT.(useEXF.OR.useCheapAML) ) THEN
 C- note (useEBM): needs modifications to be compatible with this call  
       IF ( .NOT.(useEXF.OR.useEBM.OR.useCheapAML) ) THEN  
111  #ifdef ALLOW_DEBUG  #ifdef ALLOW_DEBUG
112          IF (debugMode) CALL DEBUG_CALL('EXTERNAL_FIELDS_LOAD',myThid)          IF (debugMode) CALL DEBUG_CALL('EXTERNAL_FIELDS_LOAD',myThid)
113  #endif  #endif
Legend:
Removed from v.1.10  
changed lines
  Added in v.1.11
  ViewVC Help
Powered by ViewVC 1.1.22