diff --git a/src/LIB/SURCOUCHE/src/fmwrit_ll.f90 b/src/LIB/SURCOUCHE/src/fmwrit_ll.f90
index 1376f06080cbe071d47db0fe1f6bcae632ef4bbf..9b93ac0f4914243239887117fad0fa12f455dec7 100644
--- a/src/LIB/SURCOUCHE/src/fmwrit_ll.f90
+++ b/src/LIB/SURCOUCHE/src/fmwrit_ll.f90
@@ -223,7 +223,7 @@ CONTAINS
     CHARACTER(LEN=2) :: YDIMOK,YDIMKO
     CHARACTER(LEN=8) :: YTYPEOK,YTYPEKO
     !
-    IF (TPFIELD%NGRID<0 .OR. TPFIELD%NGRID>4) THEN
+    IF (TPFIELD%NGRID<0 .OR. TPFIELD%NGRID>8) THEN
       CALL PRINT_MSG(NVERB_WARNING,'IO',HCALLER,'TPFIELD%NGRID is invalid for '//TRIM(TPFIELD%CMNHNAME))
     END IF
     IF (TPFIELD%NTYPE/=KTYPE) THEN