Ignore:
Timestamp:
06/27/06 17:47:06 (18 years ago)
Author:
pinsard
Message:

add $ in Calendar, Grid, Interpolation, Obsolete and Postscript *.pro files, add svn:keywords Id to all these files, some improvements in header

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/SRC/Obsolete/nlecsaison.pro

    r114 r118  
    44;+ 
    55; @file_comments lit les moyennes annuelles 
    6 ; sur maia: /u/rech/eee/reee217/TOTEM/REF/OUTPUTS  
     6; sur maia: /u/rech/eee/reee217/TOTEM/REF/OUTPUTS 
    77; @obsolete 
    88; 
     
    2121; 
    2222; @keyword GRILLE impose la grille a laquelle est rapporte le champ. rq permet 
    23 ; d'aller plus vite ds la lecture  
     23; d'aller plus vite ds la lecture 
    2424; 
    2525; @keyword /TOUT oblige a lire le tableau entier en non pas celui reduit a domdef 
    2626; 
     27; @keyword _EXTRA used to pass your keywords 
     28 
    2729; @returns tableau 2d (qd la serie ne fait que 1 pas de temps) ou 
    2830; 3d (valable ds 1 premier tps que pour les tableaux 2d) 
    29 ;  
     31; 
    3032; @uses common.pro 
    3133; 
     
    3335; 
    3436; @history Sebastien Masson (smasson\@lodyc.jussieu.fr) 
     37; 
     38; 
     39; @version $Id$ 
    3540; 
    3641;- 
     
    7277               vargrid=strmid(quelsfichiers[i],strpos(quelsfichiers[i],'grid')+5,1) ;nom de grille 
    7378               goto, grilletrouvee 
    74             ENDIF  
     79            ENDIF 
    7580         endfor 
    7681         ncdf_close,cdfid 
     
    118123      premiery = 0 
    119124      premierz = 0 
    120    endif else BEGIN  
     125   endif else BEGIN 
    121126;------------------------------------------------------------ 
    122127; redefinition eventuelle du domaine ajuste a boite (a 6 elements) 
    123128; + on recupere la dim du no9uveau domaine 
    124129;------------------------------------------------------------ 
    125       if keyword_set(boite) then BEGIN  
     130      if keyword_set(boite) then BEGIN 
    126131         CASE N_Elements(Boite) Of 
    127132            1:Domdef, lon1, lon2, lat1, lat2, 0.,boite[0],GRILLE=vargrid, _EXTRA = ex 
     
    134139      ENDIF 
    135140      grille, mask, glam, gphi, gdep, nx, ny,nz,premierx,premiery,premierz 
    136    ENDELSE  
     141   ENDELSE 
    137142;------------------------------------------------------------ 
    138143   if varcontient.ndims eq 3 then $ 
Note: See TracChangeset for help on using the changeset viewer.