source: trunk/LMDZ.MARS/libf/phymars/meso_callkeys.h @ 146

Last change on this file since 146 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.9 KB
Line 
1!
2! For Fortran 77/Fortran 90 compliance always use line continuation
3! symbols '&' in columns 73 and 6
4!
5! NB: to keep commons aligned, it is better to split them in groups
6!     of given types (logical, integer, real, ...)
7
8      COMMON/callkeys_l/callrad,calldifv,calladj,callcond,callsoil      &
9     &   ,season,diurnal,lwrite,calllott,callstats,calleofdump          &
10     &   ,callnirco2,callnlte,callthermos,callconduct,calleuv           &
11     &   ,callmolvis,callmoldiff,thermochem,thermoswater,callemis       &
12     &   ,callg2d,linear,rayleigh,tracer,active,doubleq,submicron       &
13     &   ,lifting,callddevil,scavenging,sedimentation,activice,water    &
14     &   ,caps,photochem
15     
16      COMMON/callkeys_i/iradia,iaervar,iddist,ilwd,ilwb,ilwn,ncouche    &
17     &   ,dustbin,nqchem_min,ecri_phys
18     
19      COMMON/callkeys_r/topdustref,solarcondate,semi,alphan
20     
21      LOGICAL callrad,calldifv,calladj,callcond,callsoil,               &
22     &   season,diurnal,lwrite,calllott                                 &
23     &   ,callstats,calleofdump                                         &
24     &   ,callnirco2,callnlte,callthermos,callconduct,                  &
25     &    calleuv,callmolvis,callmoldiff,thermochem,thermoswater
26
27
28      logical callemis
29      logical callg2d
30      logical linear
31
32      real topdustref
33      real semi
34      real alphan
35      real solarcondate
36
37      integer ecri_phys
38      integer iddist
39      integer iaervar
40      integer iradia
41      integer ilwd
42      integer ilwb
43      integer ilwn
44      integer ncouche
45
46      logical rayleigh
47      logical tracer
48      integer dustbin
49      logical active,doubleq,submicron,lifting,callddevil,scavenging
50      logical sedimentation,activice,water,caps
51      logical photochem
52      integer nqchem_min
53
54      integer swrtype ! type of short wave (solar wavelength) radiative
55      ! transfer to use 1: Fouquart 2: Toon.
56      parameter (swrtype=2)
57!      parameter (swrtype=2)
Note: See TracBrowser for help on using the repository browser.