source: trunk/LMDZ.MARS/libf/phymars/planete_h.F90 @ 2228

Last change on this file since 2228 was 2228, checked in by jnaar, 5 years ago

[GCM MARS 1D] Adding a new flag 'paleomars' (default false) in 1d GCM in order to use
eccentricity and solar longitude of perihelion as input parameters.
Added variables : halfaxe, excentric, Lsperi. New routine call_dayperi.F from FF to
compute perhelion date from prescribed eccentricity & Lsperi.

File size: 550 bytes
Line 
1      MODULE planete_h
2      IMPLICIT NONE
3
4      REAL aphelie  ! Aphelion, in Mkm
5      REAL periheli ! Perihelion, in Mkm
6      REAL year_day ! number of days in the year
7      REAL peri_day ! date of perihelion, in days
8      REAL obliquit ! obliquity of the planet, in degrees
9      REAL lmixmin
10      REAL emin_turb
11      REAL coefvis
12      REAL coefir
13      REAL timeperi ! angle of the perihelion, in rad
14      REAL e_elips ! orbit eccentricity
15      REAL p_elips
16      REAL unitastr ! Astronomical unit AU, in Mkm
17
18      END MODULE planete_h
Note: See TracBrowser for help on using the repository browser.