if { ! [info exist wtk_version] } { if {![info exists env(FGLDIR)]} { set env(FGLDIR) "/wtkclt" } } else { set env(FGLDIR) [pwd] }