Changeset 14215 for NEMO/trunk/src/OCE/TRA/tranpc.F90
- Timestamp:
- 2020-12-18T14:49:22+01:00 (4 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/trunk/src/OCE/TRA/tranpc.F90
r14189 r14215 112 112 IF( ntej == Nje0 ) THEN ; iej = nn_hls ; ELSE ; iej = 0 ; ENDIF 113 113 ! 114 DO_2D( is j, iej, isi, iei) ! interior column only114 DO_2D( isi, iei, isj, iej ) ! interior column only 115 115 ! 116 116 IF( tmask(ji,jj,2) == 1 ) THEN ! At least 2 ocean points
Note: See TracChangeset
for help on using the changeset viewer.