diff --git a/src/MNH/ice4_fast_rs.f90 b/src/MNH/ice4_fast_rs.f90 index fd52d08bfd9b9fb7e54fbd714d6b23a84149df61..f8600375db4c80969c2e76fc9ed0c184a47e4c12 100644 --- a/src/MNH/ice4_fast_rs.f90 +++ b/src/MNH/ice4_fast_rs.f90 @@ -87,7 +87,7 @@ USE MODD_PARAM_ICE, ONLY: LEVLIMIT, CSNOWRIMING USE MODD_RAIN_ICE_DESCR, ONLY: XBS,XCEXVT,XCXS,XRTMIN USE MODD_RAIN_ICE_PARAM, ONLY: NACCLBDAR,NACCLBDAS,NGAMINC,X0DEPS,X1DEPS,XACCINTP1R,XACCINTP1S,XACCINTP2R,XACCINTP2S, & XCRIMSG,XCRIMSS,XEX0DEPS,XEX1DEPS,XEXCRIMSG,XEXCRIMSS,XEXSRIMCG,XEXSRIMCG2,XFRACCSS, & - XFSACCRG,XFSCVMG,XGAMINC_RIM1,XGAMINC_RIM1,XGAMINC_RIM2,XGAMINC_RIM4,XKER_RACCS, & + XFSACCRG,XFSCVMG,XGAMINC_RIM1,XGAMINC_RIM2,XGAMINC_RIM4,XKER_RACCS, & XKER_RACCSS,XKER_SACCRG,XLBRACCS1,XLBRACCS2,XLBRACCS3,XLBSACCR1,XLBSACCR2,XLBSACCR3, & XRIMINTP1,XRIMINTP2,XSRIMCG,XSRIMCG2,XSRIMCG3 ! diff --git a/src/MNH/rain_ice.f90 b/src/MNH/rain_ice.f90 index e18ba1a39877144ad7e583b402c05f1516f15e27..fd499ed5442056a0a67a630865be91ce1bbe96fe 100644 --- a/src/MNH/rain_ice.f90 +++ b/src/MNH/rain_ice.f90 @@ -475,16 +475,17 @@ LOGICAL :: GPRESENT_PFPR,GPRESENT_PSEA !$acc & XCRIAUTC) #endif -!$acc declare create(I1, I2, I3, GMICRO, & -!$acc & ZRVT, ZRCT, ZRRT, ZRIT, ZRST, ZRGT, ZRHT, & -!$acc & ZCIT, ZRVS, ZRCS, ZRRS, ZRIS, ZRSS, ZRGS, ZRHS, ZTHS, ZTHT, ZTHLT, & -!$acc & ZRHODREF, ZRHODJ, ZZT, ZPRES, ZEXNREF, ZZW, ZLSFACT, ZLVFACT, ZUSW, ZSSI, & -!$acc & ZLBDAR, ZLBDAR_RF, ZLBDAS, ZLBDAG, ZLBDAH, ZRDRYG, ZRWETG, & -!$acc & ZAI, ZCJ, ZKA, ZDV, ZSIGMA_RC, ZCF, ZRF, & -!$acc & ZHLC_HCF, ZHLC_LCF, ZHLC_HRC, ZHLC_LRC, ZHLC_RCMAX, ZRCRAUTC, & -!$acc & ZHLC_HRCLOCAL, ZHLC_LRCLOCAL, ZZW1, ZW, ZT, & -!$acc & GPRESENT_PFPR,GPRESENT_PSEA ) +!$acc declare create( I1, I2, I3, GMICRO, & +!$acc & ZRVT, ZRCT, ZRRT, ZRIT, ZRST, ZRGT, ZRHT, & +!$acc & ZCIT, ZRVS, ZRCS, ZRRS, ZRIS, ZRSS, ZRGS, ZRHS, ZTHS, ZTHT, ZTHLT, & +!$acc & ZRHODREF, ZRHODJ, ZZT, ZPRES, ZEXNREF, ZZW, ZLSFACT, ZLVFACT, ZUSW, ZSSI, & +!$acc & ZLBDAR, ZLBDAR_RF, ZLBDAS, ZLBDAG, ZLBDAH, ZRDRYG, ZRWETG, & +!$acc & ZAI, ZCJ, ZKA, ZDV, ZSIGMA_RC, ZCF, ZRF, & +!$acc & ZHLC_HCF, ZHLC_LCF, ZHLC_HRC, ZHLC_LRC, ZHLC_RCMAX, ZRCRAUTC, & +!$acc & ZHLC_HRCLOCAL, ZHLC_LRCLOCAL, ZZW1, ZW, ZT, & +!$acc & GPRESENT_PFPR,GPRESENT_PSEA ) #endif + ! ! IN variables !