Implementação pequena de Tcl
