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

Comparing ray/src/cv/ies2rad.c (file contents):
Revision 1.2 by greg, Fri Dec 14 14:41:14 1990 UTC vs.
Revision 2.1 by greg, Tue Nov 12 17:02:02 1991 UTC

# Line 71 | Line 71 | double illumrad = 0.0;                 /* radius for illum sphere */
71   typedef struct {
72          int     type;                           /* RECT, DISK, SPHERE */
73          double  w, l, h;                        /* width, length, height */
74 <        double  area;                           /* effective radiating area */
74 >        double  area;                           /* max. projected area */
75   } SHAPE;                                /* a source shape */
76  
77   int     gargc;                          /* global argc (minus filenames) */
# Line 551 | Line 551 | char   *mod, *name;
551                  perror(buf);
552                  return(-1);
553          }
554 <        if (cvdata(in, datout, 2, nangles, 1./683., bounds) != 0) {
554 >        if (cvdata(in, datout, 2, nangles, 1./WHTEFFICACY, bounds) != 0) {
555                  fprintf(stderr, "dosource: bad distribution data\n");
556                  fclose(datout);
557                  unlink(fullname(buf,name,T_DST));
# Line 696 | Line 696 | double width, length, height;
696                  shp->area = shp->w * shp->l;
697                  break;
698          case DISK:
699 –                shp->area = PI/4. * shp->w * shp->w;
700 –                break;
699          case SPHERE:
700 <                shp->area = PI * shp->w * shp->w;
700 >                shp->area = PI/4. * shp->w * shp->w;
701                  break;
702          }
703          return(0);

Diff Legend

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