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

Comparing ray/src/util/dctimestep.c (file contents):
Revision 2.15 by greg, Fri Apr 8 18:13:48 2011 UTC vs.
Revision 2.16 by greg, Mon Apr 11 03:47:46 2011 UTC

# Line 297 | Line 297 | cm_print(const CMATRIX *cm, FILE *fp)
297   static CMATRIX *
298   cm_bsdf(const COLOR bsdfLamb, const COLOR specCol, const SDMat *bsdf)
299   {
300 <        CMATRIX *cm;
300 >        CMATRIX *cm = cm_alloc(bsdf->nout, bsdf->ninc);
301          int     nbadohm = 0;
302          int     nneg = 0;
303        FVECT   v;
303          float   dom;
304          int     doforward;
305          int     r, c;
306 +                                        /* reciprocity is "transparent" */
307 +        for (c = 0; c < cm->ncols; c++) {
308 +                                        /* get projected solid angle */
309 +                dom = mBSDF_incohm(bsdf,c);
310 +                nbadohm += (dom <= 0);
311  
312 <        mBSDF_incvec(v, bsdf, .5);      /* check BTDF orientation */
313 <
314 <        if (v[2] < 0) {                 /* incident from outside */
315 <                cm = cm_alloc(bsdf->nout, bsdf->ninc);
316 <                for (c = 0; c < cm->ncols; c++) {
317 <                        dom = mBSDF_incohm(bsdf,c);
318 <                        
315 <                        nbadohm += (dom <= 0);
316 <
317 <                        if (!mBSDF_incvec(v,bsdf,c+.5) || v[2] > 0)
318 <                                error(USER, "illegal incoming BTDF direction");
319 <                        dom *= -v[2];
320 <
321 <                        for (r = 0; r < cm->nrows; r++) {
322 <                                float   f = mBSDF_value(bsdf,c,r);
323 <                                COLORV  *mp = cm_lval(cm,r,c);
324 <
325 <                                if ((f <= 0) | (dom <= 0)) {
326 <                                        nneg += (f < -FTINY);
327 <                                        f = .0f;
328 <                                }
329 <                                copycolor(mp, specCol);
330 <                                f *= dom;
331 <                                scalecolor(mp, f);
332 <                                addcolor(mp, bsdfLamb);
312 >                for (r = 0; r < cm->nrows; r++) {
313 >                        float   f = mBSDF_value(bsdf,c,r);
314 >                        COLORV  *mp = cm_lval(cm,r,c);
315 >                                        /* check BSDF value */
316 >                        if ((f <= 0) | (dom <= 0)) {
317 >                                nneg += (f < -FTINY);
318 >                                f = .0f;
319                          }
320 +                        copycolor(mp, specCol);
321 +                        scalecolor(mp, f);
322 +                        addcolor(mp, bsdfLamb);
323 +                        scalecolor(mp, dom);
324                  }
335        } else {                        /* rely on reciprocity */
336                cm = cm_alloc(bsdf->ninc, bsdf->nout);
337                for (c = 0; c < cm->ncols; c++) {
338                        dom = mBSDF_outohm(bsdf,c);
339                        
340                        nbadohm += (dom <= 0);
341
342                        if (!mBSDF_outvec(v,bsdf,c+.5) || v[2] > 0)
343                                error(USER, "illegal outgoing BTDF direction");
344                        dom *= -v[2];
345
346                        for (r = 0; r < cm->nrows; r++) {
347                                float   f = mBSDF_value(bsdf,r,c);
348                                COLORV  *mp = cm_lval(cm,r,c);
349
350                                if ((f <= 0) | (dom <= 0)) {
351                                        nneg += (f < -FTINY);
352                                        f = .0f;
353                                }
354                                copycolor(mp, specCol);
355                                f *= dom;
356                                scalecolor(mp, f);
357                                addcolor(mp, bsdfLamb);
358                        }
359                }
325          }
326          if (nneg | nbadohm) {
327                  sprintf(errmsg,
# Line 382 | Line 347 | cm_loadBSDF(char *fname)
347                  sprintf(errmsg, "cannot find BSDF file '%s'", fname);
348                  error(USER, errmsg);
349          }
350 <        SDclipName(myBSDF.name, fname);
386 <                                        /* load XML and check type */
350 >        SDclearBSDF(&myBSDF, fname);    /* load XML and check type */
351          ec = SDloadFile(&myBSDF, fpath);
352          if (ec)
353                  error(USER, transSDError(ec));

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines