diff --git a/src/SURFEX/get_vegn.F90 b/src/SURFEX/get_vegn.F90 index 28d2044a9316bab6a4c9cb4c94af3971610a9af7..4959d594a056354276e2019476e3d03ed4eff85e 100644 --- a/src/SURFEX/get_vegn.F90 +++ b/src/SURFEX/get_vegn.F90 @@ -129,10 +129,10 @@ DO JJ=1,U%NSIZE_NATURE ! END IF ! + ZLAI(JJ) = U%XNATURE(U%NR_NATURE(JJ)) * ZLAI(JJ) + ! END DO ! -ZLAI(:) = U%XNATURE(:) * ZLAI(:) -! !* 2. Envoi les variables vers mesonH ! ------------------------------