2 puts "CR25060: Capping breaks highlighting of shaded AIS_Shape with displayed edges."
6 pload MODELING VISUALIZATION
10 vaspects b -setFaceBoundaryDraw 1
11 vclipplane create pln1
12 vclipplane set pln1 object b
13 vclipplane change pln1 equation 0 1 0 -5
14 vclipplane change pln1 capping on
18 checkcolor 304 146 0 1 1
19 if { $stat != 1 } { puts "Error : Highlighting is broken." }
21 vdump $imagedir/${casename}.png