
	/* Make list of x coordinates */
	crange = RangeInit (yrange, xdim);
	ny = rgetn (crange);
	yi = (int *) calloc (ny, sizeof (int));
	for (i = 0; i < ny; i++) {
	    yi[i] = rgeti4 (crange);
	    }

	/* Label vertical pixels */
	if (pixlabel) {

	/* Format for row pixel labels */
	    x = ix[nx-1];
	    sprintf (testval, "%d", x);
	    ndig = strlen (testval);
	    sprintf (rform, "%%%dd:", ndig);

	/* Format for column pixel labels */
	    printf ("Coord");
	    sprintf (testval, pform, 1.12345678);
	    ndig = strlen (testval);
	    y = iy[ny-1];
	    sprintf (testval, "%d", y);
	    ndig = ndig + strlen (testval) + 1;
	    if (printtab) {
		sprintf (cform, "%%%dd", ndig);
		}
	    else{
		sprintf (cform, "%%%dd", ndig);
		}
