[unix-history] / usr / src / lib / libplot / t4014 / scale.c

#ifndef lint
static char sccsid[] = "@(#)scale.c	4.1 (Berkeley) %G%";
#endif

extern float scalex;
extern float scaley;
extern int scaleflag;
scale(i,x,y)
char i;
float x,y;
{
	switch(i) {
	default:
		return;
	case 'c':
		x *= 2.54;
		y *= 2.54;
	case 'i':
		x /= 200;
		y /= 200;
	case 'u':
		scalex = 1/x;
		scaley = 1/y;
	}
	scaleflag = 1;
}
Commit	Line	Data
24e423e6 SL	1	#ifndef lint
	2	static char sccsid[] = "@(#)scale.c 4.1 (Berkeley) %G%";
	3	#endif
	4
	5	extern float scalex;
	6	extern float scaley;
	7	extern int scaleflag;
	8	scale(i,x,y)
	9	char i;
	10	float x,y;
	11	{
	12	switch(i) {
	13	default:
	14	return;
	15	case 'c':
	16	x *= 2.54;
	17	y *= 2.54;
	18	case 'i':
	19	x /= 200;
	20	y /= 200;
	21	case 'u':
	22	scalex = 1/x;
	23	scaley = 1/y;
	24	}
	25	scaleflag = 1;
	26	}