Ignore:
Timestamp:
04/17/14 10:49:43 (10 years ago)
Author:
pinsard
Message:

fix thanks to coding rules; typo; dupe empty lines; trailing blanks

Location:
trunk/SRC/ToBeReviewed/WIDGET
Files:
19 edited

Legend:

Unmodified
Added
Removed

  • trunk/SRC/ToBeReviewed/WIDGET/AUTOUR_de_XXX/buildcmd.pro

    r327 r495  
    1515;   5 elements: The extraction is made on [Boxzoom[0:3], 0, Boxzoom[4]] 
    1616;   6 elements: The extraction is made on Boxzoom 
    17 ; Where lon1, lon2,lat1,lat2 are global variables defined at the last  
     17; Where lon1, lon2,lat1,lat2 are global variables defined at the last 
    1818; <pro>domdef</pro> ! 
    1919; 
    … …  
    8686  drawover = (flags[where(options EQ 'Overlay')])[0] 
    8787; 
    88   alreadyread = extractatt(top_uvalue, 'alreadyread') 
     88  alreadyread   = extractatt(top_uvalue, 'alreadyread') 
    8989  alreadyvector = extractatt(top_uvalue, 'alreadyvector') 
    90   alreadyover = extractatt(top_uvalue, 'alreadyoer') 
     90  alreadyover   = extractatt(top_uvalue, 'alreadyover') 
    9191; What must we read ? 
    9292  case 1 of 
    … …  
    414414  return, Cmd 
    415415end 
    416  
    417  

  • trunk/SRC/ToBeReviewed/WIDGET/AUTOUR_de_XXX/buildreadcmd.pro

    r493 r495  
    1818;   5 elements: The extraction is made on [Boxzoom[0:3], 0, Boxzoom[4]] 
    1919;   6 elements: The extraction is made on Boxzoom 
    20 ; Where lon1, lon2,lat1,lat2 are global variables defined at the last  
     20; Where lon1, lon2,lat1,lat2 are global variables defined at the last 
    2121; <pro>domdef</pro> ! 
    2222; 
    … …  
    4040FUNCTION buildreadcmd, base, snameexp, procedure, type, BOXZOOM=boxzoom $ 
    4141                     , COMPLETE=complete, NAMEFIELD=namefield 
    42 ; 
    4342; 
    4443  compile_opt idl2, strictarrsubs 

  • trunk/SRC/ToBeReviewed/WIDGET/AUTOUR_de_XXX/changefield.pro

    r327 r495  
    1818;   5 elements: The extraction is made on [Boxzoom[0:3], 0, Boxzoom[4]] 
    1919;   6 elements: The extraction is made on Boxzoom 
    20 ; Where lon1, lon2,lat1,lat2 are global variables defined at the last  
     20; Where lon1, lon2,lat1,lat2 are global variables defined at the last 
    2121; <pro>domdef</pro> ! 
    2222; 

  • trunk/SRC/ToBeReviewed/WIDGET/AUTOUR_de_XXX/changefile.pro

    r327 r495  
    1818;   5 elements: The extraction is made on [Boxzoom[0:3], 0, Boxzoom[4]] 
    1919;   6 elements: The extraction is made on Boxzoom 
    20 ; Where lon1, lon2,lat1,lat2 are global variables defined at the last  
     20; Where lon1, lon2,lat1,lat2 are global variables defined at the last 
    2121; <pro>domdef</pro> ! 
    2222; 
    … …  
    4646PRO changefile, base, newfilename, BOXZOOM=boxzoom $ 
    4747              , DATE1=date1, DATE2=date2, FIELDNAME=fieldname 
    48 ; 
    4948; 
    5049  compile_opt idl2, strictarrsubs 

  • trunk/SRC/ToBeReviewed/WIDGET/AUTOUR_de_XXX/letsdraw.pro

    r479 r495  
    5252; help,mixstru(top_uvalue.exextra,top_uvalue.extra), /struct 
    5353; 
    54 ; 
    5554; we recuperate the id of the graphic associated to the widget of id base. 
    5655   graphid = extractatt(top_uvalue, 'graphid') 
    … …  
    6362; 
    6463   tracecadre, smallout, /fill 
    65 ; 
    6664; 
    6765   options = extractatt(top_uvalue, 'options') 

  • trunk/SRC/ToBeReviewed/WIDGET/AUTOUR_de_XXX/read_vermair.pro

    r327 r495  
    2424;   5 elements: The extraction is made on [Boxzoom[0:3], 0, Boxzoom[4]] 
    2525;   6 elements: The extraction is made on Boxzoom 
    26 ; Where lon1, lon2,lat1,lat2 are global variables defined at the last  
     26; Where lon1, lon2,lat1,lat2 are global variables defined at the last 
    2727; <pro>domdef</pro> ! 
    2828; 
    … …  
    5858      res = lec(name,debut,nomexp, BOXZOOM=boxzoom, _EXTRA = ex) 
    5959   ENDIF ELSE res = lect(name,debut,fin, nomexp, BOXZOOM=boxzoom, _EXTRA = ex) 
    60 ;------------------------------------------------------------  
     60;------------------------------------------------------------ 
    6161   return, {tab:res, grille:vargrid, unite:'', experience:varexp, nom:varname} 
    6262end 

  • trunk/SRC/ToBeReviewed/WIDGET/AUTOUR_de_XXX/scanfile.pro

    r423 r495  
    1111; 
    1212; @keyword _EXTRA 
    13 ; Used to pass keywords to <pro>isafile</pro>,  
     13; Used to pass keywords to <pro>isafile</pro>, 
    1414; <pro>ncdf_getaxis</pro> and <pro>ncdf_gettime</pro> 
    1515; 
    … …  
    4747;       qu''une dimension et etant la dimension temporelle. cette 
    4848;       variable sera prise comme axe des temps. Rq: si plusieurs 
    49 ;       variables verifient ces criteres on considere la premiere 
     49;       variables vérifient ces criteres on considere la premiere 
    5050;       variable 
    5151;       5) Cette variable axe des temps doit contenir l''attribut 
    … …  
    5959; je crois que c''est tout! 
    6060; 
    61 ;        GRID='[UTVWF]' to specify the type of grid. Defaut is (1) 
     61;        GRID='[UTVWF]' to specify the type of grid. Default is (1) 
    6262;        based on the name of the file if the file ends by 
    6363;        GRID[._][TUVFW].NC (not case sensible) or (2) T if case (1) 
    6464;        is not found. 
    65 ; 
    6665; 
    6766  compile_opt idl2, strictarrsubs 
    … …  
    157156    jpt = abs(time) 
    158157    fakecal = 1 
    159   ENDIF ELSE jpt = n_elements(time)  
     158  ENDIF ELSE jpt = n_elements(time) 
    160159; high frequency calendar: more than one element per day 
    161160  IF max(histogram([long(time-time[0])])) GT 1 THEN fakecal = 1 ELSE fakecal = 0 

  • trunk/SRC/ToBeReviewed/WIDGET/AUTOUR_de_XXX/selectfile.pro

    r327 r495  
    177177; @param DATAFILENAME 
    178178; 
    179 ; 
    180179; @param IDLFILE 
    181 ; 
    182180; 
    183181; @param ARGSPRO 

  • trunk/SRC/ToBeReviewed/WIDGET/AUTOUR_de_XXX/xcreateanim.pro

    r493 r495  
    8787  window, /free, /pixmap, xsize = xsize, ysize = ysize 
    8888 
    89  
    9089; indication of the number of the picture we are creating 
    9190  base = widget_base() 
    … …  
    9796  IF keyword_set(fakecal) THEN date = index1 ELSE date = jul2date(calendar[index1]) 
    9897  xxx2ps, /noerase, date1in = date, date2in = date 
    99 ; 
    10098; 
    10199  image = tvrd(true = depth GT 8) 
    … …  
    112110;- Convert 24-bit image to 8-bit 
    113111  image = color_quan(image, 1, red, green, blue, colors = 256, get_translation = translation, /map_all) 
    114 ; 
    115112; 
    116113  write_gif, animdir+nomfic, image, red, green, blue, /multiple 

  • trunk/SRC/ToBeReviewed/WIDGET/COMPOUND_WIDGET/cw_bgroup.pro

    r327 r495  
    5353end 
    5454 
    55  
    56  
    5755;+ 
    5856; @file_comments 
    … …  
    6260; 
    6361; @param ID 
    64 ; 
    6562; 
    6663; @param VALUE 
    … …  
    167164  endelse 
    168165end 
    169  
    170  
    171  
    172  
    173166; 
    174167;+ 
    … …  
    379372  IF (N_ELEMENTS(y_scroll_size) eq 0)   then y_scroll_size = 0 
    380373 
    381  
    382  
    383  
    384374  top_base = 0L 
    385375  if (n_elements(label_top) ne 0) then begin 
    … …  
    424414    EVENT_FUNC='CW_BGROUP_EVENT', $ 
    425415    UVALUE=WIDGET_INFO(top_base, /child)) 
    426  
    427416 
    428417  n = n_elements(names) 

  • trunk/SRC/ToBeReviewed/WIDGET/COMPOUND_WIDGET/cw_calendar.pro

    r371 r495  
    3535;    return 
    3636; END 
    37 ; 
    38 ; 
    3937;+ 
    4038; 
    … …  
    7270  widget_control, winfo_id, get_uvalue = infowid 
    7371  key_caltype = infowid.caltype 
    74 ; high freqeuncy calendar 
     72; high frequency calendar 
    7573  IF keyword_set(infowid.fakecal) THEN BEGIN 
    7674    value2 = date2jul(long(value)) - infowid.fakecal 
    … …  
    104102; @file_comments 
    105103; 
    106 ; 
    107104; @categories 
    108105; Compound widget 
    109106; 
    110107; @param ID 
    111 ; 
    112108; 
    113109; @returns 
    … …  
    137133; @file_comments 
    138134; 
    139 ; 
    140135; @categories 
    141136; Compound widget 
    … …  
    143138; @param ID 
    144139; 
    145 ; 
    146140; @param WINFOID 
    147 ; 
    148141; 
    149142; @returns 
    … …  
    182175    month = (where(allmonths EQ wid_value.combobox_gettext))[0] + 1 
    183176    date = date + 100L * long(month) 
    184   ENDIF ELSE date = date + (oldate MOD 10000L)/100L*100L 
     177  ENDIF ELSE date = date + (oldate MOD 10000L)/ 100L * 100L 
    185178;-------------year---------------- 
    186179  wid_id = widget_info(id, find_by_uname = 'year') 
    … …  
    198191;+ 
    199192; @file_comments 
    200 ; 
    201193; 
    202194; @categories 
    … …  
    300292; @file_comments 
    301293; 
    302 ; 
    303294; @categories 
    304295; Compound widget 
    … …  
    306297; @param EVENT 
    307298; 
    308 ; 
    309299; @param CASENAME 
    310 ; 
    311300; 
    312301; @returns 
    … …  
    359348; 
    360349; @param EVENT 
    361 ; 
    362350; 
    363351; @returns 
    … …  
    424412; @file_comments 
    425413; 
    426 ; 
    427414; @categories 
    428415; Compound widget 
    … …  
    433420; @param CALENDAR 
    434421; 
    435 ; 
    436422; @param JDATE0 
    437423; 
    … …  
    440426; @keyword FAKECAL 
    441427; 
    442 ; 
    443428; @keyword UVALUE 
    444429; 
    445430; @keyword UNAME 
    446 ; 
    447431; 
    448432; @keyword _EXTRA 
    … …  
    524508      monthindex = where(yearcal EQ year0) 
    525509      currentmonth = long(monthcal[monthindex]) 
    526 ; we suppress the repeted months 
     510; we suppress the repeated months 
    527511      monthindexbis = uniq(currentmonth, sort(currentmonth)) 
    528512      monthindex = monthindex[monthindexbis] 

  • trunk/SRC/ToBeReviewed/WIDGET/COMPOUND_WIDGET/cw_domain.pro

    r493 r495  
    3737; end 
    3838; 
    39 ; 
    4039;+ 
    4140; 
    … …  
    4645; 
    4746; @param ID 
    48 ; 
    4947; 
    5048; @param VALUE 
    … …  
    516514;   5 elements: The extraction is made on [Boxzoom[0:3], 0, Boxzoom[4]] 
    517515;   6 elements: The extraction is made on Boxzoom 
    518 ; Where lon1, lon2,lat1,lat2 are global variables defined at the last  
     516; Where lon1, lon2,lat1,lat2 are global variables defined at the last 
    519517; <pro>domdef</pro>! 
    520518; 
    … …  
    541539FUNCTION cw_domain, parent, BOXZOOM=boxzoom, STRICT=strict $ 
    542540                  , UVALUE=uvalue, UNAME=uname, UNZOOM=unzoom, _EXTRA=ex 
    543 ; 
    544541; 
    545542  compile_opt idl2, strictarrsubs 

  • trunk/SRC/ToBeReviewed/WIDGET/COMPOUND_WIDGET/cw_slide_slice.pro

    r327 r495  
    116116 
    117117;   widget_control, uniteid, get_value = unite 
    118 ; 
    119118; 
    120119;    if uval.name EQ 'unite' then begin 
    … …  
    162161; @file_comments 
    163162; 
    164 ; 
    165163; @categories 
    166164; Compound widget 
    … …  
    177175;   5 elements: The extraction is made on [Boxzoom[0:3], 0, Boxzoom[4]] 
    178176;   6 elements: The extraction is made on Boxzoom 
    179 ; Where lon1, lon2,lat1,lat2 are global variables defined at the last  
     177; Where lon1, lon2,lat1,lat2 are global variables defined at the last 
    180178; <pro>domdef</pro> ! 
    181179; 

  • trunk/SRC/ToBeReviewed/WIDGET/COMPOUND_WIDGET/cw_slider_pm.pro

    r327 r495  
    145145; @file_comments 
    146146; 
    147 ; 
    148147; @categories 
    149148; Compound widget 
    … …  
    210209  IF uval EQ 'decimal' THEN value = float(event.str) $ 
    211210  ELSE value = float(widget_info(dcid, /combobox_gettext)) 
    212   out = 0 ; defaut case 
     211  out = 0 ; default case 
    213212  case uval OF 
    214213    'plus': if (value + 1) LE minmax[1] then value2 = value + 1 ELSE out = 1 
    … …  
    320319;            slider widget. 
    321320; 
    322 ; 
    323321; @examples 
    324322; See the program provided above (testwid and the associated procedure, testwid_event). 

  • trunk/SRC/ToBeReviewed/WIDGET/COMPOUND_WIDGET/cw_specifie.pro

    r327 r495  
    249249   rien = widget_text(base2, value = colvalue, /editable, xsize = 2, uname = 'palnum', uvalue = 'palnum') 
    250250 
    251  
    252  
    253251; widget text containing other keywords pass into top_uvalue.exextra 
    254252; Does it remain some? If yes, we have to put them as string 

  • trunk/SRC/ToBeReviewed/WIDGET/slec.pro

    r327 r495  
    2424;   5 elements: The extraction is made on [Boxzoom[0:3], 0, Boxzoom[4]] 
    2525;   6 elements: The extraction is made on Boxzoom 
    26 ; where lon1,lon2,lat1,lat2 are global variables defined at the last  
     26; where lon1,lon2,lat1,lat2 are global variables defined at the last 
    2727; <pro>domdef</pro> ! 
    2828; 

  • trunk/SRC/ToBeReviewed/WIDGET/xnotice.pro

    r486 r495  
    6565  ENDIF ELSE noticebase = -1 
    6666 
    67  
    6867  return, noticebase 
    6968end 

  • trunk/SRC/ToBeReviewed/WIDGET/xx.pro

    r493 r495  
    7777;---------------------------------------------------------------------- 
    7878; 
    79 ; 
    8079   fileparameters = {filename: 'many !' $ 
    8180                     , time_counter: calendar $ 

  • trunk/SRC/ToBeReviewed/WIDGET/xxx.pro

    r370 r495  
    134134; @keyword REDRAW 
    135135; 
    136 ; 
    137136; @keyword SEPARATE 
    138 ; 
    139137; 
    140138; @keyword UVALUE 
    … …  
    404402; we find homedir 
    405403        homedir = isadirectory(io = homedir, title = 'Bad definition of homedir') 
    406 ; We recuperae the list of instructions 
     404; We recuperate the list of instructions 
    407405        globalcommand = extractatt(top_uvalue, 'globalcommand') 
    408406; We complete by first and last lines of the program 
    … …  
    468466; creation of the pointer we will hook at the widget. 
    469467    top_uvalue = ptrarr(2, 29, /allocate_heap) 
    470 ; variables refering to the widget 
     468; variables referring to the widget 
    471469    *top_uvalue[0, 0] = 'options' & *top_uvalue[1, 0] = options 
    472470    *top_uvalue[0, 1] = 'smallin' & *top_uvalue[1, 1] = smallin 
    … …  
    482480    *top_uvalue[0, 11] = 'noticebase' & *top_uvalue[1, 11] = 0l 
    483481    *top_uvalue[0, 12] = 'extra' & *top_uvalue[1, 12] = ex 
    484 ; variables refering to different files we can read 
     482; variables referring to different files we can read 
    485483    *top_uvalue[0, 13] = 'currentfile' & *top_uvalue[1, 13] = currentfile 
    486484    *top_uvalue[0, 14] = 'filelist' & *top_uvalue[1, 14] = filelist 
    … …  
    488486    *top_uvalue[0, 16] = 'readparameters' & *top_uvalue[1, 16] = readparameters 
    489487    *top_uvalue[0, 17] = 'meshparameters' & *top_uvalue[1, 17] = meshparameters 
    490 ; variables refering to different drawing we can do 
     488; variables referring to different drawing we can do 
    491489    *top_uvalue[0, 18] = 'penvs' & *top_uvalue[1, 18] = replicate(!p, nbredessin) 
    492490    *top_uvalue[0, 19] = 'xenvs' & *top_uvalue[1, 19] = replicate(!x, nbredessin) 
Note: See TracChangeset for help on using the changeset viewer.