#!/bin/sh
# Mude de "sh" para "wish": \
exec wish "$0" -- "$@"

source $env(HOME)/TCL/inc.tcl
eval [lindex $argv 1]