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