occt/src/QAResources/QADrawAppliInit

global tcl_platform

source $env(DRAWDEFAULTOLD)

###catch {pload ALL}
catch {pload FULL}
#catch {pload -DrawPluginProducts ALL}
catch {pload -DrawPluginProducts OMF CANONICALRECOGNITION EMESH PARASOLID DXF SAT }
catch {pload -DrawPluginQA QAcommands}

###foreach h [array names Draw_Groups] {
###	foreach f $Draw_Groups($h) {
###		QARebuild $f
###	}
###}

catch {source $env(CSF_DrawPluginQADefaults)/QARebuildCommands}