/[MITgcm]/MITgcm/pkg/diagnostics/diagstats_set_regions.F
ViewVC logotype

Diff of /MITgcm/pkg/diagnostics/diagstats_set_regions.F

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

revision 1.3 by jmc, Mon Jul 31 16:26:32 2006 UTC revision 1.4 by jmc, Tue Oct 17 18:56:31 2006 UTC
# Line 113  C       _END_MASTER( myThid ) Line 113  C       _END_MASTER( myThid )
113  C-     end of k loop  C-     end of k loop
114         ENDDO         ENDDO
115        ENDIF        ENDIF
       nSetRegMask = nSetRegMskFile  
116    
117  C--   Other way to define regions (e.g., latitude bands):  C--   Other way to define regions (e.g., latitude bands):
118  C      set corresponding set-index of the region-mask array,  C      set corresponding set-index of the region-mask array,
119  C      starting from nSetRegMskFile+1 up to nSetRegMask  C      starting from nSetRegMskFile+1 up to nSetRegMask
120  C note: for now, empty !  C note: for now, empty !
121          _BEGIN_MASTER( myThid )
122          nSetRegMask = nSetRegMskFile
123          _END_MASTER( myThid )
124    
125  C--   Region Identificator arrays  C--   Region Identificator arrays
126  C       for now, directly filled when reading data.diagnostics  C       for now, directly filled when reading data.diagnostics
Legend:
Removed from v.1.3  
changed lines
  Added in v.1.4
  ViewVC Help
Powered by ViewVC 1.1.22