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

Comparing ray/src/rt/glass.c (file contents):
Revision 1.4 by greg, Wed May 30 19:57:01 1990 UTC vs.
Revision 1.8 by greg, Fri May 10 08:51:00 1991 UTC

# Line 1 | Line 1
1 < /* Copyright (c) 1986 Regents of the University of California */
1 > /* Copyright (c) 1991 Regents of the University of California */
2  
3   #ifndef lint
4   static char SCCSid[] = "$SunId$ LBL";
# Line 49 | Line 49 | register RAY  *r;
49          FVECT  pnorm;
50          double  cos2;
51          COLOR  trans, refl;
52 –        double  transbright;
52          double  d, r1;
53 +        double  transtest, transdist;
54          RAY  p;
55          register int  i;
56  
# Line 61 | Line 61 | register RAY  *r;
61  
62          if (r->rod < 0.0)                       /* reorient if necessary */
63                  flipsurface(r);
64 +        r->rt = r->rot;                         /* default ray length */
65 +        transtest = 0;
66                                                  /* get modifiers */
67          raytexture(r, m->omod);
68          pdot = raynormal(pnorm, r);
# Line 80 | Line 82 | register RAY  *r;
82                  d = colval(mcolor, i);
83                  colval(trans,i) = (1.0-r1)*(1.0-r1)*d / (1.0 - r1*r1*d*d);
84          }
83 –        transbright = -FTINY;
85                                                  /* transmitted ray */
86          if (rayorigin(&p, r, TRANS, bright(trans)) == 0) {
87 <                VCOPY(p.rdir, r->rdir);
87 >                if (DOT(r->pert,r->pert) > FTINY*FTINY) {
88 >                        for (i = 0; i < 3; i++)         /* perturb direction */
89 >                                p.rdir[i] = r->rdir[i] - r->pert[i]/RINDEX;
90 >                        normalize(p.rdir);
91 >                } else {
92 >                        VCOPY(p.rdir, r->rdir);
93 >                        transtest = 2;
94 >                }
95                  rayvalue(&p);
96                  multcolor(p.rcol, r->pcol);     /* modify */
97                  multcolor(p.rcol, trans);
98                  addcolor(r->rcol, p.rcol);
99 <                transbright = bright(p.rcol);
100 <                r->rt = r->rot + p.rt;
99 >                transtest *= bright(p.rcol);
100 >                transdist = r->rot + p.rt;
101          }
102  
103          if (r->crtype & SHADOW)                 /* skip reflected ray */
# Line 107 | Line 115 | register RAY  *r;
115                  rayvalue(&p);
116                  multcolor(p.rcol, refl);
117                  addcolor(r->rcol, p.rcol);
110 –                if (bright(p.rcol) > transbright)
111 –                        r->rt = r->rot + p.rt;
118          }
119 +        if (transtest > bright(r->rcol))
120 +                r->rt = transdist;
121   }

Diff Legend

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