1 #ifndef lint 2 static char sccsid[] = "@(#)scale.c 1.1 (Berkeley) 01/02/85"; 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 } 27