Ignore:
Timestamp:
Apr 30, 2015, 10:24:13 AM (10 years ago)
Author:
milmd
Message:

Correction of newstart and vertical interpolation of q2 in LMDZ.GENERIC and LMDZ.MARS. In LMDZ.GENERIC add flag for cloud fraction reading.

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/LMDZ.GENERIC/libf/dynlonlat_phylonlat/phystd/lect_start_archive.F

    r1403 r1421  
    13321332      write (*,*) 'lect_start_archive: q2old ', q2old (1,2,1)  ! INFO
    13331333      call interp_vert (q2old,varp1,lmold+1,llm+1,
    1334      &     apsold,bpsold,aps,bps,psold,(imold+1)*(jmold+1))
     1334     &     apsold,bpsold,ap,bp,psold,(imold+1)*(jmold+1))
    13351335      write (*,*) 'lect_start_archive: varp1 ', varp1 (1,2,1)  ! INFO
    13361336      call interp_horiz(varp1,q2s,imold,jmold,iim,jjm,llm+1,
Note: See TracChangeset for help on using the changeset viewer.