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