/[MITgcm]/MITgcm/pkg/aim/aim_calc_diags.F
ViewVC logotype

Diff of /MITgcm/pkg/aim/aim_calc_diags.F

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

revision 1.3 by jmc, Tue Mar 6 17:58:25 2001 UTC revision 1.4 by adcroft, Tue May 29 14:01:37 2001 UTC
# Line 66  C     == Local variables == Line 66  C     == Local variables ==
66         ENDDO         ENDDO
67        ENDDO        ENDDO
68    
69    C-    Keep record of how much time has been integrated over
70          DO K=1,Nr
71            AIM_TimeAve(k,bi,bj)=AIM_TimeAve(k,bi,bj)+DDTT
72          ENDDO                                                                                    
73    
74    
75  #endif /* ALLOW_TIMEAVE */  #endif /* ALLOW_TIMEAVE */
76    
Legend:
Removed from v.1.3  
changed lines
  Added in v.1.4
  ViewVC Help
Powered by ViewVC 1.1.22