#!/usr/local/bin/wish -f
wm withdraw .
send chichot.tcl wm deiconify .top13
send chichot.tcl pack .top13.frame3
exit
