diff --git a/src/MNH/mean_field.f90 b/src/MNH/mean_field.f90 index 8012f453ff44b0fab46ea40e3ed0dde63d25c183..346311d2aeaf5028417ac93e64eaf42f1a676486 100644 --- a/src/MNH/mean_field.f90 +++ b/src/MNH/mean_field.f90 @@ -165,14 +165,8 @@ ZRH_W_MAXCOL(:,:) = MAXVAL(ZRH_W(:,:,:),DIM=3) ZRH_I_MAXCOL(:,:) = MAXVAL(ZRH_I(:,:,:),DIM=3) ZRH_P_MAXCOL(:,:) = MAXVAL(ZRH_P(:,:,:),DIM=3) ! - XUM_MEAN = PUT + XUM_MEAN - XVM_MEAN = PVT + XVM_MEAN - XWM_MEAN = PWT + XWM_MEAN - XTHM_MEAN = PTHT + XTHM_MEAN - XTEMPM_MEAN = ZTEMPT + XTEMPM_MEAN IF (LPASPOL) XSVT_MEAN = PSVT + XSVT_MEAN IF (CTURB/='NONE') XTKEM_MEAN = PTKET + XTKEM_MEAN - XPABSM_MEAN = PPABST + XPABSM_MEAN XQ_MEAN = XQ_MEAN + ZQACT XRH_W_MEAN = XRH_W_MEAN + ZRH_W XRH_I_MEAN = XRH_I_MEAN + ZRH_I @@ -180,8 +174,6 @@ ZRH_P_MAXCOL(:,:) = MAXVAL(ZRH_P(:,:,:),DIM=3) XRH_W_MAXCOL_MEAN = XRH_W_MAXCOL_MEAN + ZRH_W_MAXCOL XRH_I_MAXCOL_MEAN = XRH_I_MAXCOL_MEAN + ZRH_I_MAXCOL XRH_P_MAXCOL_MEAN = XRH_P_MAXCOL_MEAN + ZRH_P_MAXCOL -! - XUW_MEAN = PUT*PWT + XUW_MEAN IF (LPASPOL) XSVT_MEAN = PSVT + XSVT_MEAN IF (CTURB/='NONE') XTKEM_MEAN = PTKET + XTKEM_MEAN