/[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.3 by molod, Fri May 13 18:22:53 2005 UTC revision 1.4 by molod, Fri May 13 18:32:46 2005 UTC
# Line 57  C---+----1----+----2----+----3----+----4 Line 57  C---+----1----+----2----+----3----+----4
57  #ifdef ALLOW_FIZHI  #ifdef ALLOW_FIZHI
58        if( useFIZHI) then        if( useFIZHI) then
59         yymmdd = int(freq(n))         yymmdd = int(freq(n))
60         realfreq = nsecf2(0,yymmdd,nymd) / deltaTclock         hhmmss = int((freq(n) - int(freq(n)))*1.e6)
61           realfreq = nsecf2(hhmmss,yymmdd,nymd) / deltaTclock
62        endif        endif
63  #endif  #endif
64    
Legend:
Removed from v.1.3  
changed lines
  Added in v.1.4
  ViewVC Help
Powered by ViewVC 1.1.22