Plot coordinate pairs: Difference between revisions

m
→‎{{header|C}}: fabs unneeded; fixed a ly->lx
(C)
m (→‎{{header|C}}: fabs unneeded; fixed a ly->lx)
Line 74:
lx = maxx - minx;
ly = maxy - miny;
pl_fspace(floor(minx) - XLAB_WIDTH_F * fabs(lx), floor(miny) - YLAB_HEIGHT_F * fabs(ly),
ceil(maxx) + EXTRA_W * fabs(lx), ceil(maxy) + EXTRA_H * fabs(ly));
/* compute x,y-ticstep */
Line 84:
 
/* compute scale factors to adjust aspect */
if ( fabs(lx) < fabs(ly) ) {
sx = fabs(lx)/fabs(ly);
sy = 1.0;
} else {
sx = 1.0;
sy = fabs(ly)/fabs(ly)lx;
}
 
Line 103:
pl_fline(floor(minx), ny, ceil(maxx), ny);
snprintf(labs, MAXLABLEN, "%6.2lf", ny);
FMOVESCALE(floor(minx) - XLAB_WIDTH_F * fabs(lx), ny);
PUSHSCALE(sx,sy);
pl_label(labs);