vartests.c#259    struct cdfelm elm[3]; /* coordinates and values of test points */
#273     elm[0].coords[id] = 0;
#279     elm[1].coords[id] = dsize / 2;
#281     elm[2].coords[id] = dsize - 1;
#287 elm[ie].val.by = (char) (ie+1);
#288 voidp = (void *) &elm[ie].val.by;
#292 elm[ie].val.sh = (short) (ie-1);
#293 voidp = (void *) &elm[ie].val.sh;
#297 elm[ie].val.lo = (nclong) (ie-3);
#298 voidp = (void *) &elm[ie].val.lo;
#302 elm[ie].val.fl = (float) (ie+1);
#303 voidp = (void *) &elm[ie].val.fl;
#307 elm[ie].val.db = (double) (ie-1);
#308 voidp = (void *) &elm[ie].val.db;
#314     if(ncvarput1 (cdfidivelm[ie].coordsvoidp) == -1) {
#319     add_data(&testivelm[ie].coordsedges); /* keep test in sync */
#321     if(ncvarget1 (cdfidivelm[ie].coordstmpp) == -1) {
#329 if (elm[ie].val.by != chval) {
#331   pnamechvalelm[ie].val.by);
#336 if (elm[ie].val.sh != shval) {
#338   pnameshvalelm[ie].val.sh);
#343 if (elm[ie].val.lo != loval) {
#345   pname, (long)loval, (long)elm[ie].val.lo);
#350 if (elm[ie].val.fl != flval) {
#352   pnameflvalelm[ie].val.fl);
#357 if (elm[ie].val.db != dbval) {
#359   pnamedbvalelm[ie].val.db);
#390    struct cdfelm elm; /* coordinates and value of test point */
#409   elm.coords[id] = 0;
#411 elm.coords[test.vars[iv].ndims/2] = -1;
#412 if(ncvarput1 (cdfidivelm.coords, (void *) &elm.val) != -1) {
#416 elm.coords[test.vars[iv].ndims/2] =
#418 if(ncvarput1 (cdfidivelm.coords, (void *) &elm.val) != -1) {
#424    if(ncvarput1 (cdfid, -1, elm.coords, (void *) &elm.val) != -1 ||
#425       ncvarput1 (cdfidtest.nvarselm.coords, (void *) &elm.val) != -1) {
#435      if(ncvarput1 (cdfid, 0, elm.coords, (void *) &elm.val) != -1) {
#448    if(ncvarput1 (cdfid, 0, elm.coords, (void *) &elm.val) != -1) {
#478    struct cdfelm elm; /* coordinates and value of test point */
#497   elm.coords[id] = 0;
#499 elm.coords[test.vars[iv].ndims/2] = -1;
#500 if(ncvarget1 (cdfidivelm.coords, (void *) &elm.val) != -1) {
#504 elm.coords[test.vars[iv].ndims/2] =
#506 if(ncvarget1 (cdfidivelm.coords, (void *) &elm.val) != -1) {
#512    if(ncvarget1 (cdfid, -1, elm.coords, (void *) &elm.val) != -1 ||
#513       ncvarget1 (cdfidtest.nvarselm.coords, (void *) &elm.val) != -1) {
#523      if(ncvarget1 (cdfid, 0, elm.coords, (void *) &elm.val) != -1) {
#537    if(ncvarget1 (cdfid, 0, elm.coords, (void *) &elm.val) != -1) {


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