Changeset 238 for trunk/SRC/Utilities

Timestamp:

03/27/07 15:43:18 (17 years ago)

Author:

pinsard

Message:

improvements/corrections of some *.pro headers

Location:

trunk/SRC/Utilities

Files:

• find.pro (modified) (3 diffs)
• fitintobox.pro (modified) (5 diffs)

trunk/SRC/Utilities/find.pro

@@ -9 +9 @@
 ; all file_search keywords can be used.
 ;
-; @categories 
+; @categories
 ; find a file
 ;
-; @param FILEIN {in}{required} 
+; @param FILEIN {in}{required}
 ; A scalar or array variable of string type, containing
 ; file names to match. Input names specifications may contain
@@ -20 +20 @@
 ; completed with '.pro'
 ;
-; @keyword FIRSTFOUND 
+; @keyword FIRSTFOUND
 ; activate this keyword to stop looking for the file as soon as we found one.
 ;
-; @keyword IODIRECTORY {default=['.',!path]} 
+; @keyword IODIRECTORY {default=['.',!path]}
 ; A scalar or array variable of string type, containing
 ; directories names where we are looking for the file.
@@ -32 +32 @@
 ; keyword is not taken into account.
 ;
-; @keyword LOOKALLDIR 
+; @keyword LOOKALLDIR
 ; activate to look for the file (with a recursive search if needed)
 ; in . iodir, homedir, !path + the DATA:TestsData directory if it exists.
 ;
-; @keyword NOPRO 
+; @keyword NOPRO
 ; activate to avoid the automatic search of filename completed with '.pro'
 ;
-; @keyword ONLYPRO 
+; @keyword ONLYPRO
 ; force to look only at file ending with .pro
 ;
-; @keyword ONLYNC 
+; @keyword ONLYNC
 ; force to look only at file ending with .nc
 ;
-; @keyword RECURSIVE 
+; @keyword RECURSIVE
 ; performs recursive searching of directory hierarchies.
 ; In a recursive search, find looks recursively for any and all
 ; subdirectories in the file hierarchy rooted at the IODIRECTORY argument.
 ;
-; @keyword REPERTOIRE 
+; @keyword REPERTOIRE
 ; obsolete. keep for compatibility, use directory keyword
 ;
-; @keyword UNIQUE 
+; @keyword UNIQUE
 ; activate to make sure that each element of the output vector is unique.
 ;
-; @keyword TRYFIND 
+; @keyword TRYFIND
 ; if the file was not found and this keyword is activated, find will call
 ; itself with the keywords /LOOKALLDIR and /FIRSTFOUND to try to find
 ; the file we are looking for. Note that if the file was found at the
-; first try this keyword as no effect (which is not the case with LOOKALLDIR) 
+; first try this keyword as no effect (which is not the case with LOOKALLDIR)
 ;
-; @keyword _EXTRA 
+; @keyword _EXTRA
 ; Used to pass keywords
 ;
-; @returns 
+; @returns
 ; A scalar or array variable of string type, containing the
 ; name (with the full path of the matching files. If no files

trunk/SRC/Utilities/fitintobox.pro

@@ -47 +47 @@
     RETURN, report(['Error: ' $
                   , 'the vector size (' + tostr(sz) + ') is incompatible' $
-                  , 'with the the domain dimensions ' $
+                  , 'with the domain dimensions ' $
                   , '[jpi/nx, jpj/ny, jpk/nz, jpt] = [' $
                   + strtrim(jpi, 1) + '/' + strtrim(nx, 1) $
@@ -55 +55 @@
   RETURN, report(['Error: ' $
                   , 'the array dimensions ' + tostr(sz) + ' are incompatible' $
-                  , 'with the the domain dimensions ' $
+                  , 'with the domain dimensions ' $
                   , '[jpi/nx, jpj/ny, jpk/nz, jpt] = [' $
                   + strtrim(jpi, 1) + '/' + strtrim(nx, 1) $
@@ -97 +97 @@
 ; or -1 if there is an error...
 ;
-; @uses 
+; @uses
 ; cm_4mesh
 ; cm_4cal
@@ -107 +107 @@
 ; Error:
 ; the array dimensions [180,148,78] are incompatible
-; with the the domain dimensions
+; with the domain dimensions
 ; [jpi/nx, jpj/ny, jpk/nz, jpt] = [180/41, 148/3, 31/31, 1]
 ; <Expression>    INT       =       -1
@@ -118 +118 @@
 ; @version
 ; $Id$
+;
 ;-
 ;