Parent Directory
|
Revision Log
|
Revision Graph
|
Patch
revision 1.6 by jmc, Sat May 14 19:52:12 2011 UTC | revision 1.7 by jmc, Tue Jun 7 22:25:10 2011 UTC | |
---|---|---|
# | Line 97 C-- Apply mask: | Line 97 C-- Apply mask: |
97 | ENDDO | ENDDO |
98 | ENDDO | ENDDO |
99 | ENDDO | ENDDO |
100 | IF ( debugLevel .GE. debLevB ) THEN | IF ( debugLevel.GE.debLevC ) THEN |
101 | _BARRIER | _BARRIER |
102 | _BEGIN_MASTER( myThid ) | _BEGIN_MASTER( myThid ) |
103 | CALL PLOT_FIELD_XYRS( RBC_mask(1-Olx,1-Oly,1,1,1,irbc), | CALL PLOT_FIELD_XYRS( RBC_mask(1-Olx,1-Oly,1,1,1,irbc), |
# | Line 167 C-- Apply mask: | Line 167 C-- Apply mask: |
167 | ENDDO | ENDDO |
168 | ENDDO | ENDDO |
169 | ENDDO | ENDDO |
170 | IF ( debugLevel .GE. debLevB ) THEN | IF ( debugLevel.GE.debLevC ) THEN |
171 | _BARRIER | _BARRIER |
172 | _BEGIN_MASTER( myThid ) | _BEGIN_MASTER( myThid ) |
173 | CALL PLOT_FIELD_XYRS( RBC_maskU, | CALL PLOT_FIELD_XYRS( RBC_maskU, |
|
ViewVC Help | |
Powered by ViewVC 1.1.22 |