Ignore:
Timestamp:
03/16/07 10:22:26 (17 years ago)
Author:
pinsard
Message:

corrections of some misspellings in some *.pro

Location:
trunk/SRC/ToBeReviewed/WIDGET/AUTOUR_de_XXX
Files:
5 edited

Legend:

Unmodified
Added
Removed
  • trunk/SRC/ToBeReviewed/WIDGET/AUTOUR_de_XXX/buildcmd.pro

    r172 r226  
    55; 
    66; @file_comments 
    7 ; This function send back a string which contain the reading command  
     7; This function send back a string which contain the reading command 
    88; and drawing's parameters. 
    99; 
     
    1111; 
    1212; @keyword BOXZOOM 
    13 ; Vector indicating the geographic zone on which we want to cut the map.  
    14 ; If BOXZOOM has :  
     13; Vector indicating the geographic zone on which we want to cut the map. 
     14; If BOXZOOM has : 
    1515;   1 element : The extraction is made on [lon1, lon2, lat1, lat2, 0.,boxzoom[0]] 
    1616;   2 elements: The extraction is made on [lon1, lon2, lat1, lat2, boxzoom[0],boxzoom[1]] 
    1717;   4 elements: The extraction is made on [Boxzoom, 0, max([gdept, gdepw])] 
    1818;   5 elements: The extraction is made on [Boxzoom[0:3], 0, Boxzoom[4]] 
    19 ;   6 elements: The extraction is made on Boxzoom  
     19;   6 elements: The extraction is made on Boxzoom 
    2020; Where lon1, lon2,lat1,lat2 are global variables defined at the last domdef! 
    2121; 
     
    5454  numdessinout = smallout[2]-1 
    5555; 
    56   options = extractatt(top_uvalue, 'options')    
     56  options = extractatt(top_uvalue, 'options') 
    5757  optionsflag = extractatt(top_uvalue, 'optionsflag') 
    5858  portrait = (strtrim(optionsflag[where(options EQ 'Portrait/Landscape'), 0], 1))[0] 
     
    8383;  Search of options 
    8484; 
    85   options = extractatt(top_uvalue, 'options')    
     85  options = extractatt(top_uvalue, 'options') 
    8686  optionsflag = extractatt(top_uvalue, 'optionsflag') 
    8787  flags = optionsflag[*, numdessinin] 
     
    133133  widcmd =  strtrim(widcmd, 2) 
    134134  IF widcmd[0] EQ '' THEN widcmd = 'zzz' 
    135    
     135 
    136136  cutcmd, widcmd[0], toread, numberofread, prefix, nameexp, ending 
    137137; 
     
    158158; we complet the reading command 
    159159        oldrdcmd = extractatt(top_uvalue, 'currentreadcmd') 
    160         nl = n_elements(oldrdcmd)  
     160        nl = n_elements(oldrdcmd) 
    161161        oldrdcmd[nl-1] = oldrdcmd[nl-1] + ' $' 
    162162        readcmd[i] = prefix + readcmd[i] 
     
    164164      ENDELSE 
    165165; exit if we have to read other fields... 
    166       if alreadyread+1 NE numberofread-1 THEN BEGIN  
     166      if alreadyread+1 NE numberofread-1 THEN BEGIN 
    167167        *top_uvalue[1, findline(top_uvalue, 'currentreadcmd')] = readcmd 
    168168        *top_uvalue[1, findline(top_uvalue, 'alreadyread')] = alreadyread+1 
     
    171171      ENDIF 
    172172; we finalize the reading command 
    173       IF ending NE '' THEN BEGIN  
    174         nl = n_elements(readcmd)  
     173      IF ending NE '' THEN BEGIN 
     174        nl = n_elements(readcmd) 
    175175        readcmd[nl-1] = readcmd[nl-1] + ' $' 
    176176        readcmd = [temporary(readcmd), ending] 
     
    186186      tgnm = strlowcase(tag_names(exextra)) 
    187187      indtmp = where(tgnm EQ 'box' OR tgnm EQ 'boxzoom', cnt) 
    188       IF cnt EQ 1 THEN BEGIN  
     188      IF cnt EQ 1 THEN BEGIN 
    189189        boxextra = exextra.(indtmp[0]) 
    190190        exextra = extractstru(exextra, ['box', 'boxzoom']) 
    191       ENDIF  
     191      ENDIF 
    192192      extra =  mixstru(exextra, extra) 
    193193      sextra = struct2string(extra) 
     
    214214    'vector':BEGIN 
    215215; for the vectors, there is 2 components. we read u when alreadyvector 
    216 ; is a interger and v when alreadyvector is a interger+0.5 
     216; is a integer and v when alreadyvector is a integer+0.5 
    217217      if floor(alreadyvector)+1 EQ 0 then begin 
    218218        if floor(alreadyvector) EQ alreadyvector then begin 
     
    226226      ENDIF ELSE BEGIN 
    227227        oldrdcmd = extractatt(top_uvalue, 'currentreadcmd') 
    228         nl = n_elements(oldrdcmd)  
     228        nl = n_elements(oldrdcmd) 
    229229        oldrdcmd[nl-1] = oldrdcmd[nl-1] + ' $' 
    230230        readcmd[i] = prefix + readcmd[i] 
     
    235235        numberofread-1:BEGIN 
    236236; we finalize the reading command 
    237           IF ending NE '' THEN BEGIN  
    238             nl = n_elements(readcmd)  
     237          IF ending NE '' THEN BEGIN 
     238            nl = n_elements(readcmd) 
    239239            readcmd[nl-1] = readcmd[nl-1] + ' $' 
    240240            readcmd = [temporary(readcmd), ending] 
     
    252252        numberofread-0.5:BEGIN 
    253253; we finalize the reading command 
    254           IF ending NE '' THEN BEGIN  
    255             nl = n_elements(readcmd)  
     254          IF ending NE '' THEN BEGIN 
     255            nl = n_elements(readcmd) 
    256256            readcmd[nl-1] = readcmd[nl-1] + ' $' 
    257257            readcmd = [temporary(readcmd), ending] 
     
    301301      ENDIF ELSE BEGIN 
    302302        oldrdcmd = extractatt(top_uvalue, 'currentreadcmd') 
    303         nl = n_elements(oldrdcmd)  
     303        nl = n_elements(oldrdcmd) 
    304304        oldrdcmd[nl-1] = oldrdcmd[nl-1] + ' $' 
    305305        readcmd[i] = prefix + readcmd[i] 
     
    307307      ENDELSE 
    308308; 
    309       if alreadyover+1 NE numberofread-1 THEN BEGIN  
     309      if alreadyover+1 NE numberofread-1 THEN BEGIN 
    310310; we still need to read some files... 
    311311        *top_uvalue[1, findline(top_uvalue, 'currentreadcmd')] = readcmd 
     
    315315      ENDIF 
    316316; we finalize the reading command 
    317       IF ending NE '' THEN BEGIN  
    318         nl = n_elements(readcmd)  
     317      IF ending NE '' THEN BEGIN 
     318        nl = n_elements(readcmd) 
    319319        readcmd[nl-1] = readcmd[nl-1] + ' $' 
    320320        readcmd = [temporary(readcmd), ending] 
     
    362362; For [plots in z, box must have by default 0,profmax 
    363363  if strpos(type, 'z') NE -1 then BEGIN 
    364 ; If more than 1 level is selected:  
     364; If more than 1 level is selected: 
    365365    widget_control, widget_info(base, find_by_uname = 'dthlv1'), get_value = niv1 
    366366    niv1 = niv1.combobox_index 
  • trunk/SRC/ToBeReviewed/WIDGET/AUTOUR_de_XXX/identifyclick.pro

    r150 r226  
    8585; t/3/0 End of the double click 
    8686      thisEvent EQ 'WIDGET_TIMER' AND uval.click EQ 3 AND press EQ 0:uval.click = 0 
    87 ; Imposible case in theory: 
     87; Impossible case in theory: 
    8888      ELSE:BEGIN 
    8989         print, thisEvent, uval.click, press 
  • trunk/SRC/ToBeReviewed/WIDGET/AUTOUR_de_XXX/scanfile.pro

    r221 r226  
    55; @categories 
    66; 
    7 ;  
     7; 
    88; @param NAMEFILE 
    99; 
    10 ;  
    1110; @keyword GRID {default='T'}{type=scalar string} 
    1211; Used to specify on which grid type are located the data 
     
    1413; @keyword _EXTRA 
    1514; Used to pass your keywords to isafile and ncdf_getaxis 
    16 ;  
     15; 
    1716; @returns 
    18 ;  
    19 ;  
     17; 
    2018; @uses 
    21 ;  
    22 ;  
     19; 
    2320; @restrictions 
    24 ;  
    25 ;  
     21; 
    2622; @examples 
    27 ;  
    28 ;  
     23; 
    2924; @history 
    30 ;  
    31 ;  
    32 ; @version  
     25; 
     26; @version 
    3327; $Id$ 
    3428; 
    3529; @todo 
    3630; seb : I don't know what to do with that... 
    37 ;  
     31; 
    3832;- 
    3933; 
     
    4943;       dont les noms sont 'x','lon...','xi_...' et 'y','lat...' ou 
    5044;       'eta_...' ou bien en majuscule. 
    51 ;       4) il doit exiter ds ce fichier une unique variable n''ayant 
     45;       4) il doit exister ds ce fichier une unique variable n''ayant 
    5246;       qu''une dimension et etant la dimension temporelle. cette 
    5347;       variable sera prise comme axe des temps. Rq: si plusieurs 
     
    5549;       variable 
    5650;       5) Cette variable axe des temps doit contenir l''attribut 
    57 ;       'units'qui doit etre ecrit suivant la syntaxe: 
    58 ;               "seconds since 0001-01-01 00:00:00"  
    59 ;               "hours since 0001-01-01 00:00:00"  
    60 ;               "days since 1979-01-01 00:59:59"  
    61 ;               "months since 1979-01-01 00:59:59"  
    62 ;               "years since 1979-01-01 00:59:59"  
     51;       'units' qui doit etre ecrit suivant la syntaxe: 
     52;               "seconds since 0001-01-01 00:00:00" 
     53;               "hours since 0001-01-01 00:00:00" 
     54;               "days since 1979-01-01 00:59:59" 
     55;               "months since 1979-01-01 00:59:59" 
     56;               "years since 1979-01-01 00:59:59" 
    6357; 
    6458; je crois que c''est tout! 
     
    9387  namedim = strarr(inside.ndims) 
    9488  for dimiq = 0, inside.ndims-1 do begin 
    95     ncdf_diminq, cdfid, dimiq, tmpname, value  
     89    ncdf_diminq, cdfid, dimiq, tmpname, value 
    9690    namedim[dimiq] = strlowcase(tmpname) 
    9791  ENDFOR 
     
    110104       (inter(invar.dim, dimidy))[0] NE -1 AND $ 
    111105       ((where(invar.dim EQ inside.recdim))[0] NE -1 OR inside.recdim EQ -1) $ 
    112     THEN namevar[varid] = invar.name  
     106    THEN namevar[varid] = invar.name 
    113107  ENDFOR 
    114108  namevar = namevar[where(namevar NE '')] 
     
    135129        tmpnm[0] EQ 'xi_u'   AND tmpnm[1] EQ 'eta_rho':listgrid[i] = 'U' 
    136130        tmpnm[0] EQ 'xi_u'   AND tmpnm[1] EQ 'eta_v'  :listgrid[i] = 'F' 
    137         ELSE:  
    138       ENDCASE  
     131        ELSE: 
     132      ENDCASE 
    139133    ENDFOR 
    140134    empty = where(listgrid EQ '') 
    141     IF empty[0] NE -1 THEN BEGIN    
     135    IF empty[0] NE -1 THEN BEGIN 
    142136; could we define the grid type from the file name?? 
    143137      pattern = ['GRID.', 'GRID_', 'GRID', 'UPID_', '30ID_'] 
     
    153147      ENDFOR 
    154148      listgrid[empty] = vargrid 
    155     ENDIF  
     149    ENDIF 
    156150  ENDIF ELSE listgrid[*] = vargrid 
    157151;------------------------------------------------------------ 
     
    159153;------------------------------------------------------------ 
    160154  date0fk = date2jul(19000101) 
    161   IF inside.recdim EQ -1 THEN BEGIN  
     155  IF inside.recdim EQ -1 THEN BEGIN 
    162156    jpt = 1 
    163157    time = date0fk 
     
    170164    repeat BEGIN 
    171165      IF varid LT inside.nvars THEN BEGIN 
    172         invar = ncdf_varinq(cdfid, varid)  
    173         varid = varid+1         
     166        invar = ncdf_varinq(cdfid, varid) 
     167        varid = varid+1 
    174168      ENDIF ELSE varid = 0 
    175169    endrep until (n_elements(invar.dim) EQ 1 AND invar.dim[0] EQ inside.recdim) OR (varid EQ 0) 
     
    177171; 
    178172    CASE 1 OF 
    179       varid EQ -1:BEGIN  
     173      varid EQ -1:BEGIN 
    180174        dummy = report('the file '+fullname+' has no time axis.!C we create a fake calendar ...') 
    181175        fakecal = 1 
    182176        time = date0fk + lindgen(1>jpt) 
    183177      END 
    184       invar.natts EQ 0:BEGIN  
     178      invar.natts EQ 0:BEGIN 
    185179        dummy = report('the variable '+invar.name+' has no attribut.!C we create a fake calendar ...') 
    186180        fakecal = 1 
     
    197191          fakecal = 1 
    198192          time = date0fk + lindgen(1>jpt) 
    199         ENDIF ELSE BEGIN  
     193        ENDIF ELSE BEGIN 
    200194; we read the time axis 
    201195          ncdf_varget, cdfid, varid, time 
     
    223217            err = 1 
    224218          ENDIF 
    225           IF err GT 0 THEN BEGIN  
     219          IF err GT 0 THEN BEGIN 
    226220            fakecal = 1 
    227221            time = date0fk + lindgen(1>jpt) 
    228           ENDIF ELSE BEGIN  
     222          ENDIF ELSE BEGIN 
    229223            debut = str_sep(mots[2], '-') 
    230224; 
     
    241235                'greg':IF n_elements(key_caltype) EQ 0 THEN key_caltype = 'greg' 
    242236                ELSE:BEGIN 
    243 ;            notused = report('Unknown calendar: '+value+', we use greg calendar.')  
     237;            notused = report('Unknown calendar: '+value+', we use greg calendar.') 
    244238                  key_caltype = 'greg' 
    245239                END 
    246240              ENDCASE 
    247241            ENDIF ELSE BEGIN 
    248 ;        notused = report('Unknown calendar, we use '+key_caltype+' calendar.')  
     242;        notused = report('Unknown calendar, we use '+key_caltype+' calendar.') 
    249243              IF n_elements(key_caltype) EQ 0 THEN key_caltype = 'greg' 
    250244            ENDELSE 
     
    259253              'hour':time = julday(debut[1], debut[2], debut[0])+time/24.d 
    260254              'day':time = julday(debut[1], debut[2], debut[0])+time 
    261               'month':BEGIN  
     255              'month':BEGIN 
    262256                if total(fix(time) NE time) NE 0 then $ ; we switch to days with 30d/m 
    263257                   time = julday(debut[1], debut[2], debut[0])+round(time*30) $ 
  • trunk/SRC/ToBeReviewed/WIDGET/AUTOUR_de_XXX/xcreateanim.pro

    r150 r226  
    55; @categories 
    66; 
    7 ;  
    87; @param EVENT 
    98; 
    10 ;  
    119; @returns 
    12 ;  
    13 ;  
     10; 
    1411; @uses 
    15 ;  
    16 ;  
     12; 
    1713; @restrictions 
    18 ;  
    19 ;  
     14; 
    2015; @examples 
    21 ;  
    22 ;  
     16; 
    2317; @history 
    24 ;  
    25 ;  
     18; 
    2619; @version 
    27 ; $Id$  
    28 ;  
     20; $Id$ 
     21; 
    2922; @todo 
    3023; seb 
    3124; 
    3225;- 
    33 pro xcreateanim_event, event  
     26pro xcreateanim_event, event 
    3427; 
    3528  compile_opt idl2, strictarrsubs 
     
    6154  widget_control, widget_info(event.top, find_by_uname = 'debut') $ 
    6255                  , get_value = vdate1 
    63   index1 = where(calendar eq date2jul(vdate1)) & index1 = index1[0]  
     56  index1 = where(calendar eq date2jul(vdate1)) & index1 = index1[0] 
    6457  if index1 EQ -1 then return 
    6558; 
    6659  widget_control, widget_info(event.handler, find_by_uname = 'fin') $ 
    6760                  , get_value = vdate2 
    68   index2 = where(calendar eq date2jul(vdate2)) & index2 = index2[0]  
     61  index2 = where(calendar eq date2jul(vdate2)) & index2 = index2[0] 
    6962  if index2 EQ -1 OR index2 LE index1 then return 
    7063; We delete the widget before create the file .ps 
     
    7366; creation of the routine which will serve us to do the drawing 
    7467; 
    75 ; We recuperate the list of instructions  
     68; We recuperate the list of instructions 
    7669  globalcommand = extractatt(top_uvalue, 'globalcommand') 
    7770; We complete by first and last lines of the program 
     
    113106    green = green[index] 
    114107    blue = blue[index] 
    115   endif             
     108  endif 
    116109; 
    117110  if depth gt 8 then $ 
     
    133126      IF keyword_set(fakecal) THEN date = ind ELSE date = jul2date(calendar[ind]) 
    134127      xxx2ps, /noerase, date1 = date, date2 = date 
    135 ;       
     128; 
    136129      image = tvrd(true = depth GT 8) 
    137130; 
     
    142135      wdelete, !d.window 
    143136    ENDFOR 
    144   ENDIF  
     137  ENDIF 
    145138; We put a last white picture 
    146139  window, /free, /pixmap, xsize = xsize, ysize = ysize 
     
    155148  wdelete, !d.window 
    156149; File's closing. 
    157   write_gif, animdir+nomfic, /close  
    158   widget_control, base, /destroy  
     150  write_gif, animdir+nomfic, /close 
     151  widget_control, base, /destroy 
    159152; Rerock in "normal" mode 
    160153  thisOS = strupcase(strmid(!version.os_family, 0, 3)) 
     
    169162  endif 
    170163; 
    171    
     164 
    172165  return 
    173166end 
     
    179172; @categories 
    180173; 
    181 ;  
     174; 
    182175; @param PARENT 
    183176; 
    184 ;  
     177; 
    185178; @returns 
    186 ;  
    187 ;  
     179; 
     180; 
    188181; @uses 
    189 ;  
    190 ;  
     182; 
    191183; @restrictions 
    192 ;  
    193 ;  
     184; 
    194185; @examples 
    195 ;  
    196 ;  
     186; 
    197187; @history 
    198 ;  
    199 ;  
     188; 
    200189; @version 
    201 ; $Id$  
    202 ;  
     190; $Id$ 
     191; 
    203192; @todo 
    204193; seb 
     
    229218   if strtrim(filenames[0], 1) EQ '' then filenames = filenames[1:n_elements(filenames)-1] 
    230219   indexfile = (where(filelist EQ filenames[0]))[0] 
    231    calendar = (*(extractatt(top_uvalue, 'fileparameters'))[indexfile]).time_counter   
     220   calendar = (*(extractatt(top_uvalue, 'fileparameters'))[indexfile]).time_counter 
    232221   key_caltype = (*(extractatt(top_uvalue, 'fileparameters'))[indexfile]).caltype 
    233222   fakecal = (*(extractatt(top_uvalue, 'fileparameters'))[indexfile]).fakecal 
     
    237226         calendarbis = (*(extractatt(top_uvalue, 'fileparameters'))[indexfilebis]).time_counter 
    238227         if n_elements(calendarbis) NE n_elements(calendar)  then begin 
    239             nothing = report('Les diffrents plots n''utilisent pas le meme calendrier. !C Animation impossible!', /error) 
     228            nothing = report('plots do not use the same calendar. !C Animation impossible!', /error) 
    240229            return 
    241230         ENDIF 
    242231         if total(calendar NE calendarbis) NE 0 then begin 
    243             nothing = report('Les diffrents plots n''utilisent pas le meme calendrier. !C Animation impossible!', /error) 
     232            nothing = report('plots do not use the same calendar. !C Animation impossible!', /error) 
    244233            return 
    245234         endif 
     
    249238; It is possible to do an animation. 
    250239; 
    251    base = widget_base(/column, title = 'animation creation', uvalue = {parent:parent, indexfile:indexfile})    
     240   base = widget_base(/column, title = 'animation creation', uvalue = {parent:parent, indexfile:indexfile}) 
    252241   rien = widget_label(base, value = 'animation name') 
    253242   rien = widget_text(base,value='anim_idl.gif', uname='Filename', /editable) 
     
    266255   widget_control,base,/realize 
    267256   xmanager,'xcreateanim', base, /no_block 
    268     
     257 
    269258   return 
    270259end 
  • trunk/SRC/ToBeReviewed/WIDGET/AUTOUR_de_XXX/xxxmenubar_event.pro

    r150 r226  
    55; @categories 
    66; 
    7 ;  
     7; 
    88; @param EVENT 
    99; 
    10 ;  
    1110; @returns 
    12 ;  
    13 ;  
     11; 
    1412; @uses 
    15 ;  
    16 ;  
     13; 
    1714; @restrictions 
    18 ;  
    19 ;  
     15; 
    2016; @examples 
    21 ;  
    22 ;  
     17; 
    2318; @history 
    24 ;  
    25 ;  
    26 ; @version  
     19; 
     20; @version 
    2721; $Id$ 
    2822; 
    29 ; @todo  
     23; @todo 
    3024; seb 
    3125;- 
     
    3933 
    4034  case event.value of 
    41     'Open' :begin  
     35    'Open' :begin 
    4236      oldmeshparams = ccmeshparameters 
    4337      newfile = selectfile() 
     
    6256; What is the selected field ? Do we reselect it ? 
    6357      fieldname = widget_info(vlstid, /combobox_gettext) 
    64       index = where(newfile.fileparameters.listvar EQ fieldname)  
     58      index = where(newfile.fileparameters.listvar EQ fieldname) 
    6559      widget_control, vlstid, set_value = newfile.fileparameters.listvar 
    6660      widget_control, vlstid, set_combobox_select = 0 > index[0] 
     
    117111      xxx, CALLERWIDID = event.top, _extra = extra 
    118112    end 
    119     'Quit':begin  
     113    'Quit':begin 
    120114      widget_control, event.top, get_uvalue = top_uvalue 
    121115      ptr_free, extractatt(top_uvalue, 'exextra') 
     
    142136                 , /POSTSCRIPT 
    143137    END 
    144     'Animated gif' :begin  
     138    'Animated gif' :begin 
    145139      IF float(strmid(!version.release,0,3)) GE 6.2 THEN xcreateanim, event.top 
    146140    end 
     
    174168      widget_control, event.top, get_uvalue = top_uvalue 
    175169; portrait or landscape ??? 
    176       options = extractatt(top_uvalue, 'options')    
     170      options = extractatt(top_uvalue, 'options') 
    177171      optionsflag = extractatt(top_uvalue, 'optionsflag') 
    178172      portrait = (optionsflag[where(options EQ 'Portrait/Landscape'), 0])[0] 
     
    203197      ENDIF 
    204198; We recuperate the name of the file 
    205       filename = xquestion('dans quel fichier bianire voulez vous sauver le widget ?', 'xxx_widget.dat') 
     199      filename = xquestion('In which binary file do you want to save the widget ?', 'xxx_widget.dat') 
    206200; We complete it by a .dat 
    207201      if rstrpos(filename, '.dat') NE strlen(filename)-4 then filename = filename+'.dat' 
     
    219213      for i = 0,  n_elements(commande)-1 do print, commande[i] 
    220214    end 
    221    'Portrait/Landscape' :begin  
     215   'Portrait/Landscape' :begin 
    222216      widget_control, event.top, get_uvalue = top_uvalue 
    223217      options = extractatt(top_uvalue, 'options') 
     
    255249      ENDELSE 
    256250    end 
    257     'Overlay' :begin  
     251    'Overlay' :begin 
    258252      widget_control, event.top, get_uvalue = top_uvalue 
    259253      numdessinin = (extractatt(top_uvalue, 'smallin'))[2]-1 
    260       options = extractatt(top_uvalue, 'options')    
     254      options = extractatt(top_uvalue, 'options') 
    261255      flags = extractatt(top_uvalue, 'optionsflag') 
    262256      index = where(options EQ 'Overlay') 
     
    269263      widget_control, event.top, get_uvalue = top_uvalue 
    270264      numdessinin = (extractatt(top_uvalue, 'smallin'))[2]-1 
    271       options = extractatt(top_uvalue, 'options')    
     265      options = extractatt(top_uvalue, 'options') 
    272266      flags = extractatt(top_uvalue, 'optionsflag') 
    273267      index = where(options EQ 'Vecteur') 
     
    280274      widget_control, event.top, get_uvalue = top_uvalue 
    281275      numdessinin = (extractatt(top_uvalue, 'smallin'))[2]-1 
    282       options = extractatt(top_uvalue, 'options')    
     276      options = extractatt(top_uvalue, 'options') 
    283277      flags = extractatt(top_uvalue, 'optionsflag') 
    284278      index = where(options EQ 'Longitude / x index') 
     
    314308      (*top_uvalue[1, findline(top_uvalue, 'domaines')])[*, numdessinin] = boxzoom 
    315309    end 
    316     'Latitude / y index':begin  
     310    'Latitude / y index':begin 
    317311      widget_control, event.top, get_uvalue = top_uvalue 
    318312      numdessinin = (extractatt(top_uvalue, 'smallin'))[2]-1 
    319       options = extractatt(top_uvalue, 'options')    
     313      options = extractatt(top_uvalue, 'options') 
    320314      flags = extractatt(top_uvalue, 'optionsflag') 
    321315      index = where(options EQ 'Latitude / y index') 
Note: See TracChangeset for help on using the changeset viewer.