source: trunk/libf/dyn3dpar/comconst.h @ 86

Last change on this file since 86 was 52, checked in by aslmd, 14 years ago

chantier principal du commit
 --- version LMDZ5 qui fonctionne pour tests geantes
--- prochaine etape, tests sur GNOME

M libf/dyn3dpar/comconst.h
M libf/dyn3dpar/conf_planete.F90
ajout du flux de chaleur intrinseque: ihf
[par defaut il est nul]

M libf/dyn3dpar/gcm.F
changements cosmetiques
[pour diff plus efficace avec version non par]

M libf/dyn3dpar/iniacademic.F
possibilites de variations latitudinales
de temperature plus originales
[seulement pour planet_type.eq."giant"]

M libf/dyn3dpar/leapfrog_p.F

  1. ajout d'une tendance causee par le flux de chaleur intrinseque

(seulement prise en compte si planet_type.eq."giant")

  1. correction bugs problematiques a la compilation et au run

--> probleme dans les boucles (l'indice etait llm et non l)
--> ajout de SAVE pour les variables paralleles
--> correction des declarations de variables manquantes

M libf/dyn3dpar/calfis_p.F
correction d'une deuxieme parenthese manquante sur ALLOCATE(zteta(klon,llm))

M libf/phylmd/regr_lat_time_climoz_m.F90
erreur a la compilation avec FCM... il s'agit d'une routine terrestre
il y a visiblement un probleme avec o3_in
en attendant, les lignes sont commentees avec !AS

A deftanks/giant 8 fichiers
ajout de fichiers de configuration typiques pour les geantes gazeuses
[experimental pour le moment... on est loin de jupiter]

--> comparaisons entre un run ancien [avec LMDZ5-dev sur SVN ipsl sans cp var]
et run avec version sur ce SVN planeto donne des resultats similaires

pratique

A ioipsl
A ioipsl/compile_ioipsl.bash
A ioipsl/util 16 fichiers
script et utilitaire pour compiler IOIPSL de facon independante
il suffit d'executer ./compile_ioipsl.bash

M arch/arch-AMD64_CICLAD.path
si IOIPSL a ete compile avec la methode precedente, les bons
PATH sont definis dans ce fichier [le NETCDF est aussi OK]

M 000-README-svn
mise a jour options "svn status"

M mars/libf/phymars/meso_callkeys.h
mise a jour mineure du fichier
[ecri_phys etait defini mais pas dans la liste]
File size: 1.7 KB
Line 
1!
2! $Id: comconst.h 1437 2010-09-30 08:29:10Z emillour $
3!
4!-----------------------------------------------------------------------
5! INCLUDE comconst.h
6
7      COMMON/comconsti/im,jm,lllm,imp1,jmp1,lllmm1,lllmp1,lcl,          &
8     &                 iflag_top_bound
9      COMMON/comconstr/dtvr,daysec,                                     &
10     & pi,dtphys,dtdiss,rad,r,cpp,kappa,cotot,unsim,g,omeg              &
11     &                   ,dissip_factz,dissip_deltaz,dissip_zref        &
12     &                   ,tau_top_bound,                                &
13     & daylen,year_day,molmass, ihf
14      COMMON/cpdetvenus/nu_venus,t0_venus
15
16      INTEGER im,jm,lllm,imp1,jmp1,lllmm1,lllmp1,lcl
17      REAL dtvr ! dynamical time step (in s)
18      REAL daysec !length (in s) of a standard day
19      REAL pi    ! something like 3.14159....
20      REAL dtphys ! (s) time step for the physics
21      REAL dtdiss ! (s) time step for the dissipation
22      REAL rad ! (m) radius of the planet
23      REAL r ! Gas constant R=8.31 J.K-1.mol-1
24      REAL cpp   ! Cp
25      REAL kappa ! kappa=R/Cp
26      REAL cotot
27      REAL unsim ! = 1./iim
28      REAL g ! (m/s2) gravity
29      REAL omeg ! (rad/s) rotation rate of the planet
30      REAL dissip_factz,dissip_deltaz,dissip_zref
31      INTEGER iflag_top_bound
32      REAL tau_top_bound
33      REAL daylen ! length of solar day, in 'standard' day length
34      REAL year_day ! Number of standard days in a year
35      REAL molmass ! (g/mol) molar mass of the atmosphere
36
37      REAL nu_venus,t0_venus ! coeffs needed for Cp(T), Venus atmosphere
38      REAL ihf  ! (W/m2) intrinsic heat flux for giant planets
39
40
41!-----------------------------------------------------------------------
Note: See TracBrowser for help on using the repository browser.