/[MITgcm]/MITgcm/pkg/generic_advdiff/gad_init_varia.F
ViewVC logotype

Diff of /MITgcm/pkg/generic_advdiff/gad_init_varia.F

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

revision 1.2 by jmc, Fri May 9 21:43:16 2008 UTC revision 1.3 by jmc, Tue Aug 25 21:33:28 2009 UTC
# Line 59  C- end bi,bj loops Line 59  C- end bi,bj loops
59        ENDDO        ENDDO
60    
61        IF ( tempSOM_Advection .OR. saltSOM_Advection ) THEN        IF ( tempSOM_Advection .OR. saltSOM_Advection ) THEN
62         IF ( startTime.EQ.baseTime .AND. nIter0.EQ.0 ) THEN         IF ( startTime.EQ.baseTime .AND. nIter0.EQ.0
63         &                      .AND. pickupSuff.EQ.' ' ) THEN
64  C-     Need to synchronize here before doing master-thread IO  C-     Need to synchronize here before doing master-thread IO
65  c        _BARRIER  c        _BARRIER
66  C-     Read-in initial conditions:  C-     Read-in initial conditions:
Legend:
Removed from v.1.2  
changed lines
  Added in v.1.3
  ViewVC Help
Powered by ViewVC 1.1.22