Changeset 3601 for trunk/LMDZ.PLUTO/libf


Ignore:
Timestamp:
Jan 27, 2025, 5:11:52 PM (4 days ago)
Author:
debatzbr
Message:

Fixe bug in the microphysical haze production

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/LMDZ.PLUTO/libf/phypluto/physiq_mod.F90

    r3590 r3601  
    15081508                              pplay,pplev,pq,pdq,dist_star,mu0,zfluxuv,pdqmufi_prod, &
    15091509                              zdqphot_prec,zdqphot_ch4,zdqconv_prec,declin)
     1510               pdq(:,:,:) = pdq(:,:,:) + pdqmufi_prod(:,:,:) ! Should be updated
    15101511            ENDIF ! end call_haze_prod_pCH4
    15111512
Note: See TracChangeset for help on using the changeset viewer.