source [file join $dir critcl.tcl]
critcl::loadlib $dir ascenc 0.12