/[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.12 by heimbach, Tue Jul 31 16:09:43 2012 UTC revision 1.13 by jahn, Wed Nov 7 21:37:33 2012 UTC
# Line 108  C--   Call external CheapAML forcing pac Line 108  C--   Call external CheapAML forcing pac
108        ENDIF        ENDIF
109  #endif /*ALLOW_CHEAPAML */  #endif /*ALLOW_CHEAPAML */
110    
111        IF ( .NOT.(useEXF.OR.useCheapAML) ) THEN        IF ( .NOT.useCheapAML ) THEN
112  #ifdef ALLOW_DEBUG  #ifdef ALLOW_DEBUG
113          IF (debugMode) CALL DEBUG_CALL('EXTERNAL_FIELDS_LOAD',myThid)          IF (debugMode) CALL DEBUG_CALL('EXTERNAL_FIELDS_LOAD',myThid)
114  #endif  #endif
Legend:
Removed from v.1.12  
changed lines
  Added in v.1.13
  ViewVC Help
Powered by ViewVC 1.1.22