- Timestamp:
- 2015-10-31T08:40:45+01:00 (8 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2015/dev_r5836_NOC3_vvl_by_default/NEMOGCM/NEMO/OPA_SRC/BDY/bdyini.F90
r5836 r5845 1319 1319 nbj => idx_bdy(ib_bdy)%nbj(ib,igrd) 1320 1320 flagu => idx_bdy(ib_bdy)%flagu(ib,igrd) 1321 bdysurftot = bdysurftot + hu 1321 bdysurftot = bdysurftot + hu_n (nbi , nbj) & 1322 1322 & * e2u (nbi , nbj) * ABS( flagu ) & 1323 1323 & * tmask_i(nbi , nbj) & … … 1332 1332 nbj => idx_bdy(ib_bdy)%nbj(ib,igrd) 1333 1333 flagv => idx_bdy(ib_bdy)%flagv(ib,igrd) 1334 bdysurftot = bdysurftot + hv 1334 bdysurftot = bdysurftot + hv_n (nbi, nbj ) & 1335 1335 & * e1v (nbi, nbj ) * ABS( flagv ) & 1336 1336 & * tmask_i(nbi, nbj ) &
Note: See TracChangeset
for help on using the changeset viewer.