--- trunk/libf/dyn3d/gcm.f90	2011/01/25 15:11:05	39
+++ trunk/libf/dyn3d/gcm.f90	2011/02/22 13:49:36	40
@@ -42,7 +42,7 @@
   ! Variables dynamiques :
   REAL vcov(ip1jm, llm), ucov(ip1jmp1, llm) ! vents covariants
   REAL teta(ip1jmp1, llm) ! température potentielle 
-  REAL q(ip1jmp1, llm, nqmx) ! champs advectés
+  REAL q(iim + 1, jjm + 1, llm, nqmx) ! champs advectés
   REAL ps(iim + 1, jjm + 1) ! pression au sol (Pa)
 
   REAL masse(ip1jmp1, llm) ! masse d'air