- Timestamp:
- 2012-07-05T11:35:12+02:00 (12 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/NEMOGCM/NEMO/OPA_SRC/BDY/bdyini.F90
r3298 r3424 773 773 DO ib = 1, idx_bdy(ib_bdy)%nblenrim(igrd) 774 774 nbi => idx_bdy(ib_bdy)%nbi(ib,igrd) 775 nbj => idx_bdy(ib_bdy)%nb i(ib,igrd)775 nbj => idx_bdy(ib_bdy)%nbj(ib,igrd) 776 776 flagu => idx_bdy(ib_bdy)%flagu(ib) 777 777 bdysurftot = bdysurftot + hu (nbi , nbj) & … … 786 786 DO ib = 1, idx_bdy(ib_bdy)%nblenrim(igrd) 787 787 nbi => idx_bdy(ib_bdy)%nbi(ib,igrd) 788 nbj => idx_bdy(ib_bdy)%nb i(ib,igrd)788 nbj => idx_bdy(ib_bdy)%nbj(ib,igrd) 789 789 flagv => idx_bdy(ib_bdy)%flagv(ib) 790 790 bdysurftot = bdysurftot + hv (nbi, nbj ) &
Note: See TracChangeset
for help on using the changeset viewer.