Benchmark done in Tcl

A Tcl implementation of the benchmark. Run with tclsh (at least version
8.4 needed).