Changeset 346


Ignore:
Timestamp:
Mar 14, 2002, 5:47:55 PM (23 years ago)
Author:
lmdz
Message:

Pb ferret avec les longitudes negatives. PB
LF

Location:
LMDZ.3.3
Files:
2 edited

Legend:

Unmodified
Added
Removed

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

    r253 r346  
    6969
    7070      do i=1,iip1
    71          rlonudeg(i)=rlonu(i)*180./pi
    72          rlonvdeg(i)=rlonv(i)*180./pi
     71         rlonudeg(i)=rlonu(i)*180./pi + 360.
     72         rlonvdeg(i)=rlonv(i)*180./pi + 360.
    7373      enddo
    7474

  • LMDZ.3.3/trunk/libf/dyn3d/grilles_gcm_netcdf.F

    r218 r346  
    6969
    7070      do i=1,iip1
    71          rlonudeg(i)=rlonu(i)*180./pi
    72          rlonvdeg(i)=rlonv(i)*180./pi
     71         rlonudeg(i)=rlonu(i)*180./pi + 360.
     72         rlonvdeg(i)=rlonv(i)*180./pi + 360.
    7373      enddo
    7474
Note: See TracChangeset for help on using the changeset viewer.