source: trunk/ioipsl/util/w_i_h @ 61

Last change on this file since 61 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]
  • Property svn:executable set to *
File size: 2.4 KB
Line 
1#!/bin/bash
2# $Id: w_i_h 933 2010-03-02 12:05:06Z mafoipsl $
3#-----------------------------------------------#
4#--- What is host ?  -  w_i_h  -  21/07/2009 ---#
5#-----------------------------------------------#
6w_z=$(uname -s -n -r -m 2>/dev/null);
7[[ ${?} != 0 ]] && { exit 1; }
8read u_s u_n u_r u_m <<< ${w_z}
9unset w_z;
10#-
11d_n=$(dirname ${0});
12#-
13case ${u_s} in
14 ( AIX ) \
15  { case ${u_n} in
16    ( zahir* )                 DSYS="aix";;
17    ( vargas* )                DSYS="aix6";;
18    ( * )                      DSYS="ax_mono";
19    esac
20  };;
21 ( AIXESA )                    DSYS="aixesa";;
22 ( ConvexOS )                  DSYS="convex";;
23 ( CP486 | dev )               DSYS="sco";;
24 ( Darwin )                    DSYS="Darwin";;
25 ( HP-UX ) \
26  { case ${u_n} in
27    ( moon )                   DSYS="eshpux";;
28    ( * )                      DSYS="hpux";;
29    esac
30  };;
31 ( IRIX ) \
32  { case ${u_r} in
33    ( 4\.* )                   DSYS="sgi4";;
34    ( * )                      DSYS="sgi5";;
35    esac
36  };;
37 ( IRIX64 )                    DSYS="sgi6";;
38 ( Linux ) \
39  { case ${u_n} in
40    ( asterix* | obelix* )     DSYS="lxiv8";;
41    ( argent[0-9]* )           DSYS="argent";;
42    ( cesium[0-9]* )           DSYS="cesium";;
43    ( platine[0-9]* )          DSYS="platine";;
44    ( titane[0-9]* )           DSYS="titane";;
45    ( mercure* ) \
46     {                         DSYS="sx8mercure"
47      u_l=$(/usr/bin/modulecmd bash list -t 2>&1)
48      for h in ${u_l}
49       do
50        [[ ${h} = 'SX9' ]] && { DSYS="sx9mercure"; break; }
51       done
52      unset u_l h
53     };;
54    ( brodie )                 DSYS="sx8brodie";;
55    ( ulam )                   DSYS="ulam";;
56    ( ds[0-9]* )               DSYS="sxdkrz";;
57    ( babel* )                 DSYS="babel";;
58    ( * )                      DSYS="linux";;
59    esac
60  };;
61 ( MIPS )                      DSYS="mips";;
62 ( OSF1 )                      DSYS="osf1";;
63 ( SunOS ) \
64  { case ${u_r} in
65    ( 5\.* )                   DSYS="solaris";;
66    ( * )                      DSYS="sun";;
67    esac
68  };;
69 ( SUPER-UX )                  DSYS="nec";;
70 ( ULTRIX )                    DSYS="ultrix";;
71 ( UNICOS | sn4803 | sn4602 )  DSYS="cray";;
72 ( UNIX_System_V )             DSYS="fjvpp";;
73 (*) \
74  { case ${u_m} in
75    ( "CRAY T3E" )             DSYS="t3e";;
76    ( * )                      DSYS="Unknown";;
77    esac
78  };;
79esac
80#-
81echo "$DSYS";
82unset u_s u_n u_r u_m;
83#-
84exit 0;
Note: See TracBrowser for help on using the repository browser.