/[MITgcm]/MITgcm/verification/natl_box/code/external_fields_load.F
ViewVC logotype

Diff of /MITgcm/verification/natl_box/code/external_fields_load.F

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

revision 1.7 by jmc, Thu Oct 30 17:35:31 2003 UTC revision 1.8 by edhill, Sat Nov 1 04:50:03 2003 UTC
# Line 55  C     myIter - Simulation timestep numbe Line 55  C     myIter - Simulation timestep numbe
55        INTEGER myIter        INTEGER myIter
56    
57    
58  #ifndef INCLUDE_EXTERNAL_FORCING_PACKAGE  #ifndef ALLOW_EXF
59    
60  C     !LOCAL VARIABLES:  C     !LOCAL VARIABLES:
61  C     === Local arrays ===  C     === Local arrays ===
# Line 229  cph      ENDIF Line 229  cph      ENDIF
229  C endif for periodicForcing  C endif for periodicForcing
230        ENDIF        ENDIF
231    
232  #endif /* INCLUDE_EXTERNAL_FORCING_PACKAGE undef */  #endif /* ALLOW_EXF */
233    
234        RETURN        RETURN
235        END        END
Legend:
Removed from v.1.7  
changed lines
  Added in v.1.8
  ViewVC Help
Powered by ViewVC 1.1.22