Changeset 157 for trunk/SRC/ReadWrite/readoldopadistcoast.pro

Timestamp:

08/21/06 11:01:50 (18 years ago)

Author:

navarro

Message:

header improvements + xxx doc

File:

• trunk/SRC/ReadWrite/readoldopadistcoast.pro (modified) (2 diffs)

trunk/SRC/ReadWrite/readoldopadistcoast.pro

@@ -8 +8 @@
 ; based on the OPA subroutines dtacof and parctl
 ;
-; @categories for OPA before NetCDF
+; @categories 
+; For OPA
+;
+; @param UNIT
+;
+;
+; @param PARAMS
+; 
+; 
+; @param NUM
+; 
 ;
 ; @returns  
@@ -34 +44 @@
 
 ;+
-; @param filename {in}{required} filename (with the whole path if necessary)
-; @param jpiglo {in}{required}
-; @param jpjglo {in}{required}
-; @param jpk {in}{required}
-; dimensions of the opa grid
+; @file_comments
 ;
-; @keyword IBLOC {default=4096L} ibloc size
-; @keyword JPBYT {default=8L} jpbyt size
-; @keyword NUMREC {default=19L*jpk} number of records in the file.
 ;
-; @history Sebastien Masson (smasson\@lodyc.jussieu.fr)
+; @categories
+; For OPA
+;
+; @param FILENAME {in}{required}
+; Filename (with the whole path if necessary)
+;
+; @param JPIGLO {in}{required}
+;
+;
+; @param JPJGLO {in}{required}
+;
+;
+; @param JPK {in}{required}
+; Dimensions of the opa grid
+;
+; @keyword IBLOC {default=4096L}
+; Ibloc size
+; 
+; @keyword JPBYT {default=8L}
+; Jpbyt size
+; 
+; @keyword NUMREC {default=19L*jpk}
+; Number of records in the file.
+;
+; @history
+; Sebastien Masson (smasson\@lodyc.jussieu.fr)
 ;                      June, 2002
+;
+; @version
+; $Id$
 ;-
 FUNCTION readoldopadistcoast, filename, jpiglo, jpjglo, jpk, IBLOC = ibloc, JPBYT = jpbyt, NUMREC = numrec