bugfix init_aerosol_properties from PTulet. To be discarded when updated version received

src/PHYEX/micro/init_aerosol_properties.f90

@@ -410,8 +410,8 @@ IF (LORILAM) THEN
   XMDIAM_IFN(3)   = 2 * XINIRADIUSI * 1E-6
   XMDIAM_IFN(4)   = 2 * XINIRADIUSI * 1E-6
   END IF
-  LOGSIGCCN(3) = LOG(XINISIGJ)
-  LOGSIGCCN(4) = LOG(XINISIGJ)
+  XSIGMA_IFN(3) = LOG(XINISIGJ)
+  XSIGMA_IFN(4) = LOG(XINISIGJ)
   XRHO_IFN(3)    = XRHOI(JP_AER_BC) 
   XRHO_IFN(4)    = XRHOI(JP_AER_OC)
 END IF
@@ -424,8 +424,8 @@ IF (LDUST) THEN
   ELSE
     XMDIAM_IFN(JMOD) = 2 * XINIRADIUS(JPDUSTORDER(JMOD)) * 1E-6 
   END IF
-  LOGSIGCCN(JMOD) = LOG(XINISIG(JPDUSTORDER(JMOD)))
-  RHOCCN(JMOD) = XDENSITY_DUST
+  XSIGMA_IFN(JMOD) = LOG(XINISIG(JPDUSTORDER(JMOD)))
+  XRHO_IFN(JMOD) = XDENSITY_DUST
   ENDDO
 END IF
 !