NetCDF
4.3.2
|
00001 00007 #include "ncdispatch.h" 00008 /* All these functions are part of this named group... */ 00012 00032 int 00033 nc_def_opaque(int ncid, size_t size, const char *name, nc_type *xtypep) 00034 { 00035 NC* ncp; 00036 int stat = NC_check_id(ncid,&ncp); 00037 if(stat != NC_NOERR) return stat; 00038 return ncp->dispatch->def_opaque(ncid,size,name,xtypep); 00039 } 00040 00060 int 00061 nc_inq_opaque(int ncid, nc_type xtype, char *name, size_t *sizep) 00062 { 00063 int class = 0; 00064 int stat = nc_inq_user_type(ncid,xtype,name,sizep,NULL,NULL,&class); 00065 if(stat != NC_NOERR) return stat; 00066 if(class != NC_OPAQUE) stat = NC_EBADTYPE; 00067 return stat; 00068 } 00069 /* End of named group ...*/