/[MITgcm]/MITgcm/pkg/diagnostics/diagnostics_switch_onoff.F
ViewVC logotype

Diff of /MITgcm/pkg/diagnostics/diagnostics_switch_onoff.F

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

revision 1.12 by jmc, Sun Jun 26 16:51:49 2005 UTC revision 1.13 by molod, Sun Oct 16 18:38:55 2005 UTC
# Line 117  C--    Select diagnostics list that uses Line 117  C--    Select diagnostics list that uses
117  #ifdef ALLOW_FIZHI  #ifdef ALLOW_FIZHI
118          if( useFIZHI) then          if( useFIZHI) then
119           write(tagname,'(A,I2.2)')'diagStg',n           write(tagname,'(A,I2.2)')'diagStg',n
120           time4SnapShot = alarm2(tagname)           time4SnapShot = alarm2next(tagname,deltaT)
121          endif          endif
122  #endif  #endif
123    
Legend:
Removed from v.1.12  
changed lines
  Added in v.1.13
  ViewVC Help
Powered by ViewVC 1.1.22