1 /*- 2 * Copyright (c) 1983 The Regents of the University of California. 3 * All rights reserved. 4 * 5 * %sccs.include.proprietary.c% 6 */ 7 8 #ifndef lint 9 static char sccsid[] = "@(#)space.c 4.2 (Berkeley) 04/22/91"; 10 #endif /* not lint */ 11 12 extern float botx; 13 extern float boty; 14 extern float obotx; 15 extern float oboty; 16 extern float scalex; 17 extern float scaley; 18 extern int scaleflag; 19 space(x0,y0,x1,y1){ 20 botx = 0.; 21 boty = 0.; 22 obotx = x0; 23 oboty = y0; 24 if(scaleflag) 25 return; 26 scalex = 3120./(x1-x0); 27 scaley = 3120./(y1-y0); 28 } 29