/[MITgcm]/MITgcm/model/src/ini_theta.F
ViewVC logotype

Diff of /MITgcm/model/src/ini_theta.F

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

revision 1.21 by jmc, Fri Apr 15 22:07:29 2005 UTC revision 1.22 by cnh, Mon Nov 7 18:26:02 2005 UTC
# Line 60  C--   Initialise temperature field to th Line 60  C--   Initialise temperature field to th
60          ENDDO          ENDDO
61         ENDDO         ENDDO
62        ENDDO        ENDDO
63          _BARRIER
64    
65        IF ( hydrogThetaFile .NE. ' ' ) THEN        IF ( hydrogThetaFile .NE. ' ' ) THEN
66         _BEGIN_MASTER( myThid )         _BEGIN_MASTER( myThid )
Legend:
Removed from v.1.21  
changed lines
  Added in v.1.22
  ViewVC Help
Powered by ViewVC 1.1.22