Changeset 33


Ignore:
Timestamp:
05/02/06 16:30:27 (18 years ago)
Author:
pinsard
Message:

upgrade of INIT according to cerbere.lodyc.jussieu.fr: /usr/home/smasson/SAXO_RD/ : files

Location:
trunk
Files:
4 added
1 deleted
2 copied

Legend:

Unmodified
Added
Removed

  • trunk/Obsolete/common.pro

    r31 r33  
    1 ;+ 
    2 ; 
    3 ; MODIFICATION HISTORY: Sebastien Masson (smasson@lodyc.jussieu.fr) 
    4 ;                       14/8/98 
    5 ;- 
    6 ;environement 
    7 common acces_lodc,loginlodyc,machlodyc, loginipsl, machipsl 
    8 ; 
    9 ;taille de la matrice 
    10 ; 
    11 common coord,jpi,jpj,jpk,jpt, jpiglo, jpjglo, jpkglo, jpidta, jpjdta, jpkdta 
    12 common zoom_grille,ixminmesh,ixmaxmesh,iyminmesh,iymaxmesh,izminmesh,izmaxmesh 
    13 common parameters, ccmeshparameters, ccreadparameters 
    14 ; 
    15 ;tableau definit dans meshmask 
    16 ; 
    17 common glam,glamf,glamt,glamu,glamv 
    18 common gphi,gphif,gphit,gphiu,gphiv 
    19 common e12,e1t,e2t,e1u,e2u,e1v,e2v,e1f,e2f 
    20 common mask,tmask,umaskred,vmaskred, fmaskredx, fmaskredy 
    21 common tab,ff,gdept,gdepw,e3t,e3w  
    22 ; 
    23 ; pour la lecture des champs 
    24 ; 
    25 common zoom_data,ixmindta,ixmaxdta,iymindta,iymaxdta,izmindta,izmaxdta 
    26 ; 
    27 ; 
    28 ; variables liees aux hovmoller 
    29 ; 
    30 common axe_temps,jptmax,time 
    31 ; 
    32 ; 
    33 ; variables liees a la def du tableau a traiter 
    34 ; 
    35 common date,year,month,day,niveau,prefix 
    36 common attributs,varname,vargrid,vardate,varexp,varunit,valmask 
    37 ; 
    38 ; fenetre 
    39 ; 
    40 COMMON sauvegarde, sauveps 
    41 ; 
    42 ; graph 
    43 ; 
    44 COMMON certaines_couleurs, c_lab, c_cont, c_cote 
    45 COMMON taille_feuille, grandfeuille, petitfeuille, margescadre, ccwindowsize 
    46 common pour_palit, coefpalit 
    47 common vecteur_couleur,rouge,vert,bleu ,couleur 
    48 common pour_placecolor,colorbardiv,colorbarinf,colorbarsup 
    49 ; 
    50 ; grille et situation geographique 
    51 ; 
    52 common carte,lat1,lat2,lon1,lon2,prof1,prof2 
    53 common liees_a_domdef, $ 
    54        nxt,nyt,nzt,nxu,nyu,nxv,nyv,nxf,nyf,nzw, $ 
    55        premierxt,premierxu,premierxv,premierxf, $ 
    56        premieryt,premieryu,premieryv,premieryf,premierzt,premierzw,  $ 
    57        dernierxt,dernierxu,dernierxv,dernierxf, $ 
    58        dernieryt,dernieryu,dernieryv,dernieryf,dernierzt,dernierzw 
    59 ; 
    60 COMMON liees_a_triangule, triangles, cointerremont, cointerredesc 
    61 ; 
    62 COMMON pour_de_belles_cotes, listcoast 
    63 ; 
    64 ; 
    65 COMMON keys, key_mpp, key_portrait, key_irregular, key_shift, key_performance, key_periodique $ 
    66 , key_offset, key_stride, key_gridtype, key_reverse 
    67 ; 
    68 COMMON directories, tmpdir, workdir, homedir, iodir, animdir, psdir, imagedir 
    69 ; 
    70 COMMON commentaires, bavard, langage 
    71  
    72  
    73  
    74  
    75  
     1@all_cm 

  • trunk/ToBeReviewed/INIT/initorca05.pro

    r31 r33  
    11; 
    2 ; 
    3 @common 
     2@cm_4mesh 
     3@cm_4cal 
     4@cm_4data 
    45;------------------------------------------------------------ 
     6; grid boundaries 
    57;---------------------------------------------------------- 
    6 ;---------------------------------------------------------- 
    7 ; bornes de la grille 
    8 ;---------------------------------------------------------- 
    9 ixminmesh  =2 
    10 ixmaxmesh  =-1 
     8ixminmesh  =1 
     9ixmaxmesh  =720 
    1110; 
    1211iyminmesh  =0 
    13 iymaxmesh  =509 
     12iymaxmesh  =510 
    1413; 
    15 izminmesh  =-1 
    16 izmaxmesh  =-1 
     14izminmesh  =0 
     15izmaxmesh  =29 
    1716; 
    1817jpt=1 
    1918time = 0 
    2019;------------------------------------------------------ 
    21 ; lecture de la grille 
     20; read the grid 
    2221;------------------------------------------------------ 
    23 iodir = '/usr1/antiope/smasson/DATA/ORCA/' 
    24 iodir = '/usr/ipsl_temp/smlod/' 
    25 key_shift = 107 
     22iodir = '/raid7/smasson/ERA04/' 
    2623key_stride = [1, 1, 1] 
    27 ncdf_meshlec, 'meshmask.orca.05d.nc', glamboundary = [20, 380], /checkdat 
     24ncdf_meshread, 'ERA04_meshmask.nc', glamboundary = [20, 380] 
    2825;------------------------------------------------------------- 
    2926domdef 
    3027; 
    31 key_periodique = 1 
    32 triangles = triangule() 
     28triangles_list = triangule(/keep_cont) 
    3329;---------------------------------------------------------- 
    34 ; bornes pour la lecture des donnees 
     30; data boundaries 
    3531;---------------------------------------------------------- 
    3632jpidta = jpiglo 
    3733jpjdta = jpjglo 
    38 jpkdta = jpjglo 
     34jpkdta = jpkglo 
    3935ixmindta = 0 
    4036ixmaxdta = jpidta-1 
    … …  
    4339izmindta = 0 
    4440izmaxdta = jpkdta-1 
    45  
     41;---------------------------------------------------------- 
     42@updateold 
Note: See TracChangeset for help on using the changeset viewer.