RosettaCodeData/Task/Determine-if-a-string-is-numeric/Tcl/determine-if-a-string-is-numeric.tcl

proc isNumeric str {string is double -strict $str}