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