Changeset 226 for trunk/SRC/ReadWrite/idl-NetCDF

Timestamp:

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

Author:

pinsard

Message:

corrections of some misspellings in some *.pro

File:

• trunk/SRC/ReadWrite/idl-NetCDF/ncdf_quickread/ncdf_quickread_helper.pro (modified) (17 diffs)

trunk/SRC/ReadWrite/idl-NetCDF/ncdf_quickread/ncdf_quickread_helper.pro

@@ -1 +1 @@
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ;
-; ncdf_quickread_helper.pro - This file contains IDL functions to read netCDF 
-;                             data files into IDL variables. 
+; ncdf_quickread_helper.pro - This file contains IDL functions to read netCDF
+;                             data files into IDL variables.
 ;
 ; Adapted from CDF2IDL.pro
@@ -8 +8 @@
 ;  This file contains the following functions and procedures:
 ;     functions:
-;        ncdf_quickread_getfile - strips the directory and optionally) any 
+;        ncdf_quickread_getfile - strips the directory and optionally) any
 ;                                 suffixes from the path+file
 ;        ncdf_quickread_getdir - returns the directory from the full path+file
@@ -25 +25 @@
 ;  10 Jun 97  S. Rupert     Modified keyword usage.
 ;  03 Feb 98  S. Rupert     Added additional error checking, and warning to
-;                           output script. 
+;                           output script.
 ;  17 Feb 98  S. Rupert     Corrected validation routine to handle instance
 ;                           of name strating with a number and containing a
@@ -58 +58 @@
 ; @examples
 ; Call: file = ncdf_quickread_getfile(fullpath)
-; 
+;
 ; @history
 ;
@@ -68 +68 @@
 on_error,2
 compile_opt hidden
-; Retrieve the postion at which the first '/' character occurs from
+; Retrieve the position at which the first '/' character occurs from
 ; the end of the string.
 dirlen = rstrpos(fullpath, '/')
@@ -111 +111 @@
 ; @examples
 ; Call: dir = ncdf_quickread_getdir(fullpath)
-; 
+;
 ; @history
 ;
@@ -122 +122 @@
 on_error,2
 compile_opt hidden
-; Retrieve the postion at which the first '/' character occurs from
+; Retrieve the position at which the first '/' character occurs from
 ; the end of the string.
 len = rstrpos(fullpath, '/')
@@ -139 +139 @@
 ; @file_comments
 ; This routine ensures that the given name does not start with a number,
-; nor contain a dash.  IDL cannot accept a variable starting with a 
-; number or containing a dash.  If the name starts with a number, an 
-; underscore is prepended to the name, and if it contains a dash, the 
-; dash is replaced with an underscore.  
+; nor contain a dash.  IDL cannot accept a variable starting with a
+; number or containing a dash.  If the name starts with a number, an
+; underscore is prepended to the name, and if it contains a dash, the
+; dash is replaced with an underscore.
 ;
 ; @categories
@@ -149 +149 @@
 ; @param VARNAME
 ; The name of the variable to be read
-; 
+;
 ;
 ; @returns
@@ -158 +158 @@
 ;
 ; @examples
-; 
-; 
+;
+;
 ; @history
 ;
@@ -186 +186 @@
 if (strpos(varname, '9') EQ 0) then name = strcompress("_"+varname)
 
-; If the name contains a dash replace it with an underscore. 
+; If the name contains a dash replace it with an underscore.
 if (strpos(name, '-') NE -1) then begin
    pieces = str_sep(name, '-')
@@ -214 +214 @@
 ; full path to netCDF file of interest
 ;
-; @keyword VERBOSE  
+; @keyword VERBOSE
 ; Set this keyword to return an error message in case of an error.
 ;
@@ -224 +224 @@
 ;
 ; @keyword REFORM
-; see changelog above. 
+; see changelog above
 ;
 ; @returns
@@ -233 +233 @@
 ;
 ; @examples
-; 
-; 
+;
+;
 ; @history
 ;
@@ -274 +274 @@
 
 ; Place the desired variables in local arrays.
-for i=0, ncidinfo.Nvars-1 do begin 
+for i=0, ncidinfo.Nvars-1 do begin
    vardata = NCDF_VARINQ(ncid, i)
    if not subset then begin
@@ -283 +283 @@
    endelse
    if wanted then begin
-       varname = ncdf_quickread_validatename(vardata.Name) 
+       varname = ncdf_quickread_validatename(vardata.Name)
        if keyword_set(prefix) then varname=prefix+varname
        commands=$
@@ -304 +304 @@
 endfor
 
-if (keyword_set(verbose)) then begin 
+if (keyword_set(verbose)) then begin
   for i=0, ncidinfo.Ngatts-1 do begin
      name = NCDF_ATTNAME(ncid, /GLOBAL, i)