Changeset 1698 for trunk/ICOSA_LMDZ


Ignore:
Timestamp:
Apr 19, 2017, 4:16:55 PM (8 years ago)
Author:
emillour
Message:

Dynamico-LMDZ interface:
Fix pseudoalt computation in interface_icosa_lmdz.f90
EM

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/ICOSA_LMDZ/src/phystd/interface_icosa_lmdz.f90

    r1696 r1698  
    283283    aps(1:llm)=0.5*(ap(1:llm)+ap(2:llm+1))
    284284    bps(1:llm)=0.5*(bp(1:llm)+bp(2:llm+1))
    285     pseudoalt(:)=0
     285    pseudoalt(:)=-scaleheight*log(presnivs(:)/preff)
    286286    CALL init_vertical_layers(llm,preff,scaleheight,ap,bp,aps,bps,presnivs,pseudoalt)
    287287
Note: See TracChangeset for help on using the changeset viewer.