Changeset 14588 for NEMO/releases/r4.0/r4.0-HEAD/src/TOP/PISCES

Timestamp:

2021-03-05T08:42:07+01:00 (3 years ago)

Author:

clem

Message:

solve ticket #2562

File:

• NEMO/releases/r4.0/r4.0-HEAD/src/TOP/PISCES/P4Z/p4zsed.F90 (modified) (1 diff)

NEMO/releases/r4.0/r4.0-HEAD/src/TOP/PISCES/P4Z/p4zsed.F90

@@ -492 +492 @@
       IF( p4z_sed_alloc /= 0 )   CALL ctl_stop( 'STOP', 'p4z_sed_alloc: failed to allocate arrays' )
       !
+      nitrpot(:,:,jpk) = 0._wp ! initialization 
+      !
    END FUNCTION p4z_sed_alloc