123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187 |
- #include "ncdispatch.h"
-
-
-
- int
- nc_inq_ncid(int ncid, const char *name, int *grp_ncid)
- {
- NC* ncp;
- int stat = NC_check_id(ncid,&ncp);
- if(stat != NC_NOERR) return stat;
- return ncp->dispatch->inq_ncid(ncid,name,grp_ncid);
- }
- int
- nc_inq_grps(int ncid, int *numgrps, int *ncids)
- {
- NC* ncp;
- int stat = NC_check_id(ncid,&ncp);
- if(stat != NC_NOERR) return stat;
- return ncp->dispatch->inq_grps(ncid,numgrps,ncids);
- }
- int
- nc_inq_grpname(int ncid, char *name)
- {
- NC* ncp;
- int stat = NC_check_id(ncid,&ncp);
- if(stat != NC_NOERR) return stat;
- return ncp->dispatch->inq_grpname(ncid,name);
- }
- int
- nc_inq_grpname_full(int ncid, size_t *lenp, char *full_name)
- {
- NC* ncp;
- int stat = NC_check_id(ncid,&ncp);
- if(stat != NC_NOERR) return stat;
- return ncp->dispatch->inq_grpname_full(ncid,lenp,full_name);
- }
- int
- nc_inq_grpname_len(int ncid, size_t *lenp)
- {
- int stat = nc_inq_grpname_full(ncid,lenp,NULL);
- return stat;
- }
- int
- nc_inq_grp_parent(int ncid, int *parent_ncid)
- {
- NC* ncp;
- int stat = NC_check_id(ncid,&ncp);
- if(stat != NC_NOERR) return stat;
- return ncp->dispatch->inq_grp_parent(ncid,parent_ncid);
- }
-
- int
- nc_inq_grp_ncid(int ncid, const char *grp_name, int *grp_ncid)
- {
- return nc_inq_ncid(ncid,grp_name,grp_ncid);
- }
- int
- nc_inq_grp_full_ncid(int ncid, const char *full_name, int *grp_ncid)
- {
- NC* ncp;
- int stat = NC_check_id(ncid,&ncp);
- if(stat != NC_NOERR) return stat;
- return ncp->dispatch->inq_grp_full_ncid(ncid,full_name,grp_ncid);
- }
- int
- nc_inq_varids(int ncid, int *nvars, int *varids)
- {
- NC* ncp;
- int stat = NC_check_id(ncid,&ncp);
- if(stat != NC_NOERR) return stat;
- return ncp->dispatch->inq_varids(ncid,nvars,varids);
- }
- int
- nc_inq_dimids(int ncid, int *ndims, int *dimids, int include_parents)
- {
- NC* ncp;
- int stat = NC_check_id(ncid,&ncp);
- if(stat != NC_NOERR) return stat;
- return ncp->dispatch->inq_dimids(ncid,ndims,dimids,include_parents);
- }
- int
- nc_inq_typeids(int ncid, int *ntypes, int *typeids)
- {
- NC* ncp;
- int stat = NC_check_id(ncid,&ncp);
- if(stat != NC_NOERR) return stat;
- return ncp->dispatch->inq_typeids(ncid,ntypes,typeids);
- }
- int
- nc_def_grp(int parent_ncid, const char *name, int *new_ncid)
- {
- NC* ncp;
- int stat = NC_check_id(parent_ncid,&ncp);
- if(stat != NC_NOERR) return stat;
- return ncp->dispatch->def_grp(parent_ncid,name,new_ncid);
- }
- int
- nc_show_metadata(int ncid)
- {
- NC* ncp;
- int stat = NC_check_id(ncid,&ncp);
- if(stat != NC_NOERR) return stat;
- return ncp->dispatch->show_metadata(ncid);
- }
-
|