77 |
|
int ec; |
78 |
|
{ |
79 |
|
if (ray_pnprocs > 0) /* close children if any */ |
80 |
< |
ray_pclose(0); |
80 |
> |
ray_pclose(0); |
81 |
> |
else if (ray_pnprocs < 0) |
82 |
> |
_exit(ec); /* avoid flush in child */ |
83 |
|
exit(ec); |
84 |
|
} |
85 |
|
|
239 |
|
cp = fskip(cp); |
240 |
|
if (cp == NULL) |
241 |
|
break; |
242 |
< |
if (ntp[1] > 1 && sarr[ntp[1]+1] <= sarr[ntp[1]]) { |
242 |
> |
if (ntp[1] > 1 && sarr[ntp[1]+1] <= sarr[ntp[1]]+FTINY) { |
243 |
|
sprintf(errmsg, |
244 |
|
"Phi values not monotinically increasing in sensor file '%s'", |
245 |
|
sfile); |
305 |
|
else if (fabs(sarr[1]) > FTINY) |
306 |
|
sprintf(errmsg, "minimum phi must be 0 in sensor file '%s'", |
307 |
|
sfile); |
308 |
< |
else if (sarr[ntp[1]] <= FTINY) |
308 |
> |
else if (sarr[ntp[1]] < 270.-FTINY) |
309 |
|
sprintf(errmsg, |
310 |
< |
"maximum phi must be positive in sensor file '%s'", |
310 |
> |
"maximum phi must be 270 or greater in sensor file '%s'", |
311 |
> |
sfile); |
312 |
> |
else if (sarr[ntp[1]] >= 360.-FTINY) |
313 |
> |
sprintf(errmsg, |
314 |
> |
"maximum phi must be less than 360 in sensor file '%s'", |
315 |
|
sfile); |
316 |
|
if (errmsg[0]) |
317 |
|
error(USER, errmsg); |