Changeset 2157


Ignore:
Timestamp:
Sep 10, 2019, 3:27:59 PM (5 years ago)
Author:
emillour
Message:

Mars GCM:

  • Use Wilke's formulation for molecular diffusion

JYC

Location:
trunk/LMDZ.MARS
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • trunk/LMDZ.MARS/README

    r2152 r2157  
    27282728- Changed dlog/dexp in log/exp
    27292729- Added a double() instance to improvedCO2clouds so that the model works in simple precision [e.g. mesoscale]
     2730
     2731== 10/09/2019 == JYC
     2732- Use Wilke's formulation for molecular diffusion

  • trunk/LMDZ.MARS/libf/aeronomars/moldiff_red.F90

    r1660 r2157  
    11731173        endif
    11741174        enddo
    1175         D(l)=1d0/interm
     1175!       D(l)=1d0/interm
     1176        D(l)=(1D0-Nk(l,nn)/N(l))/interm
    11761177        enddo
    11771178        END
Note: See TracChangeset for help on using the changeset viewer.