Skip to content
Snippets Groups Projects
Commit 572feb4a authored by WAUTELET Philippe's avatar WAUTELET Philippe
Browse files

Philippe 07/09/2022: fix: reapply lost fix (see commit 7d17f6da)

parent c280a48e
No related branches found
No related tags found
No related merge requests found
!MNH_LIC Copyright 1994-2014 CNRS, Meteo-France and Universite Paul Sabatier
!MNH_LIC Copyright 1995-2021 CNRS, Meteo-France and Universite Paul Sabatier
!MNH_LIC This is part of the Meso-NH software governed by the CeCILL-C licence
!MNH_LIC version 1. See LICENSE, CeCILL-C_V1-en.txt and CeCILL-C_V1-fr.txt
!MNH_LIC version 1. See LICENSE, CeCILL-C_V1-en.txt and CeCILL-C_V1-fr.txt
!MNH_LIC for details. version 1.
!-----------------------------------------------------------------
!! ########################
MODULE MODI_CH_MONITOR_n
!! ########################
......@@ -892,6 +893,8 @@ IF (LUSECHAQ.AND.(NRRL>=2) ) THEN
ZINPRR(:,:) )
END SELECT
ELSE
ZINPRR(:,:) = 0.
END IF
ELSE IF (LUSECHAQ.AND.(NRRL==1) ) THEN
CALL CH_AQUEOUS_CHECK (PTSTEP, XRHODREF, XRHODJ, XRRS, XRSVS, NRRL, &
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment