Skip to content
Snippets Groups Projects
Commit bead35b8 authored by RIETTE Sébastien's avatar RIETTE Sébastien
Browse files

S. Riette 01/06/2022 bugfix compute_mf_cloud_bigaus

parent b55e8825
No related branches found
No related tags found
No related merge requests found
......@@ -125,7 +125,7 @@ ZFRAC_ICE_UP_M(:,:) = MZF_MF(PFRAC_ICE_UP(:,:), KKA, KKU, KKL)
!computation of omega star up
ZOMEGA_UP_M(:)=0.
DO JK=KKB,KKE,KKL
DO JK=KKB,KKE-KKL,KKL
!Vertical integration over the entire column but only buoyant points are used
!ZOMEGA_UP_M(:)=ZOMEGA_UP_M(:) + &
! ZEMF_M(:,JK) * &
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment