set TheFileName OCC22302.brep set bug_freenodes "OCC22687" set bug_area "OCC22687" #set bug_cross "OCC22687" #set nbcross(ALL) 8 if { [string compare $command "shading"] == 0 } { set nbfreenodes(ALL) 4 } else { set nbfreenodes(ALL) 2 }