Revision: | 1.1 |
Committed: | Sat Feb 22 02:07:26 2003 UTC (22 years, 2 months ago) by greg |
Content type: | text/plain |
Branch: | MAIN |
CVS Tags: | rad3R5 |
Log Message: | Changes and check-in for 3.5 release Includes new source files and modifications not recorded for many years See ray/doc/notes/ReleaseNotes for notes between 3.1 and 3.5 release |
# | User | Rev | Content |
---|---|---|---|
1 | greg | 1.1 | #ifndef lint |
2 | static const char RCSid[] = "$Id$"; | ||
3 | #endif | ||
4 | #ifndef lint | ||
5 | static char sccsid[] = "@(#)space.c 4.1 (Berkeley) 6/27/83"; | ||
6 | #endif | ||
7 | |||
8 | extern float botx; | ||
9 | extern float boty; | ||
10 | extern float obotx; | ||
11 | extern float oboty; | ||
12 | extern float scalex; | ||
13 | extern float scaley; | ||
14 | extern int scaleflag; | ||
15 | space(x0,y0,x1,y1){ | ||
16 | botx = 0.; | ||
17 | boty = 0.; | ||
18 | obotx = x0; | ||
19 | oboty = y0; | ||
20 | if(scaleflag) | ||
21 | return; | ||
22 | scalex = 3120./(x1-x0); | ||
23 | scaley = 3120./(y1-y0); | ||
24 | } |