From 129e8f0c3359d8a6947ca0b77f2e4d031c23c314 Mon Sep 17 00:00:00 2001 From: Quentin Rodier <quentin.rodier@meteo.fr> Date: Mon, 7 Mar 2022 16:55:42 +0100 Subject: [PATCH] Quentin 07/03/2022: bugfix minor for use of SMOOTH_TURB with CSTURB --- src/common/turb/mode_prandtl.F90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/common/turb/mode_prandtl.F90 b/src/common/turb/mode_prandtl.F90 index 56cc0daae..a2aff1b36 100644 --- a/src/common/turb/mode_prandtl.F90 +++ b/src/common/turb/mode_prandtl.F90 @@ -754,7 +754,7 @@ END IF #ifdef REPRO48 #else !* smoothing -CALL SMOOTH_TURB_FUNCT(CSTURB%PPHI3,PPHI3,D_PHI3DTDZ_O_DDTDZ) +CALL SMOOTH_TURB_FUNCT(CSTURB,PPHI3,PPHI3,D_PHI3DTDZ_O_DDTDZ) #endif ! D_PHI3DTDZ_O_DDTDZ(:,:,IKB-1)=D_PHI3DTDZ_O_DDTDZ(:,:,IKB) -- GitLab