Index: /branches/LMDZ_WRFmeas/WRFV3/dyn_em/solve_em.F
===================================================================
--- /branches/LMDZ_WRFmeas/WRFV3/dyn_em/solve_em.F	(revision 25)
+++ /branches/LMDZ_WRFmeas/WRFV3/dyn_em/solve_em.F	(revision 26)
@@ -861,5 +861,5 @@
 
    IF (grid%t_2(im2,iz,jm2) /= grid%t_2(im2,iz,jm2) .OR. ABS(grid%t_2(im2,iz,jm2)) > 10000. ) THEN
-     PRINT errmsg
+     PRINT *,TRIM(errmsg)
      WRITE(wrF_err_message,*)'solve_em: wrong T value=',                 &
        grid%t_2(im2,iz,jm2),' at: ', im2,', ', iz,', ', jm2,' !!!'
@@ -873,5 +873,5 @@
 ! Checking for NaNs (should not be necessary but....)
    IF (grid%psfc(im2,jm2) /= grid%psfc(im2,jm2) .OR. ABS(grid%psfc(im2,jm2)) > 1000000. ) THEN
-     PRINT errmsg
+     PRINT *,errmsg
      WRITE(wrF_err_message,*)'solve_em: wrong PSFC value=',               &
        grid%psfc(im2,jm2),' at: ', im2 ,', ', jm2, ' !!!'
Index: /branches/LMDZ_WRFmeas/WRFV3/lmdz/dimensions.h
===================================================================
--- /branches/LMDZ_WRFmeas/WRFV3/lmdz/dimensions.h	(revision 25)
+++ /branches/LMDZ_WRFmeas/WRFV3/lmdz/dimensions.h	(revision 26)
@@ -2,4 +2,4 @@
        INTEGER iim,jjm,llm,ndm,wiim,wjjm,wbdym
 
-       PARAMETER (iim= 1, jjm=14061, llm=38,ndm=1,wiim=129,wjjm=109,wbdym=5)
+       PARAMETER (iim= 1, jjm=7031, llm=38,ndm=1,wiim=79,wjjm=89,wbdym=5)