diff --git a/src/MNH/prep_ideal_case.f90 b/src/MNH/prep_ideal_case.f90
index ad3c61606eacf15fd2b9964a411ae2b93e64957a..638c601e8d16cffd25d92ec09e5f5cc27363c96c 100644
--- a/src/MNH/prep_ideal_case.f90
+++ b/src/MNH/prep_ideal_case.f90
@@ -689,6 +689,12 @@ IF( LEN_TRIM(CPGD_FILE) /= 0 ) THEN
   ! read the grid in the PGD file
   CALL FMREAD(CPGD_FILE,'IMAX',CLUOUT,'--',NIMAX,IGRID,ILENCH,YCOMMENT,IRESP)
   CALL FMREAD(CPGD_FILE,'JMAX',CLUOUT,'--',NJMAX,IGRID,ILENCH,YCOMMENT,IRESP)
+  IF ( CPGD_FILE /= CINIFILEPGD) THEN
+    WRITE(NLUOUT,FMT=*) ' WARNING : in PRE_IDEA1.nam, in NAM_LUNITn you have CINIFILEPGD= ',CINIFILEPGD
+    WRITE(NLUOUT,FMT=*) ' whereas in NAM_REAL_PGD you have CPGD_FILE = ',CPGD_FILE
+    WRITE(NLUOUT,FMT=*) ' '
+    WRITE(NLUOUT,FMT=*) ' CINIFILEPGD HAS BEEN SET TO  ',CPGD_FILE        
+    CINIFILEPGD=CPGD_FILE
 END IF
 !
 NIMAX_ll=NIMAX   !! _ll variables are global variables