| 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) */ |
| 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); |