Changeset 142 for trunk/SRC/ToBeReviewed/PLOTS/LABEL/label.pro
- Timestamp:
- 07/21/06 14:47:49 (18 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/SRC/ToBeReviewed/PLOTS/LABEL/label.pro
r134 r142 3 3 ;------------------------------------------------------------ 4 4 ;+ 5 ; NAME:label6 5 ; 7 ; PURPOSE:permet de choisir le stype de label que l'on veut utiliser8 ; lors d'un contour6 ; @file_comments 7 ; Allows to choose the type of the label we want to use at the time of a contour. 9 8 ; 10 ; CATEGORY:graphique 9 ; @categories 10 ; graphic 11 11 ; 12 ; CALLING SEQUENCE:pro label,cas,min,max,ncontour,level_z2d 12 ; @param CAS {in}{required} 13 ; Number of the type of the label we want to trace 14 ; 15 ; @param MIN {in}{required} 16 ; Smallest value for the drawing of the contour. 13 17 ; 14 ; INPUTS: 15 ; cas=numero du type de label que l'on veut tracer 16 ; min et max = valeures min et max entre lesquelles on veut faire 17 ; des contours 18 ; @param MAX {in}{required} 19 ; Biggest value for the drawing of the contour. 18 20 ; 19 ; KEYWORD PARAMETERS: 21 ; @keyword INTERVALLE 22 ; Value of an interval betwenn two isolines. By default, it is calculated to 23 ; draw 20 isolines. In all cases, this keyword must be returnedt have a nice 24 ; caption. If levels do not contain regular intervals, put it at -1. 20 25 ; 21 ; INTERVALLE: valeur d'un intervalle entre deux isolignes. par defaut 22 ; est calcule pour tracer 20 isolighnes. Dans tous les cas ce not cle 23 ; doit etre retourne pour pouvoir avoir une belle legende. Si les 24 ; niveaux ne comportent pas d''intevalle regulier, le mettre a -1 26 ; @keyword NLEVEL 27 ; Number of contour to be drawn. By default =20. Active if LABEL=0 or is not specified. 25 28 ; 26 ; NLEVEL: nombre de contours a dessiner. par defaut =20. actif si 27 ; LABEL=0 ou nest pas specifie. 29 ; @param NCONTOUR {out} 30 ; Number of contour to be drawn. 31 ; 32 ; @param LEVEL_Z2D {out} 33 ; Vector containing values of contours we draw. 28 34 ; 29 ; OUTPUTS: 30 ; ncontour=nombre de contour a tracer 31 ; level_z2d=vecteur contenant les valeurs des contours que l'on trace 32 ; colnumb: un vecteur contenant le numero des couleurs qui serviront a 33 ; remplir entre les contours) 35 ; @param COLNUMB {out} 36 ; Vector containing the number of colors which will serve to fill contours. 34 37 ; 35 ; COMMON BLOCKS:36 ; 38 ; @uses 39 ; common.pro 37 40 ; 38 ; SIDE EFFECTS: 41 ; @history 42 ; Sebastien Masson (smasson@lodyc.jussieu.fr) 43 ; 7/5/98 39 44 ; 40 ; RESTRICTIONS: 45 ; @version 46 ; $Id$ 41 47 ; 42 ; EXAMPLE:43 ;44 ; MODIFICATION HISTORY: Sebastien Masson (smasson@lodyc.jussieu.fr)45 ; 7/5/9846 48 ;- 47 49 ;------------------------------------------------------------ … … 72 74 case cas of 73 75 0: begin 74 ; nlevel label entre le min et le max76 ; nlevel label between the min and the max 75 77 if keyword_set(Nlevel) eq 0 then ncontour=20 else ncontour=nlevel 76 78 ncontour = 1 > ncontour … … 80 82 end 81 83 1: begin 82 ; un certain nombre de label en partant du min jusqu'au plus pres de max avec83 ; un pas fixe par intervalle84 ; a certain number of label from the min to the nearest possible to the 85 ; max with a constant step by interval 84 86 ncontour = fix((max-min)/intervalle) 85 87 ncontour = 1 > ncontour … … 88 90 max=level_z2d[Ncontour-1]+intervalle 89 91 end 90 ; label pour faire les memes sss quedessier92 ; label to do same sss than dessier 91 93 92 94 2: begin … … 100 102 end 101 103 3: begin 102 ; lecture intervalles + palette dans fichierGMT104 ; Readinf of intervals + palette in the file GMT 103 105 104 106 label_gmt, min, max, intervalle, ncoul, ncontour, level_z2d, colnumb
Note: See TracChangeset
for help on using the changeset viewer.