set env(VTCL_HOME) [pwd]
source vtcl.tcl