/[MITgcm]/MITgcm_contrib/jscott/igsm/src/zclimate2tem.F
ViewVC logotype

Diff of /MITgcm_contrib/jscott/igsm/src/zclimate2tem.F

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

revision 1.1 by jscott, Fri Aug 11 19:35:33 2006 UTC revision 1.2 by jscott, Mon Apr 23 21:20:18 2007 UTC
# Line 3  Line 3 
3  !       to zero out  climate data for TEM  !       to zero out  climate data for TEM
4          subroutine zclimate2tem          subroutine zclimate2tem
5  #include "BD2G04.COM"  #include "BD2G04.COM"
6  #include "TEM.COM"          #include "TEM.h"        
7          do j=1,jm0          do j=1,jm0
8            co24tem(j)=0.0            co24tem(j)=0.0
9            temp4tem(j)=0.0            temp4tem(j)=0.0
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2
  ViewVC Help
Powered by ViewVC 1.1.22