diff --git a/src/PHYEX/micro/condensation.f90 b/src/PHYEX/micro/condensation.f90
index 8b46541123e578150e769d33e4a467814ecd8bd4..31fda664b8e3671dc4eff6ccdd3b7135b40b2f7e 100644
--- a/src/PHYEX/micro/condensation.f90
+++ b/src/PHYEX/micro/condensation.f90
@@ -239,10 +239,12 @@ ZDZREF = ICEP%XFRMIN(25) ! Thickness for unchanged vqsigsat (only used for LHGT_
 PRC_OUT = PRC_IN
 PRV_OUT = PRV_IN
 PRI_OUT = PRI_IN
-PHLC_HRC = 0.
-PHLC_HCF = 0.
-PHLI_HRI = 0.
-PHLI_HCF = 0.
+IF(PRESENT(PHLC_HRC)) THEN
+ PHLC_HRC = 0.
+ PHLC_HCF = 0.
+ PHLI_HRI = 0.
+ PHLI_HCF = 0.
+END IF
 #endif
 IF(OCND2)ZPRIFACT = 0.
 !
diff --git a/src/PHYEX/micro/lima_adjust_split.f90 b/src/PHYEX/micro/lima_adjust_split.f90
index 2b07f24bd486b334074c1c651e7b6475bd2e4bff..9482c616c1ab714ffb485cf24867d399e5f362b2 100644
--- a/src/PHYEX/micro/lima_adjust_split.f90
+++ b/src/PHYEX/micro/lima_adjust_split.f90
@@ -287,8 +287,8 @@ REAL, DIMENSION(SIZE(PRHODJ,1),SIZE(PRHODJ,2),SIZE(PRHODJ,3)) &
                             ZRI, ZRI_IN,  &
                             Z_SIGS, Z_SRCS, &
                             ZW_MF, &
-                            ZCND, ZS, ZVEC1
-REAL, DIMENSION(SIZE(PRHODJ,1),SIZE(PRHODJ,2)) :: ZSIGQSAT2D, ZDUM
+                            ZCND, ZS, ZVEC1,ZDUM
+REAL, DIMENSION(SIZE(PRHODJ,1),SIZE(PRHODJ,2)) :: ZSIGQSAT2D
 !
 INTEGER, DIMENSION(SIZE(PRHODJ,1),SIZE(PRHODJ,2),SIZE(PRHODJ,3)) :: IVEC1
 !