- Timestamp:
- 2021-12-03T20:32:50+01:00 (3 years ago)
- Location:
- NEMO/branches/2021/dev_r14318_RK3_stage1
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/branches/2021/dev_r14318_RK3_stage1
- Property svn:externals
-
old new 9 9 10 10 # SETTE 11 ^/utils/CI/sette@14244 sette 11 ^/utils/CI/sette@HEAD sette 12
-
- Property svn:externals
-
NEMO/branches/2021/dev_r14318_RK3_stage1/src/TOP/TRP/trcatf.F90
r15373 r15574 239 239 ENDIF 240 240 ! 241 DO jn = 1, jptra 242 DO_3D( 1, 1, 1, 1, 1, jpkm1 )241 DO jn = 1, jptra 242 DO_3D( nn_hls, nn_hls, nn_hls, nn_hls, 1, jpkm1 ) 243 243 ze3t_b = 1._wp + r3t(ji,jj,Kbb) * tmask(ji,jj,jk) 244 244 ze3t_n = 1._wp + r3t(ji,jj,Kmm) * tmask(ji,jj,jk) … … 313 313 ! 314 314 DO jn = 1, jptra 315 DO_3D( 1, 1, 1, 1, 1, jpkm1 )315 DO_3D( nn_hls, nn_hls, nn_hls, nn_hls, 1, jpkm1 ) 316 316 ze3t_b = e3t(ji,jj,jk,Kbb) 317 317 ze3t_n = e3t(ji,jj,jk,Kmm)
Note: See TracChangeset
for help on using the changeset viewer.