Changeset 226 for trunk/SRC/ToBeReviewed/WIDGET/COMPOUND_WIDGET/cw_slide_slice.pro

Timestamp:

03/16/07 10:22:26 (17 years ago)

Author:

pinsard

Message:

corrections of some misspellings in some *.pro

File:

• trunk/SRC/ToBeReviewed/WIDGET/COMPOUND_WIDGET/cw_slide_slice.pro (modified) (16 diffs)

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

@@ -5 +5 @@
 ; @categories
 ; Compound widget
-; 
+;
 ; @param ID
-;
 ;
 ; @param VALUE
@@ -13 +12 @@
 ;
 ; @returns
-; 
-; 
+;
 ; @uses
-; 
-; 
+;
 ; @restrictions
-; 
-; 
+;
 ; @examples
-; 
-; 
+;
 ; @history
-; 
-; 
-; @version 
+;
+; @version
 ; $Id$
 ;-
@@ -49 +43 @@
       widget_control, sliderid, set_value = {slider_min:mini, slider_max:maxi, value:boxzoom[0]<maxi}
       thickness = boxzoom[1]-boxzoom[0]
-   ENDIF ELSE BEGIN 
+   ENDIF ELSE BEGIN
       mini = floor(min([gphit, gphif], max = maxi))
       maxi = ceil(maxi)-thickness
@@ -57 +51 @@
    thicknessval = thicknessuval.choix
    index = where(thicknessval EQ thickness) & index = index[0]
-   if index EQ -1 then BEGIN 
+   if index EQ -1 then BEGIN
       index = 20
       thicknessval[20] = strtrim(thickness, 1)
@@ -73 +67 @@
 ; @categories
 ; Compound widget
-; 
+;
 ; @param EVENT
 ;
-;
 ; @returns
-; 
-; 
+;
 ; @uses
-; 
-; 
+;
 ; @restrictions
-; 
-; 
+;
 ; @examples
-; 
-; 
+;
 ; @history
-; 
-; 
-; @version 
+;
+; @version
 ; $Id$
 ;-
@@ -117 +105 @@
          mini = floor(min([glamt, glamf], max = maxi))
          maxi = ceil(maxi)-thickness
-      ENDIF ELSE BEGIN 
+      ENDIF ELSE BEGIN
          mini = floor(min([gphit, gphif], max = maxi))
          maxi = ceil(maxi)-thickness
@@ -136 +124 @@
 ; print, lon1, mini, maxi
 ;             widget_control, sliderid, set_value = {value:lon1, slider_min_max:[mini, maxi]}
-;          ENDIF ELSE BEGIN 
+;          ENDIF ELSE BEGIN
 ;             mini = floor(min([gphit, glamf], max = maxi))
 ;             maxi = ceil(maxi)
@@ -145 +133 @@
 ; print, 'ds if',firstxt, 0, jpi-1
 ;             widget_control, sliderid, set_value = {value:firstxt, slider_min_max:[0, jpi-1]}
-;          ENDIF ELSE BEGIN 
+;          ENDIF ELSE BEGIN
 ;             widget_control, sliderid, set_value = {value:firstyt, slider_min_max:[0, jpj-1]}
 ;          ENDELSE
@@ -154 +142 @@
    if type EQ 'y' then begin
       boxzoom[0] = slider &  boxzoom[1] = slider+thickness
-   ENDIF ELSE BEGIN 
+   ENDIF ELSE BEGIN
       boxzoom[2] = slider &  boxzoom[3] = slider+thickness
-   ENDELSE 
+   ENDELSE
 ;    ENDIF ELSE BEGIN
 ;       if strpos(type,'y') NE -1 then begin
 ;          boxzoom[0] = glamt[slider, 0] &  boxzoom[1] = glamf[slider+thickness, 0]
-;       ENDIF ELSE BEGIN 
+;       ENDIF ELSE BEGIN
 ;          boxzoom[2] = gphit[0, slider] &  boxzoom[3] = gphif[0, slider+thickness]
-;       ENDELSE 
+;       ENDELSE
 ;    ENDELSE
    widget_control, domainid, set_value = boxzoom
