sub isUV {
    my( $i )= @_; 
    return  isIntVal($i) &&  $i == (0|$i);
}