Changeset 284

Timestamp:

Oct 19, 2001, 12:36:59 PM (23 years ago)

Author:

lmdzadmin

Message:

Pb de dimensionnement rlon, rlat
LF

File:

• LMDZ.3.3/branches/rel-LF/libf/bibio/writephys.F90 (modified) (1 diff)

LMDZ.3.3/branches/rel-LF/libf/bibio/writephys.F90

@@ -113 +113 @@
 !
   call gr_fi_ecrit(1,klon,iim,jjm,rlon,temp_lon)
-  do i = 1, iim
+  do i = 1, iim 
     temp_lon(i,1) = rlon(i+1)
     temp_lon(i,jjm) = rlon(i+1)