@@ -179 +167 @@
 ;
 ; @keyword BOXZOOM
-; Vector indicating the geographic zone on which we want to cut the map. 
-; If BOXZOOM has : 
+; Vector indicating the geographic zone on which we want to cut the map.
+; If BOXZOOM has :
 ;   1 element : The extraction is made on [lon1, lon2, lat1, lat2, 0.,boxzoom[0]]
 ;   2 elements: The extraction is made on [lon1, lon2, lat1, lat2, boxzoom[0],boxzoom[1]]
 ;   4 elements: The extraction is made on [Boxzoom, 0, max([gdept, gdepw])]
 ;   5 elements: The extraction is made on [Boxzoom[0:3], 0, Boxzoom[4]]
-;   6 elements: The extraction is made on Boxzoom 
+;   6 elements: The extraction is made on Boxzoom
 ; Where lon1, lon2,lat1,lat2 are global variables defined at the last domdef!
 ;
@@ -191 +179 @@
 ; Buttons will be arranged in the number of columns
 ; specified by this keyword.
-; 
+;
 ; @keyword FRAME
 ; Specifies the width of the frame to be drawn around the base.
-; 
+;
 ; @keyword ROW
 ; Buttons will be arranged in the number of rows
 ; specified by this keyword.
-; 
+;
 ; @keyword UVALUE
 ; The user value to be associated with the widget.
-; 
+;
 ; @keyword UNAME
 ; The user name to be associated with the widget.
-; 
+;
 ; @keyword _EXTRA
 ; Used to pass your keywords
-; 
+;
 ; @returns
-; 
-; 
+;
 ; @uses
-; 
-; 
+;
 ; @restrictions
-; 
-; 
+;
 ; @examples
-; 
-; 
+;
 ; @history
-; 
-; 
-; @version 
+;
+; @version
 ; $Id$
-; 
+;
 ; @todo
 ; seb: documenter
@@ -236 +219 @@
 @common
 ;------------------------------------------------
-; cheking exclusive keywords
+; checking exclusive keywords
    column = keyword_set(column)*(1-keyword_set(row))
-   row = keyword_set(row)*(1-keyword_set(column)) +(keyword_set(row) EQ column) 
+   row = keyword_set(row)*(1-keyword_set(column)) +(keyword_set(row) EQ column)
    if NOT keyword_set(uvalue) then uvalue = ''
    if NOT keyword_set(uname) then uname = ''
@@ -247 +230 @@
                       , PRO_SET_VALUE='cw_slide_slice_set_value' $
                       , ROW = row, COLUMN = column, UVALUE = uvalue, UNAME = uname $
-                      , FRAME = frame, _extra = ex)   
+                      , FRAME = frame, _extra = ex)
 ;------------------------------------------------
    if NOT keyword_set(boxzoom) then boxzoom = [lon1, lon2, lat1, lat2]
@@ -264 +247 @@
                           , value = mini > boxzoom[0] < maxi, /column, uname = 'slider' $
                           , uvalue = {name:'slider'})
-   ENDIF ELSE BEGIN 
+   ENDIF ELSE BEGIN
       mini = floor(min([gphit, gphif], max = maxi))
       thickness = boxzoom[3]-boxzoom[2]
@@ -273 +256 @@
    ENDELSE
    index = where(thicknessval EQ thickness) & index = index[0]
-   if index EQ -1 then BEGIN 
+   if index EQ -1 then BEGIN
       index = 20
       thicknessval[20] = strtrim(thickness, 1)
@@ -280 +263 @@
    endif
    widget_control, droplistid, set_value = {droplist_select:index}
-   
+
 ;   if type EQ 'xt' then begin
 ;       mini = floor(min([glamt,glamf], max = maxi))
 ;       maxi = ceil(maxi)
-;    ENDIF ELSE BEGIN 
+;    ENDIF ELSE BEGIN
 ;       mini = floor(min([gphit,gphif], max = maxi))
 ;       maxi = ceil(maxi)
 ;    ENDELSE
-   
+ 
 ;------------------------------------------------
    return, base