diff --git a/src/MNH/modeln.f90 b/src/MNH/modeln.f90
index 6c65d3c53203be22585d1c97fa8e7a6a7bb83a50..84dc46588a2d3a7c2ca7cdc54d54bc5b9952477d 100644
--- a/src/MNH/modeln.f90
+++ b/src/MNH/modeln.f90
@@ -362,7 +362,10 @@ USE MODD_TIME_n
 USE MODD_TIMEZ
 USE MODD_TURB_CLOUD,     ONLY: NMODEL_CLOUD,CTURBLEN_CLOUD,XCEI
 USE MODD_TURB_n
-USE MODD_VISCOSITY
+#ifdef MNH_COMPILER_CCE
+USE MODD_TURB_n,         ONLY:  VSIGQSAT_MODD => VSIGQSAT
+#endif
+ USE MODD_VISCOSITY
 !
 use mode_budget,           only: Budget_store_init, Budget_store_end
 USE MODE_DATETIME
@@ -559,8 +562,14 @@ REAL, DIMENSION(:,:,:,:), ALLOCATABLE :: ZWETDEPAER
 !
 TYPE(TFILEDATA),POINTER :: TZBAKFILE, TZOUTFILE
 ! TYPE(TFILEDATA),SAVE    :: TZDIACFILE
-!-------------------------------------------------------------------------------
 !
+#ifdef MNH_COMPILER_CCE
+!Bypass cray bug with scalar pointer
+REAL :: VSIGQSAT
+VSIGQSAT = VSIGQSAT_MODD
+#endif
+!-------------------------------------------------------------------------------
+
 TZBAKFILE=> NULL()
 TZOUTFILE=> NULL()