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.1 by greg, Tue Nov 12 17:04:36 1991 UTC vs.
Revision 2.6 by greg, Mon Aug 2 14:22:58 1993 UTC

# Line 30 | Line 30 | char  *material, *name;
30   double  height;
31   int  nslats,  nsurf;
32  
33 + #ifdef  DCL_ATOF
34 + extern double  atof();
35 + #endif
36  
37 +
38   main(argc, argv)
39   int  argc;
40   char  *argv[];
41   {
38 –        double  atof(), fabs();
42          double  width, delem, depth, rcurv = 0.0, angle;
43          double  beta, gamma, theta, chi;
44          int     i, j, k, l;
# Line 52 | Line 55 | char  *argv[];
55          angle = atof(argv[7]);
56          if (argc == 10)
57                  if (!strcmp(argv[8], "-r"))
58 <                        rcurv = atof(argv[8]);
58 >                        rcurv = atof(argv[9]);
59                  else if (!strcmp(argv[8], "+r"))
60 <                        rcurv = -atof(argv[8]);
60 >                        rcurv = -atof(argv[9]);
61                  else
62                          goto userr;
63  
# Line 152 | Line 155 | userr:
155   makeflat(w,d,a)
156   double  w, d, a;
157   {
155 –        double  sin(), cos();
158          double  h;
159  
160          h = d*sin(a);

Diff Legend

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