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

Comparing ray/src/rt/noise3.c (file contents):
Revision 1.7 by greg, Thu Oct 10 16:43:40 1991 UTC vs.
Revision 2.8 by greg, Mon Aug 4 22:37:53 2003 UTC

# Line 1 | Line 1
1 – /* Copyright (c) 1988 Regents of the University of California */
2 –
1   #ifndef lint
2 < static char SCCSid[] = "$SunId$ LBL";
2 > static const char       RCSid[] = "$Id$";
3   #endif
6 –
4   /*
5   *  noise3.c - noise functions for random textures.
6   *
7   *     Credit for the smooth algorithm goes to Ken Perlin.
8   *     (ref. SIGGRAPH Vol 19, No 3, pp 287-96)
12 – *
13 – *     4/15/86
14 – *     5/19/88  Added fractal noise function
9   */
10  
11 + #include "copyright.h"
12  
13 + #include  "calcomp.h"
14 +
15 + #include  <math.h>
16 +
17   #define  A              0
18   #define  B              1
19   #define  C              2
# Line 35 | Line 34 | static char SCCSid[] = "$SunId$ LBL";
34                                          r0*hpoly3(t) + \
35                                          r1*hpoly4(t) )
36  
37 < static char  noise_name[4][8] = {"noise3a", "noise3b", "noise3c", "noise3"};
37 > static char  noise_name[4][8] = {"noise3x", "noise3y", "noise3z", "noise3"};
38   static char  fnoise_name[] = "fnoise3";
39   static char  hermite_name[] = "hermite";
40  
41 < double  *noise3(), fnoise3(), argument(), frand();
41 > double  *noise3(), fnoise3(), frand();
42 > static  interpolate();
43  
44   static long  xlim[3][2];
45   static double  xarg[3];
46  
47 < #define  EPSILON        .0001           /* error allowed in fractal */
47 > #define  EPSILON        .001            /* error allowed in fractal */
48  
49   #define  frand3(x,y,z)  frand(17*(x)+23*(y)+29*(z))
50  
# Line 73 | Line 73 | register char  *nam;
73  
74  
75   double
76 < l_hermite()                     /* library call for hermite interpolation */
76 > l_hermite(char *nm)             /* library call for hermite interpolation */
77   {
78          double  t;
79          
# Line 99 | Line 99 | double *
99   noise3(xnew)                    /* compute the noise function */
100   register double  xnew[3];
101   {
102 –        extern double  floor();
102          static double  x[3] = {-100000.0, -100000.0, -100000.0};
103          static double  f[4];
104  
# Line 156 | Line 155 | double
155   fnoise3(p)                      /* compute fractal noise function */
156   double  p[3];
157   {
159 –        double  floor();
158          long  t[3], v[3], beg[3];
159          double  fval[8], fc;
160          int  branch;

Diff Legend

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