Changeset 15090 for NEMO/trunk/src/TOP/PISCES/P4Z/p4zligand.F90
- Timestamp:
- 2021-07-06T16:25:18+02:00 (3 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/trunk/src/TOP/PISCES/P4Z/p4zligand.F90
r13295 r15090 52 52 IF( ln_timing ) CALL timing_start('p4z_ligand') 53 53 ! 54 DO_3D( 1, 1, 1, 1, 1, jpkm1)54 DO_3D( nn_hls, nn_hls, nn_hls, nn_hls, 1, jpkm1) 55 55 ! 56 56 ! ------------------------------------------------------------------
Note: See TracChangeset
for help on using the changeset viewer.