simple01-ref.tcl 289 Bytes