--- ray/src/gen/genblinds.c 1993/06/04 14:29:34 2.5 +++ ray/src/gen/genblinds.c 2003/02/22 02:07:23 2.9 @@ -1,9 +1,6 @@ -/* Copyright (c) 1986 Regents of the University of California */ - #ifndef lint -static char SCCSid[] = "$SunId$ LBL"; +static const char RCSid[] = "$Id: genblinds.c,v 2.9 2003/02/22 02:07:23 greg Exp $"; #endif - /* * genblind2.c - make some curved or flat venetian blinds. * @@ -19,10 +16,11 @@ static char SCCSid[] = "$SunId$ LBL"; */ #include +#include #include -#define PI 3.141592653589793 -#define DELTA 5. /* MINIMAL SUSTAINED ANGLE IN DEGREES */ +#define PI 3.14159265358979323846 +#define DELTA 10. /* MINIMAL SUSTAINED ANGLE IN DEGREES */ double baseflat[4][3], baseblind[4][3][180]; double A[3],X[3]; @@ -67,7 +65,7 @@ char *argv[]; /* HOW MANY ELEMENTARY SURFACES SHOULD BE CALCULATED ? */ - nsurf = (theta / ((PI/180.)*DELTA)); + nsurf = (theta / ((PI/180.)*DELTA)) + 1; /* WHAT IS THE DEPTH OF THE ELEMENTARY SURFACES ? */