source: trunk/LMDZ.VENUS/libf/phyvenus/hedin.h @ 1723

Last change on this file since 1723 was 1310, checked in by slebonnois, 10 years ago

SL: VENUS VERTICAL EXTENSION. NLTE and thermospheric processes, to be run with 78 levels and specific inputs.

File size: 470 bytes
Line 
1
2      integer musize,zsize
3      parameter (zsize=23)        ! pour z de 100 a 210 km
4      parameter (musize=10)       ! pour sza de 1 a -1
5      common /hedin/ o_hedin,co2_hedin,n2_hedin,co_hedin,pres_hedin,    &
6     &                  mu_hedin,n_hedin
7               
8
9      real  :: co2_hedin(musize,zsize),co_hedin(musize,zsize)
10      real  :: n2_hedin(musize,zsize),o_hedin(musize,zsize)
11      real  :: n_hedin(musize,zsize)
12      real  :: pres_hedin(musize,zsize), mu_hedin(musize)
13   
Note: See TracBrowser for help on using the repository browser.