Ignore:
Timestamp:
12/13/07 17:22:35 (17 years ago)
Author:
pinsard
Message:

modification of headers : mainly blanks around = sign for keywords in declaration of function and pro

Location:
trunk/SRC/Interpolation
Files:
22 edited

Legend:

Unmodified
Added
Removed

  • trunk/SRC/Interpolation/angle.pro

    r325 r327  
    2323; 
    2424;- 
    25 FUNCTION fsnspp, plam, pphi, DOUBLE = double 
     25FUNCTION fsnspp, plam, pphi, DOUBLE=double 
    2626; 
    2727  compile_opt idl2, strictarrsubs 
    … …  
    103103;- 
    104104PRO angle, fileocemesh, gcosu, gsinu, gcosv, gsinv, gcost, gsint, gcosf, gsinf $ 
    105          , IODIRECTORY = iodirectory, DOUBLE = double 
     105         , IODIRECTORY=iodirectory, DOUBLE=double 
    106106; 
    107107  compile_opt idl2, strictarrsubs 

  • trunk/SRC/Interpolation/clickincell.pro

    r325 r327  
    5959; 
    6060;- 
    61 FUNCTION clickincell, CELLTYPE = celltype, DRAWCELL = drawcell, COLOR = color, ORIGINAL = original, IJ = ij, _EXTRA = extra 
     61FUNCTION clickincell, CELLTYPE=celltype, DRAWCELL=drawcell, COLOR=color $ 
     62                    , ORIGINAL=original, IJ=ij, _EXTRA=extra 
    6263; 
    6364  compile_opt idl2, strictarrsubs 

  • trunk/SRC/Interpolation/compute_fromreg_bilinear_weigaddr.pro

    r325 r327  
    5555PRO compute_fromreg_bilinear_weigaddr, alonin, alatin, olonin, olat $ 
    5656                                     , weig , addr $ 
    57                                      , NONORTHERNLINE = nonorthernline $ 
    58                                      , NOSOUTHERNLINE = nosouthernline 
     57                                     , NONORTHERNLINE=nonorthernline $ 
     58                                     , NOSOUTHERNLINE=nosouthernline 
    5959; 
    6060  compile_opt idl2, strictarrsubs 

  • trunk/SRC/Interpolation/compute_fromreg_imoms3_weigaddr.pro

    r325 r327  
    5858;- 
    5959PRO compute_fromreg_imoms3_weigaddr, alonin, alatin, olonin, olat, weig, addr $ 
    60                                    , NONORTHERNLINE = nonorthernline, $ 
    61                                      NOSOUTHERNLINE = nosouthernline 
     60                                   , NONORTHERNLINE=nonorthernline, $ 
     61                                     NOSOUTHERNLINE=nosouthernline 
    6262; 
    6363  compile_opt idl2, strictarrsubs 

  • trunk/SRC/Interpolation/cutpar.pro

    r325 r327  
    6464; 
    6565;- 
    66 FUNCTION cutpar, x0, y0, x1, y1, x2, y2, x3, y3, n, ENDPOINTS = endpoints, ONSPHERE = onsphere 
     66FUNCTION cutpar, x0, y0, x1, y1, x2, y2, x3, y3, n $ 
     67               , ENDPOINTS=endpoints, ONSPHERE=onsphere 
    6768; 
    6869  compile_opt idl2, strictarrsubs 

  • trunk/SRC/Interpolation/cutsegment.pro

    r325 r327  
    4949; 
    5050;- 
    51 FUNCTION cutsegment, x0, y0, x1, y1, n, ENDPOINTS = endpoints, ONSPHERE = onsphere 
     51FUNCTION cutsegment, x0, y0, x1, y1, n $ 
     52                   , ENDPOINTS=endpoints, ONSPHERE=onsphere 
    5253; 
    5354  compile_opt idl2, strictarrsubs 

  • trunk/SRC/Interpolation/extrapolate.pro

    r325 r327  
    5454; 
    5555;- 
    56 FUNCTION extrapolate, zinput, maskinput, nb_iteration, X_PERIODIC = x_periodic $ 
    57                       , MINVAL = minval, MAXVAL = maxval, GE0 = ge0, _EXTRA = ex 
     56FUNCTION extrapolate, zinput, maskinput, nb_iteration, X_PERIODIC=x_periodic $ 
     57                      , MINVAL=minval, MAXVAL=maxval, GE0=ge0, _EXTRA=ex 
    5858; 
    5959  compile_opt idl2, strictarrsubs 

  • trunk/SRC/Interpolation/extrapsmooth.pro

    r325 r327  
    4949; $Id$ 
    5050;- 
    51 FUNCTION extrapsmooth, in, mskin, X_PERIODIC = x_periodic, MINVAL = minval, MAXVAL = maxval, GE0 = ge0, _EXTRA = ex 
     51FUNCTION extrapsmooth, in, mskin, X_PERIODIC=x_periodic $ 
     52                     , MINVAL=minval, MAXVAL=maxval, GE0=ge0, _EXTRA=ex 
    5253; 
    5354  compile_opt strictarr, strictarrsubs 

  • trunk/SRC/Interpolation/file_interp.pro

    r305 r327  
    44; 
    55;- 
    6 FUNCTION call_interp2d, data, inlon, inlat, inmask, outlon, outlat, INIRR = inirr, METHOD = method, SMOOTH = smooth, WEIG = weig, ADDR = addr, NAN_VALUE = NaN_value, _extra = ex 
     6FUNCTION call_interp2d, data, inlon, inlat, inmask, outlon, outlat $ 
     7                      , INIRR=inirr, METHOD=method, SMOOTH=smooth $ 
     8                      , WEIG=weig, ADDR=addr, NAN_VALUE=NaN_value, _EXTRA=ex 
    79; 
    810  compile_opt idl2, strictarrsubs 
    … …  
    207209; 
    208210;- 
    209 PRO file_interp, filein, fileout, gridout, GRIDIN = gridin, MASKIN = maskin, MASKOUT = maskout $ 
    210                  , KEEP = keep, REMOVE = remove, METHOD = method, SMOOTH = smooth $ 
    211                  , SET_XDIMNAME = set_xdimname, SET_YDIMNAME = set_ydimname $ 
    212                  , SET_XAXISNAME = set_xaxisname, SET_YAXISNAME = set_yaxisname $ 
    213                  , INMASKNAME = inmaskname, ININVMASK = ininvmask, INUSEASMASK = inuseasmask $ 
    214                  , INMISSING_VALUE = inmissing_value, INADDSCL_BEFORE = inaddscl_before $ 
    215                  , OUTMASKNAME = outmaskname, OUTINVMASK = outinvmask, OUTUSEASMASK = outuseasmask $ 
    216                  , OUTMISSING_VALUE = outmissing_value, OUTADDSCL_BEFORE = outaddscl_before $ 
    217                  , NAN_VALUE = NaN_value, WEIG = weig, ADDR = addr $ 
    218                  , INXAXISNAME = inxaxisname, INYAXISNAME = inyaxisname $ 
    219                  , OUTXAXISNAME = outxaxisname, OUTYAXISNAME = outyaxisname, _EXTRA = ex 
     211PRO file_interp, filein, fileout, gridout, GRIDIN=gridin, MASKIN=maskin, MASKOUT=maskout $ 
     212               , KEEP=keep, REMOVE=remove, METHOD=method, SMOOTH=smooth $ 
     213               , SET_XDIMNAME=set_xdimname, SET_YDIMNAME=set_ydimname $ 
     214               , SET_XAXISNAME=set_xaxisname, SET_YAXISNAME=set_yaxisname $ 
     215               , INMASKNAME=inmaskname, ININVMASK=ininvmask $ 
     216               , INUSEASMASK=inuseasmask $ 
     217               , INMISSING_VALUE=inmissing_value $ 
     218               , INADDSCL_BEFORE=inaddscl_before $ 
     219               , OUTMASKNAME=outmaskname, OUTINVMASK=outinvmask $ 
     220               , OUTUSEASMASK=outuseasmask $ 
     221               , OUTMISSING_VALUE=outmissing_value $ 
     222               , OUTADDSCL_BEFORE=outaddscl_before $ 
     223               , NAN_VALUE=NaN_value, WEIG=weig, ADDR=addr $ 
     224               , INXAXISNAME=inxaxisname, INYAXISNAME=inyaxisname $ 
     225               , OUTXAXISNAME=outxaxisname, OUTYAXISNAME=outyaxisname $ 
     226               , _EXTRA=ex 
    220227; 
    221228  compile_opt idl2, strictarrsubs 

  • trunk/SRC/Interpolation/fromirr.pro

    r325 r327  
    9090FUNCTION fromirr, method, datain, lonin, latin, mskin, lonout, latout $ 
    9191                , mskout $ 
    92                 , WEIG = weig, ADDR = addr, _EXTRA = ex 
     92                , WEIG=weig, ADDR=addr, _EXTRA=ex 
    9393; 
    9494  compile_opt strictarr, strictarrsubs 

  • trunk/SRC/Interpolation/fromreg.pro

    r325 r327  
    9090;- 
    9191FUNCTION fromreg, method, datain, lonin, latin, lonout, latout $ 
    92                   , WEIG = weig, ADDR = addr $ 
    93                   , NONORTHERNLINE = nonorthernline $ 
    94                   , NOSOUTHERNLINE = nosouthernline, _EXTRA = ex 
     92                  , WEIG=weig, ADDR=addr $ 
     93                  , NONORTHERNLINE=nonorthernline $ 
     94                  , NOSOUTHERNLINE=nosouthernline, _EXTRA=ex 
    9595; 
    9696  compile_opt idl2, strictarrsubs 

  • trunk/SRC/Interpolation/get_gridparams.pro

    r325 r327  
    7171; 
    7272;- 
    73 PRO get_gridparams, in1,   in2,   in3,     in4, in5, in6, in7, in8, DOUBLE = double 
     73PRO get_gridparams, in1, in2, in3, in4, in5, in6, in7, in8 $ 
     74                  , DOUBLE=double 
     75; 
    7476;                  file, lonname, latname, lon, lat, jpi, jpj, n_dimensions 
    75 ;                   lon,   lat,   jpi,    jpj, n_dimensions 
     77;                  lon,      lat,     jpi, jpj, n_dimensions 
    7678; 
    7779  compile_opt idl2, strictarrsubs 

  • trunk/SRC/Interpolation/inquad.pro

    r325 r327  
    8181; 
    8282;- 
    83 FUNCTION inquad, x, y, x1, y1, x2, y2, x3, y3, x4, y4, ONSPHERE = onsphere,  DOUBLE = double, DELTA = delta, NOPRINT = noprint, NEWCOORD = newcoord 
     83FUNCTION inquad, x, y, x1, y1, x2, y2, x3, y3, x4, y4 $ 
     84               , ONSPHERE=onsphere,  DOUBLE=double, DELTA=delta $ 
     85               , NOPRINT=noprint, NEWCOORD=newcoord 
    8486; 
    8587  compile_opt idl2, strictarrsubs 

  • trunk/SRC/Interpolation/inrecgrid.pro

    r325 r327  
    5555; 
    5656;- 
    57 FUNCTION inrecgrid, x1d, y1d, left, bottom, OUTPUT2D = output2d, CHECKOUT = checkout 
     57FUNCTION inrecgrid, x1d, y1d, left, bottom $ 
     58                  , OUTPUT2D=output2d, CHECKOUT=checkout 
    5859; 
    5960  compile_opt idl2, strictarrsubs 

  • trunk/SRC/Interpolation/lbcorca.pro

    r297 r327  
    4242; 
    4343;- 
    44 FUNCTION lbcorca, arr, grid, psign, VERBOSE = verbose, CORRECTION = correction 
     44FUNCTION lbcorca, arr, grid, psign, VERBOSE=verbose, CORRECTION=correction 
    4545; 
    4646  compile_opt idl2, strictarrsubs 

  • trunk/SRC/Interpolation/ll_narcs_distances.pro

    r325 r327  
    6868; 
    6969;- 
    70 FUNCTION ll_narcs_distances, lon0, lat0, arc_dist, az, DEGREES = degs 
     70FUNCTION ll_narcs_distances, lon0, lat0, arc_dist, az, DEGREES=degs 
    7171; 
    7272  compile_opt idl2, strictarrsubs 

  • trunk/SRC/Interpolation/map_npoints.pro

    r325 r327  
    102102; 
    103103;- 
    104 FUNCTION map_npoints, lon0, lat0, lon1, lat1, AZIMUTH = azimuth $ 
    105  , RADIANS = radians, RADIUS = radius, MIDDLE = middle, TWO_BY_TWO = two_by_two 
     104FUNCTION map_npoints, lon0, lat0, lon1, lat1, AZIMUTH=azimuth $ 
     105                    , RADIANS=radians, RADIUS=radius, MIDDLE=middle $ 
     106                    , TWO_BY_TWO=two_by_two 
    106107; 
    107108 compile_opt idl2, strictarrsubs 

  • trunk/SRC/Interpolation/neighbor.pro

    r325 r327  
    4646; 
    4747;- 
    48 FUNCTION neighbor, p0lon, p0lat, neighlon, neighlat, SPHERE = sphere, DISTANCE = distance, RADIANS = radians 
     48FUNCTION neighbor, p0lon, p0lat, neighlon, neighlat $ 
     49                 , SPHERE=sphere, DISTANCE=distance, RADIANS=radians 
    4950; 
    5051  compile_opt idl2, strictarrsubs 

  • trunk/SRC/Interpolation/quadrilateral2square.pro

    r325 r327  
    7878; 
    7979;- 
    80 FUNCTION quadrilateral2square, x0in, y0in, x1in, y1in, x2in, y2in, x3in, y3in, xxin, yyin, PERF = perf, DOUBLE = double 
     80FUNCTION quadrilateral2square, x0in, y0in, x1in, y1in, x2in, y2in $ 
     81                             , x3in, y3in, xxin, yyin $ 
     82                             , PERF=perf, DOUBLE=double 
    8183; 
    8284  compile_opt idl2, strictarrsubs 

  • trunk/SRC/Interpolation/spl_incr.pro

    r325 r327  
    137137;    boundary is set to zero, resulting in a "natural spline." 
    138138;- 
    139 FUNCTION spl_incr, x, y, x2, YP0 = yp0, YPN_1 = ypn_1 
     139FUNCTION spl_incr, x, y, x2, YP0=yp0, YPN_1=ypn_1 
    140140; 
    141141  compile_opt idl2, strictarrsubs 

  • trunk/SRC/Interpolation/spl_keep_mean.pro

    r325 r327  
    7474; 
    7575;- 
    76 FUNCTION spl_keep_mean, x, yin, x2, YP0 = yp0, YPN_1 = ypn_1, GE0 = ge0 
     76FUNCTION spl_keep_mean, x, yin, x2, YP0=yp0, YPN_1=ypn_1, GE0=ge0 
    7777; 
    7878  compile_opt idl2, strictarrsubs 

  • trunk/SRC/Interpolation/square2quadrilateral.pro

    r325 r327  
    7070; 
    7171;- 
    72 FUNCTION square2quadrilateral, x0in, y0in, x1in, y1in, x2in, y2in, x3in, y3in, xxin, yyin, DOUBLE = double 
     72FUNCTION square2quadrilateral, x0in, y0in, x1in, y1in, x2in, y2in $ 
     73                             , x3in, y3in, xxin, yyin $  
     74                             , DOUBLE=double 
    7375; 
    7476; Warning, wrong definition of (x2,y2) and (x3,y3) at the bottom of 
Note: See TracChangeset for help on using the changeset viewer.