Changeset 142 for trunk/SRC/ToBeReviewed/GRILLE/domdef.pro
- Timestamp:
- 07/21/06 14:47:49 (18 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/SRC/ToBeReviewed/GRILLE/domdef.pro
r134 r142 3 3 ;------------------------------------------------------------ 4 4 ;+ 5 ; NAME: DOMDEF 6 ; 7 ; PURPOSE:permet d'extraire un sous domaine d'etude en fournissant les 8 ; parametres necessaires pour les traces. (cf. outputs) 9 ; 10 ; CATEGORY: 11 ; 12 ; CALLING SEQUENCE:domdef [,lon1, lon2, lat1, lat2[,vert1,vert2]] ou 13 ; bien domdef,vecteur 14 ; 15 ; INPUTS:(facultatif), [vecteur a] 2, 4 ou 6 elements:; 16 ; sans l''utilisation des mots cles index,xindex,yindex,zindex: 17 ; *vert1, vert2: pour un domaine 3D dont la partie horizontale couvre tout 18 ; glam et gphi 19 ; *lon1, lon2, lat1, lat2: 20 ; definissant les longitudes min. max et les latitudes min, max du domaine a 21 ; etudier (tous les niveaux sont selectiones) 22 ; *lon1,lon2,lat1,lat2,vert1,vert2 pour specifier les profondeurs. 23 ; 24 ; KEYWORD PARAMETERS: 25 ; 26 ; ENDPOINTS: a four elements vector [x1,y1,x2,y2] used to specify 27 ; that domdef must define the box used to make a plot (pltz, pltt, 28 ; plt1d) done strictly along the line (that can have any direction) 29 ; starting at (x1, y1) ending at (x2, y2). When defining endpoints, 30 ; you must also define TYPE which define the type of plots 31 ; ('pltz', 'xt', 'yt', 'zt', 'x', 'y', 'z', 't') will used 32 ; ENDPOINTS keywords 33 ; 34 ; FINDALWAYS:oblige a redefinir une boite meme qd auqun point 35 ; n''est trouve ds la boite. dans ce cas on selectionne toute la 36 ; grille. 37 ; 38 ; GRIDTYPE:un string ou un vecteur de string contennant le nom des 39 ; grilles (determinees uniquement par : 'T','U','V','W','F') pour 40 ; lesquelles le calcul doit etre fait. par 41 ; ex :'T' ou ['T','U'] 42 ; 43 ; /MEMEINDICES: il se peut que les points t,u,v et F correspondant a 44 ; une meme boite geographique ne concernent pas les memes 45 ; indices des tableaux. Ceci pose parfois de pb (ou du moins de 46 ; serieuses complications) ds les programmes ou plusieurs types 47 ; de grilles interviennent (cf.: norme, curl...). Activer 48 ; MEMEINDICES pour forcer domdef a prendre les memes indices -ceux 49 ; de la grille T- pour toutes les autres grilles. 50 ; 51 ; /INDEX: activer si on veut specifier que tous les elements 52 ; passes en entree de domdef se rapportent aux indices des 53 ; tableaux glam, gphi et gdep plutot qu'aux valeurs de ces 54 ; tableaux 55 ; 56 ; /xindex: activer si on veut que les elements passes en entrre 57 ; de domdef et concernant la dimension en x se rapportent aux 58 ; indices des tableaux glam qu'aux valeurs de ces tableaux. 59 ; 60 ; /yindex: cf xindex mais pour y et les gphi 61 ; 62 ; /zindex: cf xindex mais pour z et les gdep 5 ; 6 ; @file_comments 7 ; Allows to extract a subdomain of study by providing parameters 8 ; needed for drawings (see outputs) 9 ; 10 ; @categories 11 ; 12 ; @param Z1 {in}{optional} 13 ; For a 3d domain whose the horizontal part cover all glam 14 ; 15 ; @param Z2 {in}{optional} 16 ; For a 3d domain whose the horizontal part cover all gphi 17 ; 18 ; @param X1 {in}{optional} 19 ; Define the minimum longitude. (All levels are selected) 20 ; 21 ; @param X2 {in}{optional} 22 ; Define the maximum longitude. (All levels are selected) 23 ; 24 ; @param Y1 {in}{optional} 25 ; Define the minimum latitude. (All levels are selected) 26 ; 27 ; @param Y2 {in}{optional} 28 ; Define the maximum latitude. (All levels are selected) 29 ; 30 ; @keyword ENDPOINTS 31 ; A four elements vector [x1,y1,x2,y2] used to specify 32 ; that domdef must define the box used to make a plot (pltz, pltt, 33 ; plt1d) done strictly along the line (that can have any direction) 34 ; starting at (x1, y1) ending at (x2, y2). When defining endpoints, 35 ; you must also define TYPE which define the type of plots 36 ; ('pltz', 'xt', 'yt', 'zt', 'x', 'y', 'z', 't') will used 37 ; ENDPOINTS keywords 38 ; 39 ; @keyword FINDALWAYS 40 ; Force to redefine a box even when none point is find in the box. 41 ; In this case, we select all the grid. 42 ; 43 ; @keyword GRIDTYPE 44 ; It is a string or a vector of strings containing the grids's name 45 ; (Only determinated by 'T','U','V','W','F') for which the calculation 46 ; must be done. 47 ; For example: 'T' ou ['T','U'] 48 ; 49 ; @keyword MEMEINDICES 50 ; It is possible that points t,u,v and F correspond to a same geographic 51 ; box which do not concern the same array indexes. This is sometimes a 52 ; problem (or at least serious complications) in programs where several 53 ; type of grid interven (see norme, curl...). Activate MEMEINDICE to 54 ; force domdef to take same indexes -those of the grid T- for all other 55 ; grids. 56 ; 57 ; @keyword INDEX 58 ; We activate it if we want that all elements passed in input of domdef 59 ; refer to indexes of glam, gphi and gdep arrays rather than to values 60 ; of these arrays. 61 ; 62 ; @keyword XINDEX 63 ; We activate it if we want that all elements passed in input of domdef 64 ; and concerning the X dimension refer to indexes of glam arrays rather 65 ; than to values of these arrays. 66 ; 67 ; @keyword YINDEX 68 ; We activate it if we want that all elements passed in input of domdef 69 ; and concerning the X dimension refer to indexes of gphi arrays rather 70 ; than to values of these arrays. 71 ; 72 ; @keyword ZINDEX 73 ; We activate it if we want that all elements passed in input of domdef 74 ; and concerning the X dimension refer to indexes of gdep arrays rather 75 ; than to values of these arrays. 63 76 ; 64 77 ; OUTPUTS:on recupere pour les 4 grilles t,u,v,f … … 82 95 ; suivant z 83 96 ; 84 ; COMMON BLOCKS: 85 ; common.pro 86 ; 87 ; SIDE EFFECTS: 88 ; 89 ; RESTRICTIONS: 90 ; 91 ; EXAMPLE: 92 ; 93 ; MODIFICATION HISTORY: Sebastien Masson (smasson@lodyc.jussieu.fr) 97 ; @uses 98 ; common.pro 99 ; 100 ; 101 ; @history 102 ; Sebastien Masson (smasson@lodyc.jussieu.fr) 94 103 ; 8/2/98 95 104 ; rewrite everything, debug and spee-up Sebastien Masson April 2005 105 ; 106 ; @version 107 ; $Id$ 108 ; 109 ; @todo seb: output pas clair/ pas d'input required? 96 110 ;- 97 111 ;------------------------------------------------------------ … … 114 128 ENDIF 115 129 ;--------------------- 116 tempsun = systime(1) ; pour key_performance130 tempsun = systime(1) ; For key_performance 117 131 ; 118 132 CASE N_PARAMS() OF
Note: See TracChangeset
for help on using the changeset viewer.