From 9231bd53ed737a8b523b7126620918f80cc3dafc Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Beno=C3=AEt=20Vi=C3=A9?= <benoit.vie@meteo.fr> Date: Fri, 9 Dec 2022 13:32:06 +0100 Subject: [PATCH] bugfix init INPR* variables to 0 in lima.f90 --- src/PHYEX/micro/lima.f90 | 7 +++++++ 1 file changed, 7 insertions(+) diff --git a/src/PHYEX/micro/lima.f90 b/src/PHYEX/micro/lima.f90 index 868b01ea7..0ed11fe48 100644 --- a/src/PHYEX/micro/lima.f90 +++ b/src/PHYEX/micro/lima.f90 @@ -681,6 +681,13 @@ ZT(:,:,:) = ZTHT(:,:,:) * ZEXN(:,:,:) ! ------------- ! ! +PINPRC=0. +PINDEP=0. +PINPRR=0. +PINPRI=0. +PINPRS=0. +PINPRG=0. +PINPRH=0. if ( lbu_enable ) then if ( lbudget_th ) call Budget_store_init( tbudgets(NBUDGET_TH), 'SEDI', zths(:, :, :) * prhodj(:, :, :) ) if ( lbudget_rc .and. lwarm .and. lsedc ) call Budget_store_init( tbudgets(NBUDGET_RC), 'SEDI', zrcs(:, :, :) * prhodj(:, :, :) ) -- GitLab