sub isNVint {
    my( $i )= @_;
    return  isIntVal($i)  &&  $i == int($i);
}