Philippe 30/01/2019: bug: remove double allocates for non 'n' variables

src/MNH/ini_modeln.f90

@@ -892,7 +892,7 @@ ALLOCATE(XDZZ(IIU,IJU,IKU))
 IF (KMI == 1) THEN
   ALLOCATE(XRHODREFZ(IKU),XTHVREFZ(IKU))
 ELSE
-  ALLOCATE(XRHODREFZ(0),XTHVREFZ(0))
+  !Do not allocate XRHODREFZ and XTHVREFZ because they are the same on all grids (not 'n' variables)
 END IF
 ALLOCATE(XRHODREF(IIU,IJU,IKU))
 ALLOCATE(XTHVREF(IIU,IJU,IKU))
@@ -1511,22 +1511,7 @@ IF (KMI == 1) THEN
     ALLOCATE(XVFRC_PAST(0,0,0))
   END IF
 ELSE
-  ALLOCATE(TDTFRC(0))
-  ALLOCATE(XUFRC(0,0))
-  ALLOCATE(XVFRC(0,0))
-  ALLOCATE(XWFRC(0,0))
-  ALLOCATE(XTHFRC(0,0))
-  ALLOCATE(XRVFRC(0,0))
-  ALLOCATE(XTENDTHFRC(0,0))
-  ALLOCATE(XTENDRVFRC(0,0))
-  ALLOCATE(XGXTHFRC(0,0))
-  ALLOCATE(XGYTHFRC(0,0))
-  ALLOCATE(XPGROUNDFRC(0))
-  ALLOCATE(XTENDUFRC(0,0))
-  ALLOCATE(XTENDVFRC(0,0))
-  ALLOCATE(XWTFRC(0,0,0))
-  ALLOCATE(XUFRC_PAST(0,0,0))
-  ALLOCATE(XVFRC_PAST(0,0,0))
+  !Do not allocate because they are the same on all grids (not 'n' variables)
 END IF
 ! ----------------------------------------------------------------------
 !