Ignore:
Timestamp:
Oct 17, 2002, 3:27:29 PM (22 years ago)
Author:
lmdzadmin
Message:

Soucis de portabilite sur VPP et petit bug
LF

File:
1 edited

Legend:

Unmodified
Added
Removed

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

    r411 r422  
    12851285     .        pbase,bbase,dtvpdt1,dtvpdq1,dplcldt,dplcldr)
    12861286
    1287            do i = 1, klon
    1288             wd(i)=0.0
    1289              do k = 1, klev
    1290                qcondc(i)=0.0
    1291              enddo
    1292            enddo
     1287            qcondc=0.0
    12931288
    12941289          else
Note: See TracChangeset for help on using the changeset viewer.