From e988af329ba7e8496098743ee25d7b3b4e9a8edc Mon Sep 17 00:00:00 2001 From: Jimy Dudhia Date: Tue, 8 Oct 2024 11:39:50 -0600 Subject: [PATCH] fix for possible uninitialized value of zol --- sf_sfclayrev.F90 | 2 ++ 1 file changed, 2 insertions(+) diff --git a/sf_sfclayrev.F90 b/sf_sfclayrev.F90 index d05ff3e..2d075c6 100644 --- a/sf_sfclayrev.F90 +++ b/sf_sfclayrev.F90 @@ -378,6 +378,8 @@ subroutine sf_sfclayrev_run(ux,vx,t1d,qv1d,p1d,dz8w1d, & do 320 i = its,ite ! + zol(i) = 0. +! if(br(i).gt.0) then if(br(i).gt.250.0) then zol(i)=zolri(250.0,za(i),znt(i))