Changeset 1618


Ignore:
Timestamp:
Oct 12, 2016, 12:52:11 PM (8 years ago)
Author:
emillour
Message:

Mars GCM:
Small fix wrt previous commit: zdqssed_co2 should only be used when computing CO2 clouds.
EM

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/LMDZ.MARS/libf/phymars/physiq_mod.F

    r1617 r1618  
    12821282     &                tau,tauscaling)
    12831283   !Flux at the surface of co2 ice computed in co2cloud microtimestep
    1284            DO ig=1,ngrid
    1285               zdqssed(ig,igcm_co2_ice)=zdqssed_co2(ig)
    1286            enddo
     1284           IF (co2clouds) THEN
     1285              zdqssed(1:ngrid,igcm_co2_ice)=zdqssed_co2(1:ngrid)
     1286           ENDIF
    12871287
    12881288           DO iq=1, nq
Note: See TracChangeset for help on using the changeset viewer.