--- trunk/dyn3d/laplacien_rot.f 2014/03/05 14:57:53 82 +++ trunk/dyn3d/laplacien_rot.f 2014/09/09 12:54:30 106 @@ -24,7 +24,7 @@ ! .......... variables en arguments ............. INTEGER, INTENT (IN) :: klevel - REAL rotin(ip1jm, klevel), rotout(ip1jm, klevel) + REAL rotin(iim + 1, jjm, klevel), rotout(ip1jm, klevel) ! .......... variables locales ................