Quentin 26/09/2024: bugfix PRCACCR(:) = PHLC_HRC(JL)... for CPU/GPU (already...

Quentin 26/09/2024: bugfix PRCACCR(:) = PHLC_HRC(JL)... for CPU/GPU (already removed in 5.7). This bf changes results

src/PHYEX/micro/mode_ice4_warm.f90

@@ -151,7 +151,7 @@ ELSEIF (HSUBG_RC_RR_ACCR=='PRFR') THEN
                       &*PHLC_HCF(JL)
 #else
           !HCF*accretion(HRC/HCF) with simplification
-          PRCACCR(:) = ICEP%XFCACCR * PHLC_HRC(JL)     &
+          PRCACCR(JL) = ICEP%XFCACCR * PHLC_HRC(JL)     &
                       &*PLBDAR_RF(JL)**ICEP%XEXCACCR &
                       &*PRHODREF(JL)**(-ICED%XCEXVT)
 #endif