Ignore:
Timestamp:
Dec 21, 2010, 5:11:55 PM (14 years ago)
Author:
idelkadi
Message:

Correction de bug

File:
1 edited

Legend:

Unmodified
Added
Removed
  • LMDZ4/branches/LMDZ4_AR5/libf/phylmd/aeropt_5wv.F90

    r1417 r1471  
    756756    ENDIF
    757757
    758     used_tau(spsol)=.TRUE.
     758!Bug 21 12 10 AI
     759!    used_tau(spsol)=.TRUE.
     760    IF (soluble) then
     761      used_tau(spsol)=.TRUE.
     762       ELSE
     763      used_tau(naero_soluble+spinsol)=.TRUE.
     764    ENDIF
     765
    759766    DO la=1,las
    760767
Note: See TracChangeset for help on using the changeset viewer.