add.c#46add_var (testivar) /* add the variable ivar to the netcdf test */
#48     struct cdfvar *ivar;
#59    test->vars[test->nvars].name = (char *) emalloc(strlen(ivar->name) + 1);
#60    (void) strcpy(test->vars[test->nvars].nameivar->name);
#61    test->vars[test->nvars].type = ivar->type;
#62    test->vars[test->nvars].ndims = ivar->ndims;
#63    test->vars[test->nvars].dims = (int *) emalloc(sizeof(int)*ivar->ndims);
#64    for (i = 0; i < ivar->ndimsi++)
#65      test->vars[test->nvars].dims[i] = ivar->dims[i];
genbin.c#32    int idimivariatt;
#104 for(ivar = 0; ivar < nvarsivar++) {
#105            Symbolvsym = (Symbol*)listget(vardefs,ivar);
#132 for(ivar = 0; ivar < nvarsivar++) {
#133            Symbolvar = (Symbol*)listget(vardefs,ivar);
#167            for(ivar = 0; ivar < nvarsivar++) {
#168                Symbolvsym = (Symbol*)listget(vardefs,ivar);
genc.c#41    int idimivariattmaxdims;
#95        for(ivar=0;ivar<nvars;ivar++) {
#97            Symbolvar = (Symbol*)listget(vardefs,ivar);
#194    for(ivar = 0; ivar < nvarsivar++) {
#195      Symbolvsym = (Symbol*)listget(vardefs,ivar);
#203 for(ivar = 0; ivar < nvarsivar++) {
#204            Symbolvsym = (Symbol*)listget(vardefs,ivar);
#211 for(ivar = 0; ivar < nvarsivar++) {
#212            Symbolvsym = (Symbol*)listget(vardefs,ivar);
#220     for(ivar = 0; ivar < nvarsivar++) {
#221                Symbolvsym = (Symbol*)listget(vardefs,ivar);
#330 for(ivar = 0; ivar < nvarsivar++) {
#331            Symbolvsym = (Symbol*)listget(vardefs,ivar);
#406            for(ivar = 0; ivar < nvarsivar++) {
#407                Symbolvsym = (Symbol*)listget(vardefs,ivar);
genf77.c#50    int idimivariatt;
#107 for(ivar = 0; ivar < nvarsivar++) {
#108            Symbolvsym = (Symbol*)listget(vardefs,ivar);
#115 for(ivar = 0; ivar < nvarsivar++) {
#116            Symbolvsym = (Symbol*)listget(vardefs,ivar);
#126 for(ivar = 0; ivar < nvarsivar++) {
#127            Symbolvsym = (Symbol*)listget(vardefs,ivar);
#137 for(ivar = 0; ivar < nvarsivar++) {
#138            Symbolvsym = (Symbol*)listget(vardefs,ivar);
#249 for(ivar = 0; ivar < nvarsivar++) {
#250            Symbolvsym = (Symbol*)listget(vardefs,ivar);
#323            for(ivar = 0; ivar < nvarsivar++) {
#324                Symbolvsym = (Symbol*)listget(vardefs,ivar);
#338            for(ivar = 0; ivar < nvarsivar++) {
#340                Symbolvsym = (Symbol*)listget(vardefs,ivar);
genj.c#43    int idimivariattmaxdims;
#90    for(ivar = 0; ivar < nvarsivar++) {
#91      Symbolvsym = (Symbol*)listget(vardefs,ivar);
#133        for(ivar = 0; ivar < nvarsivar++) {
#134            Symbolvsym = (Symbol*)listget(vardefs,ivar);
#191            for(ivar = 0; ivar < nvarsivar++) {
#192                Symbolvsym = (Symbol*)listget(vardefs,ivar);
genlib.c#40    int idimivariatt;
#55    for (ivar = 0; ivar < nvarsivar++) {
#57   vars[ivar].name,
#58   vars[ivar].type,
#59   vars[ivar].ndims,
#60   vars[ivar].dims,
#209    int idimivariattjattmaxdims;
#260    for (ivar = 0; ivar < nvarsivar++)
#261      if (vars[ivar].ndims > maxdims)
#262 maxdims = vars[ivar].ndims;
#267 for (ivar = 0; ivar < nvarsivar++) {
#268     sprintf(stmnt, "   int %s_id;", vars[ivar].lname);
#274 for (ivar = 0; ivar < nvarsivar++) {
#275     sprintf(stmnt, "#  define RANK_%s %d", vars[ivar].lname,
#276     vars[ivar].ndims);
#282     for (ivar = 0; ivar < nvarsivar++) {
#283 if (vars[ivar].ndims > 0) {
#285     vars[ivar].lnamevars[ivar].lname);
#361 for (ivar = 0; ivar < nvarsivar++) {
#363     for (idim = 0; idim < vars[ivar].ndimsidim++) {
#366 vars[ivar].lname,
#368 dims[vars[ivar].dims[idim]].lname);
#371     if (vars[ivar].ndims > 0) { /* a dimensioned variable */
#374 vars[ivar].name,
#375 nctype(vars[ivar].type),
#376 vars[ivar].lname,
#377 vars[ivar].lname,
#378 vars[ivar].lname);
#382 vars[ivar].name,
#383 nctype(vars[ivar].type),
#384 vars[ivar].lname,
#385 vars[ivar].lname);
#577    int idimivariattjattitypemaxdims;
#637    for (ivar = 0; ivar < nvarsivar++)
#638      if (vars[ivar].ndims > maxdims)
#639 maxdims = vars[ivar].ndims;
#643 for (ivar = 0; ivar < nvarsivar++) {
#644     sprintf(stmnt, "integer  %s_id", vars[ivar].lname);
#649 for (ivar = 0; ivar < nvarsivar++) {
#650     sprintf(stmnt, "integer  %s_rank", vars[ivar].lname);
#653 for (ivar = 0; ivar < nvarsivar++) {
#654     sprintf(stmnt, "parameter (%s_rank = %d)", vars[ivar].lname,
#655     vars[ivar].ndims);
#660 for (ivar = 0; ivar < nvarsivar++) {
#661     if (vars[ivar].ndims > 0) {
#663 vars[ivar].lnamevars[ivar].lname);
#672 for (ivar = 0; ivar < nvarsivar++) {
#673     struct vars *v = &vars[ivar];
#766 for (ivar = 0; ivar < nvarsivar++) {
#767     for (idim = 0; idim < vars[ivar].ndimsidim++) {
#769 vars[ivar].lname,
#770 vars[ivar].ndims - idim, /* reverse dimensions */
#771 dims[vars[ivar].dims[idim]].lname);
#774     if (vars[ivar].ndims > 0) { /* a dimensioned variable */
#777 vars[ivar].name,
#778 ftypename(vars[ivar].type),
#779 vars[ivar].lname,
#780 vars[ivar].lname,
#781 vars[ivar].lname);
#785 vars[ivar].name,
#786 ftypename(vars[ivar].type),
#787 vars[ivar].lname,
#788 vars[ivar].lname);
#1285    int ivar;
#1287    for (ivar = 0; ivar < nvarsivar++) {
#1288 if (vars[ivar].ndims > 0 && vars[ivar].dims[0] == rec_dim) {
#1290     for (jdim = 0; jdim < vars[ivar].ndimsjdim++) {
#1291 if (vars[ivar].dims[jdim] == idim)
#1330    int ivar;
#1338    for (ivar = 0; ivar < nvarsivar++) {
#1339 struct vars *v = &vars[ivar];
#1351        for (ivar = 0; ivar < nvarsivar++) {
#1352            struct vars *v = &vars[ivar];
#1376        for (ivar = 0; ivar < nvarsivar++) {
#1377            struct vars *v = &vars[ivar];
#1394 for (ivar = 0; ivar < nvarsivar++) {
#1395     struct vars *v = &vars[ivar];
#1426 for (ivar = 0; ivar < nvarsivar++) {
#1427     struct vars *v = &vars[ivar];
#1433 for (ivar = 0; ivar < nvarsivar++) {
#1434     struct vars *v = &vars[ivar];
#1443 for (ivar = 0; ivar < nvarsivar++) {
#1444     struct vars *v = &vars[ivar];
#1456        for (ivar = 0; ivar < nvarsivar++) {
#1457            struct vars *v = &vars[ivar];
#1499        for (ivar = 0; ivar < nvarsivar++) {
#1500            struct vars *v = &vars[ivar];
#1518 for (ivar = 0; ivar < nvarsivar++) {
#1519     struct vars *v = &vars[ivar];
nccopy.c#777copy_atts(int igrp, int ivar, int ogrp, int ovar)
#783    NC_CHECK(nc_inq_varnatts(igrpivar, &natts));
#787 NC_CHECK(nc_inq_attname(igrpivariattname));
#788 NC_CHECK(nc_copy_att(igrpivarnameogrpovar));
#1224    size_t ivar;
#1226    for (ivar = 0; ivar < nfixed_varsivar++) {
#1227 int varid = fixed_varids[ivar];
#1258    size_t ivar;
#1270    for (ivar = 0; ivar < nrec_varsivar++) {
#1279 varid = rec_varids[ivar];
#1282 start[ivar] = (size_t *) emalloc(ndims * sizeof(size_t));
#1283 count[ivar] = (size_t *) emalloc(ndims * sizeof(size_t));
#1292     start[ivar][ii] = 0;
#1293     count[ivar][ii] = dimlen;
#1295 start[ivar][0] = 0;
#1296 count[ivar][0] = 1; /* 1 record */
#1297 buf[ivar] = (void *) emalloc(nvals * value_size);
#1299 NC_CHECK(nc_inq_varid(ogrpvarname, &rec_ovarids[ivar]));
#1306 for (ivar = 0; ivar < nrec_varsivar++) {
#1308     varid = rec_varids[ivar];
#1309     ovarid = rec_ovarids[ivar];
#1310     start[ivar][0] = irec;
#1312        start[ivar], count[ivar], buf[ivar]));
#1315    for (ivar = 0; ivar < nrec_varsivar++) {
#1316 if(start[ivar])
#1317     free(start[ivar]);
#1318 if(count[ivar])
#1319     free(count[ivar]);
#1325    for (ivar = 0; ivar < nrec_varsivar++) {
#1326 if(buf[ivar]) {
#1327     free(buf[ivar]);
ncd2dispatch.c#1946    int ivar;
#1950    for(ivar=0;ivar<nclistlength(dapcomm->cdf.ddsroot->tree->varnodes);ivar++) {
#1951        CDFnodevar = (CDFnode*)nclistget(dapcomm->cdf.ddsroot->tree->varnodes,ivar);


HyperKWIC - Version 7.20DA executed at 11:37 on 27 Oct 2017 | Polyhedron Solutions - INTERNAL USE | COMMERCIAL (Any O/S) SN 4AKIed