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/PLOTS/DESSINE
Files:
9 edited

Legend:

Unmodified
Added
Removed

  • trunk/SRC/ToBeReviewed/PLOTS/DESSINE/plt.pro

    r493 r495  
    150150; specified min/max are not filled. Note that max values a considered 
    151151; as missing values so cells containing one or more corners with 
    152 ; values above max will have no contours drawn through them.   
     152; values above max will have no contours drawn through them. 
    153153; 
    154154; @keyword STYLE {default=style=0} 
    … …  
    347347  IF keyword_set(strictfill) THEN BEGIN 
    348348    tmp = z2d ge max 
    349     IF total(tmp GE 1) THEN BEGIN  
     349    IF total(tmp GE 1) THEN BEGIN 
    350350      tmp = 1b - byte(extrapolate(tmp, tmp, 1, x_periodic = keyword_set(key_periodic)*(nx EQ jpi) )) 
    351351      trifield = triangule(temporary(tmp)*mask, coinmonte = coinmontemask $ 

  • trunk/SRC/ToBeReviewed/PLOTS/DESSINE/plt1d.pro

    r378 r495  
    1111; 1) An array which can be: 
    1212; 
    13 ;   * 2d, 3d or 4d:  array xy, xyz. xyt or xyzt. In this case, the array  
    14 ;     will pass in <pro>moyenne</pro> or <pro>grossemoyenne</pro> to be  
     13;   * 2d, 3d or 4d:  array xy, xyz. xyt or xyzt. In this case, the array 
     14;     will pass in <pro>moyenne</pro> or <pro>grossemoyenne</pro> to be 
    1515;     averaged and become an array 1d. 
    16 ;   * 1d:Nevertheless, the type must be specified in order to we know which  
    17 ;     trace it is about. To have a correct caption, respecify the extraction  
     16;   * 1d:Nevertheless, the type must be specified in order to we know which 
     17;     trace it is about. To have a correct caption, respecify the extraction 
    1818;     zone via BOXZOOM. 
    1919; 2) a structure respecting all criterions specified by <pro>litchamp</pro> 
    … …  
    3333; 
    3434; @keyword BOXZOOM 
    35 ; Vector indicating the geographic zone (3d) on which the extraction of the  
     35; Vector indicating the geographic zone (3d) on which the extraction of the 
    3636; field must be done to do the hovmoeller. 
    3737; 
    … …  
    4343; 6 elements: The extraction is made on Boxzoom 
    4444; 
    45 ; Where lon1, lon2,lat1,lat2,vert1,vert2 are global variables defined at  
     45; Where lon1, lon2,lat1,lat2,vert1,vert2 are global variables defined at 
    4646; the last <pro>domdef</pro> ! 
    4747; 

  • trunk/SRC/ToBeReviewed/PLOTS/DESSINE/pltsc.pro

    r327 r495  
    101101   IF finite(max2) EQ 0 THEN max2 = max(tab2) 
    102102 
    103  
    104103; init plot if not overlay 
    105104 

  • trunk/SRC/ToBeReviewed/PLOTS/DESSINE/pltt.pro

    r493 r495  
    44; Trace hovmoeller graphs: xt,yt,zt,t 
    55; 
    6 ; @categories  
     6; @categories 
    77; Graphics 
    88; 
    … …  
    2323; 2) a structure respecting all criterions specified by <pro>litchamp</pro> 
    2424;    The array contained in the structure respecting criterions of case 1) 
    25 ;  
     25; 
    2626; @param GIVENTYPE 
    2727; 
    … …  
    5252; 6 elements: The extraction is made on Boxzoom 
    5353; 
    54 ; Where lon1, lon2,lat1,lat2,vert1,vert2 are global variables defined at the last  
     54; Where lon1, lon2,lat1,lat2,vert1,vert2 are global variables defined at the last 
    5555; <pro>domdef</pro> ! 
    5656; 
    … …  
    153153; specified min/max are not filled. Note that max values a considered 
    154154; as missing values so cells containing one or more corners with 
    155 ; values above max will have no contours drawn through them.   
     155; values above max will have no contours drawn through them. 
    156156; 
    157157; @keyword STYLE {default=style=0} 
    … …  
    198198; $Id$ 
    199199; 
    200 ; @todo  
     200; @todo 
    201201; seb: definition of parameters, L.426 à 427, L. 492 à 493 
    202202; 
    … …  
    475475      IF keyword_set(strictfill) THEN BEGIN 
    476476        tmp = z2d ge max 
    477         IF total(tmp GE 1) THEN BEGIN  
     477        IF total(tmp GE 1) THEN BEGIN 
    478478          tmp = 1b - byte(extrapolate(tmp, tmp, 1)) 
    479479          key_save = key_periodic & key_periodic = 0 

  • trunk/SRC/ToBeReviewed/PLOTS/DESSINE/pltv.pro

    r479 r495  
    44; Draw 2d plots with TV procedure 
    55; 
    6 ; @categories  
     6; @categories 
    77; find a file 
    88; graphic 
    … …  
    3232; 6 elements: The extraction is made on Boxzoom 
    3333; 
    34 ; Where lon1, lon2, lat1, lat2 are global variables defined at the last  
     34; Where lon1, lon2, lat1, lat2 are global variables defined at the last 
    3535; <pro>domdef</pro> ! 
    3636; 
    … …  
    6060; @keyword _EXTRA 
    6161; Used to pass keywords to <pro>placedessin</pro>, <proidl>TV</proidl>, 
    62 ; <pro>axe</pro>, <pro>legende</pro>, <pro>barrecouleur</pro>,  
     62; <pro>axe</pro>, <pro>legende</pro>, <pro>barrecouleur</pro>, 
    6363; <pro>terminedessin</pro> 
    6464; 

  • trunk/SRC/ToBeReviewed/PLOTS/DESSINE/pltz.pro

    r493 r495  
    3434; 6 elements: The extraction is made on Boxzoom 
    3535; 
    36 ; Where lon1, lon2,lat1,lat2 are global variables defined at the last  
     36; Where lon1, lon2,lat1,lat2 are global variables defined at the last 
    3737; <pro>domdef</pro> ! 
    3838; 
    … …  
    8585; 
    8686; @keyword ZRATIO {default=2./3} 
    87 ; When the drawing has a zoomed part, it is the size ratio between the zoomed  
     87; When the drawing has a zoomed part, it is the size ratio between the zoomed 
    8888; part, hz (zoom height), and the whole drawing, ht (total height). 
    8989; 
    … …  
    115115; @keyword NOMASK 
    116116; activate to suppress the use of the land-sea mask when plotting the field 
    117 ;  
     117; 
    118118; @keyword NO_PARTIALSTEP 
    119119; activate to suppress the use of partial steps (force key_partialstep = 0 within pltz) 
    … …  
    144144; specified min/max are not filled. Note that max values a considered 
    145145; as missing values so cells containing one or more corners with 
    146 ; values above max will have no contours drawn through them.   
     146; values above max will have no contours drawn through them. 
    147147; 
    148148; @keyword STYLE {default=style=0} 
    … …  
    174174; $Id$ 
    175175; 
    176 ; @todo  
     176; @todo 
    177177; seb definition of parameters L.215 à 221 
    178178; 
    … …  
    211211; 
    212212  if n_elements(contour) ne 4 THEN saveboxparam, 'boxparam4pltz.dat' 
    213   key_partialstep = keyword_set(key_partialstep) * (1b - keyword_set(no_partialstep))  
     213  key_partialstep = keyword_set(key_partialstep) * (1b - keyword_set(no_partialstep)) 
    214214;-------------------------------------------------------------- 
    215215;  Reading of the field. 
    … …  
    278278  z2d = reverse(z2d, 2) 
    279279  szmsk = size(mask, /dimensions) 
    280   IF keyword_set(nomask) THEN mask = replicate(1b, szmsk[0], szmsk[1])  
     280  IF keyword_set(nomask) THEN mask = replicate(1b, szmsk[0], szmsk[1]) 
    281281  IF keyword_set(maskdta) THEN mask = byte(fitintobox(maskdta)) 
    282282;----------------------------------------------------------------------------- 
    … …  
    328328  IF keyword_set(strictfill) THEN BEGIN 
    329329    tmp = z2d ge max 
    330     IF total(tmp GE 1) THEN BEGIN  
     330    IF total(tmp GE 1) THEN BEGIN 
    331331      tmp = 1b - byte(extrapolate(tmp, tmp, 1)) 
    332332      key_save = key_periodic & key_periodic = 0 
    … …  
    376376    axis4pltz, type, mask, glammsk, gphimsk, gdepmsk, XXAXIS = xmask, ZZAXIS = zmask, SIN = sin, ZRATIO = zratio, ZOOM = zoom, PROFMAX = profmax, PROFMIN = profmin, _extra = ex 
    377377    szmsk = size(mask, /dimensions) 
    378     IF keyword_set(nomask) THEN mask = replicate(1b, szmsk[0], szmsk[1])  
     378    IF keyword_set(nomask) THEN mask = replicate(1b, szmsk[0], szmsk[1]) 
    379379  ENDIF ELSE BEGIN 
    380380    xmask = xxaxis 

  • trunk/SRC/ToBeReviewed/PLOTS/DESSINE/sbar_plot.pro

    r471 r495  
    22; 
    33; @file_comments 
    4 ; Same thing that bar_plot but compatible with the whole environment  
     4; Same thing that bar_plot but compatible with the whole environment 
    55; (<pro>common</pro> included) 
    66; 

  • trunk/SRC/ToBeReviewed/PLOTS/DESSINE/scontour.pro

    r493 r495  
    22; 
    33; @file_comments 
    4 ; Same thing that contour but compatible with the whole environment  
     4; Same thing that contour but compatible with the whole environment 
    55; (<pro>common</pro> included) 
    66; 
    … …  
    1919; 
    2020; @examples 
    21 ;  
     21; 
    2222;   IDL> z = dist(100) 
    2323;   IDL> scontour, z, nlevels=10,small=[1,2,1],xstyle=1,ystyle=1 

  • trunk/SRC/ToBeReviewed/PLOTS/DESSINE/splot.pro

    r493 r495  
    22; 
    33; @file_comments 
    4 ; Same thing than plot but compatible with the whole environment  
     4; Same thing than plot but compatible with the whole environment 
    55; (<pro>common</pro> included) 
    66; 
    … …  
    2020; @restrictions 
    2121; If NOREINITPLT is not activated, all environment 
    22 ; variables !p, !x, !y, !z are reinitialized by the procedure  
     22; variables !p, !x, !y, !z are reinitialized by the procedure 
    2323; <pro>reinitplt</pro> 
    2424; 
Note: See TracChangeset for help on using the changeset viewer.