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

Comparing ray/src/util/glaresrc.c (file contents):
Revision 1.1 by greg, Mon Mar 18 12:15:40 1991 UTC vs.
Revision 1.3 by greg, Mon Mar 18 16:06:53 1991 UTC

# Line 52 | Line 52 | analyze()                      /* analyze our scene */
52          for (v = vsize; v >= -vsize; v--) {
53                  getviewspan(v, spanbr);
54                  left = hsize + 1;
55 <                for (h = -hsize; h <= hsize; h++)
55 >                for (h = -hsize; h <= hsize; h++) {
56                          if (spanbr[h+hsize] < 0.0) {    /* off view */
57                                  if (left < h) {
58 <                                        addsrcspan(newspan(left,h-1,v,spanbr));
58 >                                        addsrcspan(newspan(left,h,v,spanbr));
59                                          left = hsize + 1;
60                                  }
61                                  continue;
62                          }
63                          if (spanbr[h+hsize] > threshold) {      /* in source */
64 <                                if (left >= h)
64 >                                if (left > h)
65                                          left = h;
66                          } else {                        /* out of source */
67                                  if (left < h) {
68 <                                        addsrcspan(newspan(left,h-1,v,spanbr));
68 >                                        addsrcspan(newspan(left,h,v,spanbr));
69                                          left = hsize + 1;
70                                  }
71                                  addindirect(h, spanbr[h+hsize]);
72                          }
73 +                }
74                  if (left < h)
75 <                        addsrcspan(newspan(left,h-1,v,spanbr));
75 >                        addsrcspan(newspan(left,h,v,spanbr));
76                  close_sources(v);
77          }
78          close_allsrcs();
# Line 87 | Line 88 | double br;
88          register int    i;
89  
90          if (h <= -hlim) {                       /* left region */
91 <                d = (double)(h+hlim)/SAMPDENS;
91 >                d = (double)(h+hlim)/sampdens;
92                  if (d <= -1.0+FTINY)
93                          return;
94                  tanb = d/sqrt(1.0-d*d);
# Line 101 | Line 102 | double br;
102                  return;
103          }
104          if (h >= hlim) {                        /* right region */
105 <                d = (double)(h-hlim)/SAMPDENS;
105 >                d = (double)(h-hlim)/sampdens;
106                  if (d >= 1.0-FTINY)
107                          return;
108                  tanb = d/sqrt(1.0-d*d);
# Line 152 | Line 153 | comp_thresh()                  /* compute glare threshold */
153                  fprintf(stderr, "%s: threshold zero!\n", progname);
154                  exit(1);
155          }
156 <        if (verbose)
156 >        if (verbose) {
157 >                pict_stats();
158                  fprintf(stderr,
159                          "%s: threshold set to %f cd/m2 from %d samples\n",
160                                  progname, threshold, nsamps);
161 +        }
162   }
163  
164  
# Line 262 | Line 265 | register struct source *sp;
265          sp->dom = 0.0;
266          sp->dir[0] = sp->dir[1] = sp->dir[1] = 0.0;
267          sp->brt = 0.0;
268 +        n = 0;
269          for (ss = sp->first; ss != NULL; ss = ss->next) {
270                  sp->brt += ss->brsum;
271                  n += ss->r - ss->l;
# Line 285 | Line 289 | register struct source *sp;
289          if (verbose)
290                  fprintf(stderr,
291          "%s: found source at (%f,%f,%f), solid angle %f, brightness %f\n",
292 <                        progname, sp->dir[0], sp->dir[1], sp->dir[2], sp->brt);
292 >                        progname, sp->dir[0], sp->dir[1], sp->dir[2],
293 >                        sp->dom, sp->brt);
294   }

Diff Legend

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