sub isTrue # !
  {
     my $obj = shift;
     $obj == NaN || $obj
  }