diff --git a/src/MNH/ini_modeln.f90 b/src/MNH/ini_modeln.f90 index 738a9dcfef8915351571695934de4313c1d5441e..42bf02412f6a92f60c382adc2bc7ef8d33a503d4 100644 --- a/src/MNH/ini_modeln.f90 +++ b/src/MNH/ini_modeln.f90 @@ -791,9 +791,9 @@ IF (LMEAN_FIELD) THEN ELSE ALLOCATE(XTKEM_MEAN(0,0,0)) ALLOCATE(XTKEM_MAX(0,0,0)) - ALLOCATE(XTKEMAX_MAX(0,0,0)) - ALLOCATE(XTKE10MAX_MAX(0,0,0)) - ALLOCATE(XTKE20MAX_MAX(0,0,0)) + ALLOCATE(XTKEMAX_MAX(0,0)) + ALLOCATE(XTKE10MAX_MAX(0,0)) + ALLOCATE(XTKE20MAX_MAX(0,0)) END IF ALLOCATE(XPABSM_MEAN(IIU,IJU,IKU)) ; XPABSM_MEAN = 0.0 ALLOCATE(XQ_MEAN(IIU,IJU,IKU)) ; XQ_MEAN = 0.0