105 |
|
combine = !combine; |
106 |
|
break; |
107 |
|
case 'd': |
108 |
+ |
if (argv[i][2] == 'v') { |
109 |
+ |
rtargv[rtargc++] = argv[i]; |
110 |
+ |
break; |
111 |
+ |
} |
112 |
+ |
/* FALL THROUGH */ |
113 |
|
case 'l': |
114 |
|
case 's': |
115 |
+ |
case 'P': |
116 |
|
rtargv[rtargc++] = argv[i]; |
117 |
|
rtargv[rtargc++] = argv[++i]; |
118 |
|
break; |
119 |
+ |
case 'w': |
120 |
+ |
rtargv[rtargc++] = argv[i]; |
121 |
+ |
break; |
122 |
|
case 'a': |
123 |
|
rtargv[rtargc++] = argv[i]; |
124 |
|
if (argv[i][2] == 'v') { |
364 |
|
xo = x-hl; |
365 |
|
else |
366 |
|
xo = 0; |
367 |
< |
disc = 1. - (double)(xo*xo + y*y)/(sampdens*sampdens); |
368 |
< |
if (disc <= FTINY) |
367 |
> |
disc = 1. - (double)((long)xo*xo + (long)y*y)/((long)sampdens*sampdens); |
368 |
> |
if (disc <= FTINY*FTINY) |
369 |
|
return(0.); |
370 |
|
return(1./(sampdens*sampdens*sqrt(disc))); |
371 |
|
} |