Changeset 340 for LMDZ.3.3/branches


Ignore:
Timestamp:
Feb 26, 2002, 4:25:57 PM (22 years ago)
Author:
lmdzadmin
Message:

Coordonnees rectilineaires dans ioipsl
LF

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ.3.3/branches/rel-LF/libf/phylmd/physiq.F

    r304 r340  
    779779         ENDDO
    780780         CALL gr_fi_ecrit(1,klon,iim,jjmp1,rlat,zx_lat)
    781          CALL histbeg("histday", iim,zx_lon, jjmp1,zx_lat,
     781         CALL histbeg("histday", iim,zx_lon(:,1), jjmp1,zx_lat(1,:),
    782782     .                 1,iim,1,jjmp1, 0, zjulian, dtime,
    783783     .                 nhori, nid_day)
    … …  
    10141014         ENDDO
    10151015         CALL gr_fi_ecrit(1,klon,iim,jjmp1,rlat,zx_lat)
    1016          CALL histbeg("histmth", iim,zx_lon, jjmp1,zx_lat,
     1016         CALL histbeg("histmth.nc", iim,zx_lon(:,1), jjmp1,zx_lat(1,:),
    10171017     .                 1,iim,1,jjmp1, 0, zjulian, dtime,
    10181018     .                 nhori, nid_mth)
Note: See TracChangeset for help on using the changeset viewer.