Changeset 255 for trunk/NEMO/OPA_SRC/DOM/dommsk.F90
- Timestamp:
- 2005-09-02T17:06:49+02:00 (19 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/NEMO/OPA_SRC/DOM/dommsk.F90
r247 r255 174 174 175 175 176 #if defined key_zdfkpp 177 ! land point on Bab el Mandeb zonal section 178 ij0 = 87 ; ij1 = 88 179 ii0 = 160 ; ii1 = 161 180 tmask( mi0(ii0):mi1(ii1) , mj0(ij0):mj1(ij1) , 1:jpk ) = 0.e0 181 #endif 176 182 ! Interior domain mask (used for global sum) 177 183 ! --------------------
Note: See TracChangeset
for help on using the changeset viewer.