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

corrections of some misspellings in some *.pro

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/SRC/Interpolation/extrapsmooth.pro

    r202 r226  
    4646;- 
    4747FUNCTION extrapsmooth, in, mskin, x_periodic = x_periodic, MINVAL = minval, MAXVAL = maxval, GE0 = ge0 
    48  
    49   compile_opt strictarr, strictarrsubs  
    5048; 
    51   sz = size(reform(in))   
    52   IF sz[0] NE 2 THEN BEGIN  
     49  compile_opt strictarr, strictarrsubs 
     50; 
     51  sz = size(reform(in)) 
     52  IF sz[0] NE 2 THEN BEGIN 
    5353    print, 'Input arrays must have 2 dimensions' 
    5454    return, -1 
     
    5757  ny = sz[2] 
    5858  IF n_elements(mskin) EQ 1 AND mskin[0] EQ -1 THEN mskin = replicate(1b, nx, ny) 
    59   IF n_elements(mskin) NE nx*ny THEN BEGIN  
     59  IF n_elements(mskin) NE nx*ny THEN BEGIN 
    6060    print, 'input grid mask do not have the good size' 
    6161    return, -1 
     
    6565  whmsk = where(mskin EQ 0, nbr) 
    6666  IF nbr NE 0 THEN out[temporary(whmsk)] = !values.f_nan 
    67 ; add values on each side of the array to avoid bondary effects 
     67; add values on each side of the array to avoid boundary effects 
    6868  nx2 = nx/2 
    6969  ny2 = ny/2 
     
    7474    add2 = out[nx-nx2:nx-1, *] 
    7575    out = [add2, [temporary(out)], add1] 
    76   ENDIF ELSE BEGIN  
     76  ENDIF ELSE BEGIN 
    7777    add = replicate(!values.f_nan, nx2, ny+2*ny2) 
    7878    out = [add, [temporary(out)], add] 
Note: See TracChangeset for help on using the changeset viewer.