/[MITgcm]/MITgcm/pkg/ctrl/ctrl_get_gen.F
ViewVC logotype

Diff of /MITgcm/pkg/ctrl/ctrl_get_gen.F

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

revision 1.7 by heimbach, Thu Nov 11 06:28:33 2004 UTC revision 1.8 by heimbach, Wed Jan 12 20:33:13 2005 UTC
# Line 137  c--   Get the counters, flags, and the i Line 137  c--   Get the counters, flags, and the i
137    
138  c--   Add control to model variable.  c--   Add control to model variable.
139  cph(  cph(
140  cph this flag ported from the SIO code (dont know why its here)  cph this flag ported from the SIO code
141    cph Initial wind stress adjustments are too vigorous.
142        if ( gencount0 .LE. 2 .AND.        if ( gencount0 .LE. 2 .AND.
143       &     ( xx_gen_file .EQ. xx_tauu_file .OR.       &     ( xx_gen_file .EQ. xx_tauu_file .OR.
144       &       xx_gen_file .EQ. xx_tauv_file ) ) then       &       xx_gen_file .EQ. xx_tauv_file ) ) then
Legend:
Removed from v.1.7  
changed lines
  Added in v.1.8
  ViewVC Help
Powered by ViewVC 1.1.22