set TheFileName shading_014.brep if { [string compare $command "shading"] == 0 } { set bug_freenodes "OCC22687" set nbfreenodes(All) 1 }