source:
trunk/SRC/ReadWrite/idl-NetCDF/ncdf_listdims.pro
@
272
| Last change on this file since 272 was 157, checked in by navarro, 18 years ago | |
|---|---|
|
|
| File size: 348 bytes | |
| Rev | Line | |
|---|---|---|
| [157] | 1 | ;+ |
| 2 | ; @file_comments | |
| 3 | ; | |
| 4 | ; | |
| 5 | ; @categories | |
| 6 | ; | |
| 7 | ; | |
| 8 | ; @param NCID | |
| 9 | ; | |
| 10 | ; | |
| 11 | ; @restrictions | |
| 12 | ; | |
| 13 | ; | |
| 14 | ; @examples | |
| 15 | ; | |
| 16 | ; | |
| 17 | ; @history | |
| 18 | ; | |
| 19 | ; | |
| 20 | ; @version | |
| 21 | ; $Id$ | |
| 22 | ; | |
| 23 | ;- | |
| [70] | 24 | FUNCTION ncdf_listdims,ncid |
| [114] | 25 | ; |
| 26 | compile_opt idl2, strictarrsubs | |
| 27 | ; | |
| [67] | 28 | |
| [70] | 29 | n=(ncdf_inquire(ncid)).ndims |
| [67] | 30 | |
| [70] | 31 | names=strarr(n) |
| [67] | 32 | |
| [70] | 33 | for i=0,n-1 do begin |
| 34 | ncdf_diminq,ncid,i,name,size | |
| 35 | names[i]=name | |
| 36 | endfor | |
| [67] | 37 | |
| [70] | 38 | return,names |
| [67] | 39 | |
| 40 | end |
Note: See TracBrowser
for help on using the repository browser.
