--- ray/src/gen/genrev.c 1989/10/18 17:43:46 1.3 +++ ray/src/gen/genrev.c 1990/03/02 17:24:07 1.4 @@ -28,7 +28,7 @@ static char SCCSid[] = "$SunId$ LBL"; #define UP 04 #define DOWN 010 -double funvalue(), l_hermite(), argument(); +double funvalue(), l_hermite(), l_bezier(), argument(); main(argc, argv) @@ -45,6 +45,7 @@ char *argv[]; varset("PI", PI); funset("hermite", 5, l_hermite); + funset("bezier", 5, l_bezier); if (argc < 6) goto userror; @@ -210,4 +211,17 @@ l_hermite() argument(2)*(-2.0*t+3.0)*t*t + argument(3)*((t-2.0)*t+1.0)*t + argument(4)*(t-1.0)*t*t ); +} + + +double +l_bezier() +{ + double t; + + t = argument(5); + return( argument(1) * (1.+t*(-3.+t*(3.-t))) + + argument(2) * 3.*t*(1.+t*(-2.+t)) + + argument(3) * 3.*t*t*(1.-t) + + argument(4) * t*t*t ); }