Changeset 346 for LMDZ.3.3/branches

Timestamp:

Mar 14, 2002, 5:47:55 PM (23 years ago)

Author:

lmdz

Message:

Pb ferret avec les longitudes negatives. PB
LF

File:

• LMDZ.3.3/branches/rel-1-0-patch/libf/dyn3d/grilles_gcm_netcdf.F (modified) (1 diff)

LMDZ.3.3/branches/rel-1-0-patch/libf/dyn3d/grilles_gcm_netcdf.F

@@ -69 +69 @@
 
       do i=1,iip1
-         rlonudeg(i)=rlonu(i)*180./pi
-         rlonvdeg(i)=rlonv(i)*180./pi
+         rlonudeg(i)=rlonu(i)*180./pi + 360.
+         rlonvdeg(i)=rlonv(i)*180./pi + 360.
       enddo