add.c#46
add_var (test, ivar)		/* 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].name, ivar->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->ndims; i++)
#65
      test->vars[test->nvars].dims[i] = ivar->dims[i];
genbin.c#32
    int idim, ivar, iatt;
#104
	for(ivar = 0; ivar < nvars; ivar++) {
#105
            Symbol* vsym = (Symbol*)listget(vardefs,ivar);
#132
	for(ivar = 0; ivar < nvars; ivar++) {
#133
            Symbol* var = (Symbol*)listget(vardefs,ivar);
#167
            for(ivar = 0; ivar < nvars; ivar++) {
#168
                Symbol* vsym = (Symbol*)listget(vardefs,ivar);
genc.c#41
    int idim, ivar, iatt, maxdims;
#95
        for(ivar=0;ivar<nvars;ivar++) {
#97
            Symbol* var = (Symbol*)listget(vardefs,ivar);
#194
    for(ivar = 0; ivar < nvars; ivar++) {
#195
      Symbol* vsym = (Symbol*)listget(vardefs,ivar);
#203
	for(ivar = 0; ivar < nvars; ivar++) {
#204
            Symbol* vsym = (Symbol*)listget(vardefs,ivar);
#211
	for(ivar = 0; ivar < nvars; ivar++) {
#212
            Symbol* vsym = (Symbol*)listget(vardefs,ivar);
#220
	    for(ivar = 0; ivar < nvars; ivar++) {
#221
                Symbol* vsym = (Symbol*)listget(vardefs,ivar);
#330
	for(ivar = 0; ivar < nvars; ivar++) {
#331
            Symbol* vsym = (Symbol*)listget(vardefs,ivar);
#406
            for(ivar = 0; ivar < nvars; ivar++) {
#407
                Symbol* vsym = (Symbol*)listget(vardefs,ivar);
genf77.c#50
    int idim, ivar, iatt;
#107
	for(ivar = 0; ivar < nvars; ivar++) {
#108
            Symbol* vsym = (Symbol*)listget(vardefs,ivar);
#115
	for(ivar = 0; ivar < nvars; ivar++) {
#116
            Symbol* vsym = (Symbol*)listget(vardefs,ivar);
#126
	for(ivar = 0; ivar < nvars; ivar++) {
#127
            Symbol* vsym = (Symbol*)listget(vardefs,ivar);
#137
	for(ivar = 0; ivar < nvars; ivar++) {
#138
            Symbol* vsym = (Symbol*)listget(vardefs,ivar);
#249
	for(ivar = 0; ivar < nvars; ivar++) {
#250
            Symbol* vsym = (Symbol*)listget(vardefs,ivar);
#323
            for(ivar = 0; ivar < nvars; ivar++) {
#324
                Symbol* vsym = (Symbol*)listget(vardefs,ivar);
#338
            for(ivar = 0; ivar < nvars; ivar++) {
#340
                Symbol* vsym = (Symbol*)listget(vardefs,ivar);
genj.c#43
    int idim, ivar, iatt, maxdims;
#90
    for(ivar = 0; ivar < nvars; ivar++) {
#91
      Symbol* vsym = (Symbol*)listget(vardefs,ivar);
#133
        for(ivar = 0; ivar < nvars; ivar++) {
#134
            Symbol* vsym = (Symbol*)listget(vardefs,ivar);
#191
            for(ivar = 0; ivar < nvars; ivar++) {
#192
                Symbol* vsym = (Symbol*)listget(vardefs,ivar);
genlib.c#40
    int idim, ivar, iatt;
#55
    for (ivar = 0; ivar < nvars; ivar++) {
#57
			  vars[ivar].name,
#58
			  vars[ivar].type,
#59
			  vars[ivar].ndims,
#60
			  vars[ivar].dims,
#209
    int idim, ivar, iatt, jatt, maxdims;
#260
    for (ivar = 0; ivar < nvars; ivar++)
#261
      if (vars[ivar].ndims > maxdims)
#262
	maxdims = vars[ivar].ndims;
#267
	for (ivar = 0; ivar < nvars; ivar++) {
#268
	    sprintf(stmnt, "   int %s_id;", vars[ivar].lname);
#274
	for (ivar = 0; ivar < nvars; ivar++) {
#275
	    sprintf(stmnt, "#  define RANK_%s %d", vars[ivar].lname,
#276
		    vars[ivar].ndims);
#282
	    for (ivar = 0; ivar < nvars; ivar++) {
#283
		if (vars[ivar].ndims > 0) {
#285
			    vars[ivar].lname, vars[ivar].lname);
#361
	for (ivar = 0; ivar < nvars; ivar++) {
#363
	    for (idim = 0; idim < vars[ivar].ndims; idim++) {
#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 idim, ivar, iatt, jatt, itype, maxdims;
#637
    for (ivar = 0; ivar < nvars; ivar++)
#638
      if (vars[ivar].ndims > maxdims)
#639
	maxdims = vars[ivar].ndims;
#643
	for (ivar = 0; ivar < nvars; ivar++) {
#644
	    sprintf(stmnt, "integer  %s_id", vars[ivar].lname);
#649
	for (ivar = 0; ivar < nvars; ivar++) {
#650
	    sprintf(stmnt, "integer  %s_rank", vars[ivar].lname);
#653
	for (ivar = 0; ivar < nvars; ivar++) {
#654
	    sprintf(stmnt, "parameter (%s_rank = %d)", vars[ivar].lname,
#655
		    vars[ivar].ndims);
#660
	for (ivar = 0; ivar < nvars; ivar++) {
#661
	    if (vars[ivar].ndims > 0) {
#663
			vars[ivar].lname, vars[ivar].lname);
#672
	for (ivar = 0; ivar < nvars; ivar++) {
#673
	    struct vars *v = &vars[ivar];
#766
	for (ivar = 0; ivar < nvars; ivar++) {
#767
	    for (idim = 0; idim < vars[ivar].ndims; idim++) {
#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 < nvars; ivar++) {
#1288
	if (vars[ivar].ndims > 0 && vars[ivar].dims[0] == rec_dim) {
#1290
	    for (jdim = 0; jdim < vars[ivar].ndims; jdim++) {
#1291
		if (vars[ivar].dims[jdim] == idim)
#1330
    int ivar;
#1338
    for (ivar = 0; ivar < nvars; ivar++) {
#1339
	struct vars *v = &vars[ivar];
#1351
        for (ivar = 0; ivar < nvars; ivar++) {
#1352
            struct vars *v = &vars[ivar];
#1376
        for (ivar = 0; ivar < nvars; ivar++) {
#1377
            struct vars *v = &vars[ivar];
#1394
	for (ivar = 0; ivar < nvars; ivar++) {
#1395
	    struct vars *v = &vars[ivar];
#1426
	for (ivar = 0; ivar < nvars; ivar++) {
#1427
	    struct vars *v = &vars[ivar];
#1433
	for (ivar = 0; ivar < nvars; ivar++) {
#1434
	    struct vars *v = &vars[ivar];
#1443
	for (ivar = 0; ivar < nvars; ivar++) {
#1444
	    struct vars *v = &vars[ivar];
#1456
        for (ivar = 0; ivar < nvars; ivar++) {
#1457
            struct vars *v = &vars[ivar];
#1499
        for (ivar = 0; ivar < nvars; ivar++) {
#1500
            struct vars *v = &vars[ivar];
#1518
	for (ivar = 0; ivar < nvars; ivar++) {
#1519
	    struct vars *v = &vars[ivar];
nccopy.c#777
copy_atts(int igrp, int ivar, int ogrp, int ovar)
#783
    NC_CHECK(nc_inq_varnatts(igrp, ivar, &natts));
#787
	NC_CHECK(nc_inq_attname(igrp, ivar, iatt, name));
#788
	NC_CHECK(nc_copy_att(igrp, ivar, name, ogrp, ovar));
#1224
    size_t ivar;
#1226
    for (ivar = 0; ivar < nfixed_vars; ivar++) {
#1227
	int varid = fixed_varids[ivar];
#1258
    size_t ivar;
#1270
    for (ivar = 0; ivar < nrec_vars; ivar++) {
#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(ogrp, varname, &rec_ovarids[ivar]));
#1306
	for (ivar = 0; ivar < nrec_vars; ivar++) {
#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_vars; ivar++) {
#1316
	if(start[ivar])
#1317
	    free(start[ivar]);
#1318
	if(count[ivar])
#1319
	    free(count[ivar]);
#1325
    for (ivar = 0; ivar < nrec_vars; ivar++) {
#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
        CDFnode* var = (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