xref: /csrg-svn/lib/libplot/t4013/space.c (revision 17622)
1*17622Sjak #ifndef lint
2*17622Sjak static char sccsid[] = "@(#)space.c	1.1 (Berkeley) 01/02/85";
3*17622Sjak #endif
4*17622Sjak 
5*17622Sjak extern float botx;
6*17622Sjak extern float boty;
7*17622Sjak extern float obotx;
8*17622Sjak extern float oboty;
9*17622Sjak extern float scalex;
10*17622Sjak extern float scaley;
11*17622Sjak extern int scaleflag;
12*17622Sjak space(x0,y0,x1,y1){
13*17622Sjak 	botx = 0.;
14*17622Sjak 	boty = 0.;
15*17622Sjak 	obotx = x0;
16*17622Sjak 	oboty = y0;
17*17622Sjak 	if(scaleflag)
18*17622Sjak 		return;
19*17622Sjak 	scalex = 780./(x1-x0);
20*17622Sjak 	scaley = 780./(y1-y0);
21*17622Sjak }
22