Module jupiter. More...
Public Member Functions | |
subroutine | atm_planete (jour, pos, proxy, dens, tempe, vitu, vitv, vitw) |
caracteristiques des especes resolues dans le module fluide More... | |
Public Attributes | |
real, parameter | n_o_ref =1.e10 |
parametres de normalisation | |
real, parameter | t_o_ref =1000. |
integer, parameter | nb_alt =512 |
discretisation verticale | |
integer, parameter | nligne =nb_alt+2 |
integer, save | igeom =0 |
logical, save | flg_binduced =.false. |
logical, save | flg_ew =.false. |
character(len=3), save | type_geom ='sph' |
character *20, save | nom_planete ='JUPITER' |
nom de la planete | |
character *20, save | nom_frame_planete ='IAU_JUPITER' |
noms des differents referentiels utilises | |
character *20, save | nom_frame_soleil ='JSO' |
type(spice), dimension(6) | fic_orbito =(/spice('de430.bsp'), spice('de-403-masses.tpc'), spice('jup300.bsp'), spice('pck00010.tpc'), spice('naif0011.tls'), spice('jupiter.tf')/) |
liste des fichiers d'orbitographie a lire dans l'ordre | |
type(coef_b), dimension(1), save | coef = (/coef_B(2457388.500000, 71398.000000, 344.205522, 80.207922, 42620.926245, (/-9247.468632, -1553.068552,6135.578198/))/) |
caractéristiques du champ magnétique (1ere ligne : VIP4, 2eme : VIT4, 3eme : VIPAL) More... | |
real *8, parameter | omega0 =deupi/35730.d0 |
caracteristiques de la planete | |
real *8, parameter | altmin =100. |
real *8, parameter | altmax =1500. |
real *8, parameter | lmin =50.d0 |
real *8, parameter | lmax =72.d0 |
real *8, parameter | latequi =40.d0 |
real *8, parameter | l_ocbl =8. |
real *8, parameter | l_top =10. |
character(len=80), dimension(5) | spc_atmo_ref =(/'H_2','H','He','CH_4','C_2H_2'/) |
caracteristiques du modele d'atmosphere jovien | |
real, dimension(5) | massn =(/2.,1.,4.,16.,26./) |
real *8, save | ni_ref = N_o_ref/N_o_ref |
extra parameters | |
real *8, save | nn_ref = N_o_ref/N_o_ref |
character(len=80), dimension(3) | spc_transn =(/'H','H_2','He'/) |
caracteristiques des especes resolues dans le module cinetique | |
character(len=80), dimension(3) | spc_transx =(/'H^+','H_2^+','He^+'/) |
Module jupiter.
subroutine planete_jupiter::atm_planete | ( | type(calendar) | jour, |
type(coordonnees), dimension(:) | pos, | ||
type(activite) | proxy, | ||
real*8, dimension(:,:) | dens, | ||
real*8, dimension(:), optional | tempe, | ||
real*8, dimension(:,:), optional | vitu, | ||
real*8, dimension(:,:), optional | vitv, | ||
real*8, dimension(:,:), optional | vitw | ||
) |
caracteristiques des especes resolues dans le module fluide
type(coef_b), dimension(1), save planete_jupiter::coef = (/coef_B(2457388.500000, 71398.000000, 344.205522, 80.207922, 42620.926245, (/-9247.468632, -1553.068552,6135.578198/))/) |
caractéristiques du champ magnétique (1ere ligne : VIP4, 2eme : VIT4, 3eme : VIPAL)