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

Comparing ray/src/gen/genworm.c (file contents):
Revision 1.8 by greg, Tue Apr 23 15:51:15 1991 UTC vs.
Revision 2.6 by greg, Mon Aug 4 22:37:53 2003 UTC

# Line 1 | Line 1
1   #ifndef lint
2 < static char SCCSid[] = "$SunId$ LBL";
2 > static const char       RCSid[] = "$Id$";
3   #endif
4 –
5 – /* Copyright (c) 1989 Regents of the University of California */
6 –
4   /*
5   *  genworm.c - program to generate worms (strings with varying thickness).
6   *
# Line 15 | Line 12 | static char SCCSid[] = "$SunId$ LBL";
12   */
13  
14   #include  <stdio.h>
15 <
15 > #include  <math.h>
16 > #include  "calcomp.h"
17   #include  "fvect.h"
18  
19 < #define  XNAME          "X_"                    /* x function name */
20 < #define  YNAME          "Y_"                    /* y function name */
21 < #define  ZNAME          "Z_"                    /* z function name */
22 < #define  RNAME          "R_"                    /* r function name */
19 > #define  XNAME          "X`SYS`"                /* x function name */
20 > #define  YNAME          "Y`SYS`"                /* y function name */
21 > #define  ZNAME          "Z`SYS`"                /* z function name */
22 > #define  RNAME          "R`SYS`"                /* r function name */
23  
24   #define  PI             3.14159265358979323846
25  
28 – #define  FTINY          1e-7
29 –
26   #define  max(a,b)       ((a) > (b) ? (a) : (b))
27  
28  
29 < double  funvalue(), l_hermite(), l_bezier(), l_bspline(), argument();
29 > double  l_hermite(char *), l_bezier(char *), l_bspline(char *);
30 > void  quit();
31  
32  
33   main(argc, argv)
34   int  argc;
35   char  *argv[];
36   {
40 –        extern long     eclock;
37          char  stmp[256];
38          double  t, f, lastr, r;
39          FVECT  lastp, p;
# Line 80 | Line 76 | char  *argv[];
76                  p[1] = funvalue(YNAME, 1, &t);
77                  p[2] = funvalue(ZNAME, 1, &t);
78                  r = funvalue(RNAME, 1, &t);
79 <                if (i)
79 >                if (i) {
80                          if (lastr <= r+FTINY && lastr >= r-FTINY) {
81                                  printf("\n%s cylinder %s.c%d\n",
82                                                  argv[1], argv[2], i);
# Line 107 | Line 103 | char  *argv[];
103                                  f = f <= 0.0 ? 0.0 : sqrt(f);
104                                  printf("%18.12g %18.12g\n", f*lastr, f*r);
105                          }
106 +                }
107                  printf("\n%s sphere %s.s%d\n", argv[1], argv[2], i);
108                  printf("0\n0\n4 %18.12g %18.12g %18.12g %18.12g\n",
109                                  p[0], p[1], p[2], r);
# Line 123 | Line 120 | userror:
120   }
121  
122  
123 + void
124   eputs(msg)
125   char  *msg;
126   {
# Line 130 | Line 128 | char  *msg;
128   }
129  
130  
131 + void
132   wputs(msg)
133   char  *msg;
134   {
# Line 137 | Line 136 | char  *msg;
136   }
137  
138  
139 + void
140   quit(code)
141 + int  code;
142   {
143          exit(code);
144   }
# Line 157 | Line 158 | register char  **av;
158  
159  
160   double
161 < l_hermite()                    
161 > l_hermite(char *nm)
162   {
163          double  t;
164          
# Line 170 | Line 171 | l_hermite()                    
171  
172  
173   double
174 < l_bezier()
174 > l_bezier(char *nm)
175   {
176          double  t;
177  
# Line 183 | Line 184 | l_bezier()
184  
185  
186   double
187 < l_bspline()
187 > l_bspline(char *nm)
188   {
189          double  t;
190  

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines