Re: Negative Welch-Stetson Index

[Doug Welch <welch@physics.mcmaster.ca>]

On Thu, 13 Jun 2002, jg wrote:

> Doug Welch wrote:
> > 
> > John,
> > 
> > You are correct that stars need to meet a certain set of criteria
> > to make into the output. However, the index=0.000 case will make it
> > through, as far as I can see. Why do you think otherwise?
> > 
> > Doug
> 
> 
> AhAh! Don't know perl at all but the following from the wsv3.pl on the
> CD suggests an output of 0.000 is not going to happen :-
> 
> >   if ($ws >  0.000 && $ws < 0.001) { $ws =  0.001; }
> >   if ($ws > -0.001 && $ws < 0.000) { $ws = -0.001; }
> 
> (immediately followed by the printf output statement)
> 
> So the 0.000 ones are being reported, but not noted as such?  Needs
> 0.000 to +/- 0.00049999 conditionals to get $ws = 0?
> 

John,

The conditionals are not >= or <=, so 0.000 makes it through
unscathed. The only reason I put those statements in was to
avoid floats being printed. This was probably unnecessary -
I didn't check what PERL actually does in those circumstances.

Still, 0.000 should make it out. It just is not all that likely
a value.

Cheer,
Doug