Changeset 3298
- Timestamp:
- 2012-02-07T18:12:09+01:00 (12 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/NEMOGCM/NEMO/OPA_SRC/BDY/bdyini.F90
r3294 r3298 415 415 icount = icount + 1 416 416 nbidta(icount, igrd, ib_bdy) = ii 417 nbjdta(icount, igrd, ib_bdy) = jpjsob(iseg) + ir +1417 nbjdta(icount, igrd, ib_bdy) = jpjsob(iseg) + ir - 1 418 418 nbrdta(icount, igrd, ib_bdy) = ir 419 419 ENDDO … … 457 457 icount = icount + 1 458 458 nbidta(icount, igrd, ib_bdy) = ii 459 nbjdta(icount, igrd, ib_bdy) = jpjsob(iseg) + ir +1459 nbjdta(icount, igrd, ib_bdy) = jpjsob(iseg) + ir - 1 460 460 nbrdta(icount, igrd, ib_bdy) = ir 461 461 ENDDO … … 499 499 icount = icount + 1 500 500 nbidta(icount, igrd, ib_bdy) = ii 501 nbjdta(icount, igrd, ib_bdy) = jpjsob(iseg) + ir +1501 nbjdta(icount, igrd, ib_bdy) = jpjsob(iseg) + ir - 1 502 502 nbrdta(icount, igrd, ib_bdy) = ir 503 503 ENDDO
Note: See TracChangeset
for help on using the changeset viewer.