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.2 by greg, Sun Sep 10 16:45:18 1989 UTC vs.
Revision 1.3 by greg, Fri Mar 2 17:24:05 1990 UTC

# Line 30 | Line 30 | static char SCCSid[] = "$SunId$ LBL";
30   #define  max(a,b)       ((a) > (b) ? (a) : (b))
31  
32  
33 < double  funvalue(), l_hermite(), argument();
33 > double  funvalue(), l_hermite(), l_bezier(), argument();
34  
35  
36   main(argc, argv)
# Line 44 | Line 44 | char  *argv[];
44  
45          varset("PI", PI, NULL);
46          funset("hermite", 5, l_hermite);
47 +        funset("bezier", 5, l_bezier);
48  
49          if (argc < 8)
50                  goto userror;
# Line 162 | Line 163 | l_hermite()                    
163                  argument(2)*(-2.0*t+3.0)*t*t +
164                  argument(3)*((t-2.0)*t+1.0)*t +
165                  argument(4)*(t-1.0)*t*t );
166 + }
167 +
168 +
169 + double
170 + l_bezier()
171 + {
172 +        double  t;
173 +
174 +        t = argument(5);
175 +        return( argument(1) * (1.+t*(-3.+t*(3.-t))) +
176 +                argument(2) * 3.*t*(1.+t*(-2.+t)) +
177 +                argument(3) * 3.*t*t*(1.-t) +
178 +                argument(4) * t*t*t );
179   }

Diff Legend

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