Ignore:
Timestamp:
Feb 7, 2025, 8:58:30 PM (4 days ago)
Author:
evignon
Message:

correction deimin et deimax param rayon optique Audran

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/trunk/libf/phylmd/lmdz_cloud_optics_prop.f90

    r5496 r5525  
    315315            dei = rei_coef * (iwc**0.2445) * ( temp(i,k) - rei_min_temp )
    316316            ! we clip the results
    317             deimax = 20.
    318             deimin = 155.
     317            deimin = 20.
     318            deimax = 155.
    319319            dei = MIN(MAX(dei, deimin), deimax)
    320320            ! formula to convert effective diameter in effective radius
Note: See TracChangeset for help on using the changeset viewer.