Changeset 155 for trunk/SRC/Grid
- Timestamp:
- 08/11/06 16:32:05 (18 years ago)
- Location:
- trunk/SRC/Grid
- Files:
-
- 6 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/SRC/Grid/changemsk.pro
r152 r155 3 3 ;------------------------------------------------------------ 4 4 ; 5 ; @file_comments add land points on a 2D land-sea mask 5 ; @file_comments add land points on a 2D land-sea mask wit mouse clicking 6 6 ; 7 7 ; @categories grid … … 13 13 ; 14 14 ; @keyword NOUSEINFOS activite to supress the printed message explaining 15 ; how to use tvplus15 ; how to use changemsk 16 16 ; 17 17 ; @returns newmsk the new 2D land-sea mask … … 31 31 ;------------------------------------------------------------ 32 32 ;------------------------------------------------------------ 33 function changemsk, tab, CELLSIZE = cellsize33 function changemsk, tab, CELLSIZE = cellsize, NOUSEINFOS = nouseinfos 34 34 ; 35 35 compile_opt idl2, strictarrsubs -
trunk/SRC/Grid/micromeshmask.pro
r134 r155 1 ;------------------------------------------------------ 1 2 ;+ 2 3 ; 3 ; @file_comments reduce the size of the NetCDF meshmask created by OPA by 4 ; using bit (and not byte) format for the masks and the float format 5 ; for the other fields. 6 ; 7 ; @categories for OPA meshmask files 8 ; 4 ; @hidden 5 ; @categories netcdf 9 6 ; @param inid {in}{required} 10 7 ; @param outid {in}{required} 11 8 ; @param inname {in}{required} 12 ; @param outname {in}{optional} 13 ; 14 ; @history 15 ; July 2004 Sebastien Masson (smasson\@lodyc.jussieu.fr) 16 ; 17 ; @version $Id$ 9 ; @param outname {in}{optional}{default=inname} 18 10 ; 19 11 ;- 20 ;------------------------------------------------------21 12 ;------------------------------------------------------ 22 13 PRO ncdf_transfer, inid, outid, inname, outname … … 29 20 RETURN 30 21 END 22 ;------------------------------------------------------ 31 23 ; 32 24 ;+ 25 ; @file_comments reduce the size of the NetCDF meshmask created by OPA by 26 ; using bit (and not byte) format for the masks and the float format 27 ; for the other variables 28 ; 29 ; @categories for OPA meshmask files 33 30 ; 34 31 ; @param ncfilein {in}{required} … … 50 47 ; IDL> micromeshmask, 'meshmask_ORCA_R05.nc',iodir=meshdir 51 48 ; 49 ; @history 50 ; July 2004 Sebastien Masson (smasson\@lodyc.jussieu.fr) 51 ; 52 ; @version $Id$ 53 ; 52 54 ;- 55 ;------------------------------------------------------ 53 56 PRO micromeshmask, ncfilein, ncfileout, IODIR = iodir 54 57 ; -
trunk/SRC/Grid/ncdf_meshread.pro
r134 r155 33 33 ; 34 34 ; @keyword GETDIMENSIONS 35 ; Activate this keywords if you only want to know the dimension 36 ; of the domain stored in the mesh file. This dimensions will be 37 ; defined in jpiglo, jpjglo, jpkglo (cm_4mesh common variables) 35 38 ; 36 39 ; @keyword PERIODIC = 0 or 1 to force the manual definition of -
trunk/SRC/Grid/restoreboxparam.pro
r134 r155 5 5 ; 6 6 ; @file_comments restore all the zoom parameters (defined by calling domdef) 7 ; perviously defined by saveboxparam 7 ; perviously defined by saveboxparam 8 ; 9 ; @param filename {in}{required} 10 ; a scalar string defining the file name 11 ; 12 ; @uses cm_4mesh (and cm_demomode_used if we are in demo mode) 13 ; 14 ; @restrictions call def_myuniquetmpdir, if myuniquetmpdir is undefined: 15 ; => define, create and add it to !path 8 16 ; 9 17 ; @examples 10 18 ; IDL> restoreboxparam, filename 11 19 ; 12 ; @param filename {in}{required} a scalar string defining the file name13 ;14 ; @uses cm_4mesh and cm_demomode_used if we are in demo mode15 ;16 ; @restrictions all def_myuniquetmpdir, if myuniquetmpdir is undefined:17 ; => define, create and add it to !path18 ;19 20 ; @history Sebastien Masson (smasson\@lodyc.jussieu.fr) 20 21 ; July 2005 -
trunk/SRC/Grid/saveboxparam.pro
r134 r155 5 5 ; 6 6 ; @file_comments save all the zoom parameters (defined by calling domdef) 7 ; in a file (using save command) located in myuniquetmpdir 8 ; (common variable defined by def_myuniquetmpdir) 7 ; in a file (using save command) located in myuniquetmpdir 8 ; (common variable defined by def_myuniquetmpdir) 9 ; 10 ; @param filename {in}{required} a scalar string defining the file name 11 ; 12 ; @uses cm_4mesh (and cm_demomode_used if we are in demo mode) 13 ; 14 ; @restrictions call def_myuniquetmpdir, if myuniquetmpdir is undefined: 15 ; => define, create and add it to !path 9 16 ; 10 17 ; @examples 11 18 ; IDL> saveboxparam, filename 12 ;13 ; @param filename {in}{required} a scalar string defining the file name14 ;15 ; @uses cm_4mesh and cm_demomode_used if we are in demo mode16 ;17 ; @restrictions call def_myuniquetmpdir, if myuniquetmpdir is undefined:18 ; => define, create and add it to !path19 19 ; 20 20 ; @history Sebastien Masson (smasson\@lodyc.jussieu.fr) -
trunk/SRC/Grid/smallmeshmask.pro
r134 r155 1 ;------------------------------------------------------ 1 2 ;+ 2 3 ; 3 ; 4 ; @categories for OPA meshmask files 5 ; 4 ; @hidden 5 ; @categories netcdf 6 6 ; @param inid {in}{required} 7 7 ; @param outid {in}{required} 8 8 ; @param inname {in}{required} 9 ; @param outname {in}{optional} 10 ; 11 ; @history 12 ; July 2004 Sebastien Masson (smasson\@lodyc.jussieu.fr) 13 ; 14 ; @version $Id$ 9 ; @param outname {in}{optional}{default=inname} 15 10 ; 16 11 ;- 17 ;------------------------------------------------------18 12 ;------------------------------------------------------ 19 13 PRO ncdf_transfer, inid, outid, inname, outname … … 26 20 RETURN 27 21 END 22 ;------------------------------------------------------ 28 23 ; 29 24 ;+ 30 25 ; @file_comments reduce the size of the NetCDF meshmask created by OPA by 31 26 ; using byte format for the masks and the float format for the other 32 ; fields. 33 ; 34 ; @keyword IODIR to define the files path. 27 ; variables. 28 ; 29 ; @categories for OPA meshmask files 30 ; 35 31 ; @param ncfilein {in}{required} 36 32 ; 1) the name of the meshmask file to be reduced. In that case, … … 45 41 ; the name of the reduced meshmask file. 46 42 ; 43 ; @keyword IODIR to define the files path. 44 ; 47 45 ; @examples 48 46 ; IDL> meshdir='/d1fes2-raid2/smasson/DATA/ORCA05/' 49 47 ; IDL> smallmeshmask, 'meshmask_ORCA_R05.nc',iodir=meshdir 50 48 ; 51 ; @categories for OPA meshmask files52 ;53 49 ; @history 54 50 ; July 2004 Sebastien Masson (smasson\@lodyc.jussieu.fr) … … 57 53 ; 58 54 ;- 55 ;------------------------------------------------------ 59 56 PRO smallmeshmask, ncfilein, ncfileout, IODIR = iodir 60 57 ;
Note: See TracChangeset
for help on using the changeset viewer.