Changeset 13735
- Timestamp:
- 2020-11-06T12:16:15+01:00 (4 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/branches/2020/dev_r13327_KERNEL-06_2_techene_e3/src/OFF/dtadyn.F90
r13427 r13735 411 411 ENDIF 412 412 END_2D 413 !!st pourquoi on n'utilise pas le gde3w ici plutôt que de faire une boucle ? 413 ! 414 414 DO_2D( 1, 1, 1, 1 ) 415 415 h_rnf(ji,jj) = 0._wp … … 687 687 !!---------------------------------------------------------------------- 688 688 ! 689 !!st code dupliqué même remarque que plus haut pourquoi ne pas utiliser gdepw ?690 689 DO_2D( 1, 1, 1, 1 ) 691 690 h_rnf(ji,jj) = 0._wp
Note: See TracChangeset
for help on using the changeset viewer.