Revision: | 1.3 |
Committed: | Fri Nov 5 17:51:17 2004 UTC (20 years, 6 months ago) by greg |
Content type: | text/plain |
Branch: | MAIN |
CVS Tags: | HEAD |
Changes since 1.2: | +1 -1 lines |
State: | FILE REMOVED |
Log Message: | Removed plotout and lib4014 it depends on |
# | User | Rev | Content |
---|---|---|---|
1 | greg | 1.1 | #ifndef lint |
2 | greg | 1.3 | static const char RCSid[] = "$Id: scale.c,v 1.2 2003/11/15 02:13:37 schorsch Exp $"; |
3 | greg | 1.1 | #endif |
4 | |||
5 | schorsch | 1.2 | #include "local4014.h" |
6 | #include "lib4014.h" | ||
7 | |||
8 | extern void | ||
9 | scale( | ||
10 | char i, | ||
11 | float x, | ||
12 | float y; | ||
13 | ) | ||
14 | greg | 1.1 | { |
15 | switch(i) { | ||
16 | default: | ||
17 | return; | ||
18 | case 'c': | ||
19 | x *= 2.54; | ||
20 | y *= 2.54; | ||
21 | case 'i': | ||
22 | x /= 200; | ||
23 | y /= 200; | ||
24 | case 'u': | ||
25 | scalex = 1/x; | ||
26 | scaley = 1/y; | ||
27 | } | ||
28 | scaleflag = 1; | ||
29 | } |