ViewVC Help
View File | Revision Log | Show Annotations | Download File | Root Listing
root/Development/ray/src/gen/genblinds.c
(Generate patch)

Comparing ray/src/gen/genblinds.c (file contents):
Revision 2.6 by greg, Mon Aug 2 14:22:58 1993 UTC vs.
Revision 2.9 by greg, Sat Feb 22 02:07:23 2003 UTC

# Line 1 | Line 1
1 – /* Copyright (c) 1986 Regents of the University of California */
2 –
1   #ifndef lint
2 < static char SCCSid[] = "$SunId$ LBL";
2 > static const char       RCSid[] = "$Id$";
3   #endif
6 –
4   /*
5   *  genblind2.c - make some curved or flat venetian blinds.
6   *
# Line 19 | Line 16 | static char SCCSid[] = "$SunId$ LBL";
16   */
17  
18   #include  <stdio.h>
19 + #include <stdlib.h>
20   #include  <math.h>
21  
22 < #define  PI             3.141592653589793
23 < #define  DELTA          5.  /*  MINIMAL SUSTAINED ANGLE IN DEGREES */
22 > #define  PI             3.14159265358979323846
23 > #define  DELTA          10.  /*  MINIMAL SUSTAINED ANGLE IN DEGREES */
24  
25   double  baseflat[4][3], baseblind[4][3][180];
26   double  A[3],X[3];
# Line 30 | Line 28 | char  *material, *name;
28   double  height;
29   int  nslats,  nsurf;
30  
33 – #ifdef  DCL_ATOF
34 – extern double  atof();
35 – #endif
31  
37 –
32   main(argc, argv)
33   int  argc;
34   char  *argv[];
# Line 71 | Line 65 | char  *argv[];
65  
66          /* HOW MANY ELEMENTARY SURFACES SHOULD BE CALCULATED ? */
67  
68 <        nsurf = (theta / ((PI/180.)*DELTA));
68 >        nsurf = (theta / ((PI/180.)*DELTA)) + 1;
69  
70          /* WHAT IS THE DEPTH OF THE ELEMENTARY SURFACES ? */
71  

Diff Legend

– Removed lines
+ Added lines
< Changed lines (old)
> Changed lines (new)