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

S. Riette 30/05/2022 add missing init

parent 97d562d9
No related branches found
No related tags found
No related merge requests found
Hide whitespace changes
Inline Side-by-side
src/common/micro/rain_ice.F90
+ 1
− 0
View file @ b55e8825
...@@ -1107,6 +1107,7 @@ PCIT(:,:,:)=ZCITOUT(:,:,:) ...@@ -1107,6 +1107,7 @@ PCIT(:,:,:)=ZCITOUT(:,:,:)
!* 6. COMPUTES THE SLOW COLD PROCESS SOURCES OUTSIDE OF ODMICRO POINTS !* 6. COMPUTES THE SLOW COLD PROCESS SOURCES OUTSIDE OF ODMICRO POINTS
! ---------------------------------------------------------------- ! ----------------------------------------------------------------
! !
LLW3D(:,:,:)=.FALSE.
DO JK=D%NKTB,D%NKTE DO JK=D%NKTB,D%NKTE
DO JJ=D%NJB,D%NJE DO JJ=D%NJB,D%NJE
DO JI=D%NIB,D%NIE DO JI=D%NIB,D%NIE
......
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment

Documentation | Mentions légales | CGU | Accessibilité : non conforme