| 450 |
|
} |
| 451 |
|
/* determine sample type/bin */ |
| 452 |
|
if ((tolower(curparams.hemis[0]) == 'u') | (curparams.hemis[0] == '1')) { |
| 453 |
< |
sprintf(sbuf, "if(-Dx*%g-Dy*%g-Dz*%g,0,-1)", |
| 454 |
< |
curparams.nrm[0], curparams.nrm[1], curparams.nrm[2]); |
| 455 |
< |
binv = savqstr(sbuf); |
| 453 |
> |
if (curparams.slist->styp != ST_SOURCE) { |
| 454 |
> |
sprintf(sbuf, "if(-Dx*%g-Dy*%g-Dz*%g,0,-1)", |
| 455 |
> |
curparams.nrm[0], curparams.nrm[1], curparams.nrm[2]); |
| 456 |
> |
binv = savqstr(sbuf); |
| 457 |
> |
} else |
| 458 |
> |
binv = "0"; |
| 459 |
|
nbins = "1"; /* uniform sampling -- one bin */ |
| 460 |
|
uniform = 1; |
| 461 |
|
} else if (tolower(curparams.hemis[0]) == 's' && |