file_id
|
IN:
|
File identifier returned by Hopen
|
vgroup_ref
|
IN:
|
Reference number of the previous vgroup
|
int32 file_id; /* id of an opened HDF file */ int32 vgroup_ref; file_id = Hopen("myfile.hdf",DFACC_READ,0); Vstart(file_id); vgroup_ref = -1; while (1) { vgroup_ref = Vgetid(file_id, vgroup_ref); if (vgroup_ref == -1) break; printf("found vgroup with id %d\n", vgroup_ref); } Vend(file_id); Hclose(file_id);
FORTRAN
|
integer function vfgid(file_id, vgroup_ref)
|
|
integer file_id, vgroup_ref
|