dprintf(v->fd,"write ppm %s\n",file);
dprintf(v->fd,"zap\n");
/* write the actual data file */
dprintf(fd,"%d\n",(dim.x==0)?n:n+8);
dprintf(v->fd,"write ppm %s\n",file);
dprintf(v->fd,"zap\n");
/* write the actual data file */
dprintf(fd,"%d\n",(dim.x==0)?n:n+8);