ghkkghkhgkhgkgh ASAsjJjjjjjjJghkghkghkghkghkghkkhgkghkghgkhkghkghkghkghkgh ASAsjJjjjjjjJJjJhkgyjghjghghkghkg iopiopoiiopiopiopiopiopiopiopiopiopiopiopiopiopiopiopiop op[op[op[op[ J J J JJ po[op[op[op[op[op[po[op[op[ JJ J

if {[catch {package present Tcl 8.6.0}]} return package ifneeded Tk 8.6.8 [list load [file normalize [file join $dir .. libtk8.6.so]] Tk]