function is_number ( $str, $adds='' )
        {
#-k     string type is
#-      is every character in this string alpha?
#-      $adds contains additional characters, such as '$,.' to allow '$1,234.56'

        $t = "/^[0-9" . $adds . "]+$/";
        $i = preg_match ( $t, $str );
        return $i;

        }

?>