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

Comparing ray/src/cv/ies2rad.c (file contents):
Revision 2.10 by greg, Thu Dec 16 10:01:30 1993 UTC vs.
Revision 2.11 by greg, Mon May 23 10:45:41 1994 UTC

# Line 660 | Line 660 | makeshape(shp, width, length, height)          /* make source
660   register SHAPE  *shp;
661   double  width, length, height;
662   {
663 <        if (illumrad >= MINDIM/2.) {
663 >        if (illumrad/meters2out >= MINDIM/2.) {
664                  shp->type = SPHERE;
665 <                shp->w = shp->l = shp->h = 2.*illumrad;
665 >                shp->w = shp->l = shp->h = 2.*illumrad / meters2out;
666          } else if (width < MINDIM) {
667                  width = -width;
668                  if (width < MINDIM) {

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines