Skip to content
Snippets Groups Projects
Commit 14be9633 authored by RODIER Quentin's avatar RODIER Quentin
Browse files

Quentin 18/07/2024: fix merge of mean_field

parent 9364366a
No related branches found
No related tags found
No related merge requests found
......@@ -81,6 +81,7 @@ USE MODD_EOL_ALM, ONLY: XFAERO_RE_SUM, XFAERO_RE_GLB
USE MODI_SHUMAN, ONLY: MXF, MYF, MZF
!
USE MODE_MODELN_HANDLER
USE MODE_THERMO
USE MODI_UPDATE_WELFORD
!
USE MODI_SHUMAN
......@@ -126,9 +127,6 @@ REAL, DIMENSION(:,:), ALLOCATABLE :: ZRH_I_MAXCOL
REAL, DIMENSION(:,:), ALLOCATABLE :: ZRH_P_MAXCOL
INTEGER :: JI,JJ,JK, JLOOP ! Loop indexes
REAL, DIMENSION(SIZE(PUT,1),SIZE(PUT,2),SIZE(PUT,3)) :: ZTEMPT
REAL, DIMENSION(SIZE(PUT,1),SIZE(PUT,2),SIZE(PUT,3)) :: ZUMEAN_OLD
REAL, DIMENSION(SIZE(PUT,1),SIZE(PUT,2),SIZE(PUT,3)) :: ZWMEAN_OLD
REAL, DIMENSION(SIZE(PUT,1),SIZE(PUT,2),SIZE(PUT,3)) :: ZTHMEAN_OLD
REAL, DIMENSION(SIZE(PUT,1),SIZE(PUT,2),SIZE(PUT,3)) :: ZTHV !
REAL, DIMENSION(SIZE(PUT,1),SIZE(PUT,2),SIZE(PUT,3)) :: ZVOX, ZVOY, ZVOZ !
REAL, DIMENSION(SIZE(PUT,1),SIZE(PUT,2),SIZE(PUT,3)) :: ZWM !
......
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