puts "============" puts "OCC24606" puts "============" puts "" #################################################################################### # Tests ::FitDepth and ::FitAll implementation of V3d_View. #################################################################################### set check_x 402 set check_y 320 restore [locate_data_file bug24606.brep] shape vinit View1 vautozfit 0 vsetdispmode 1 vdisplay shape OCC24606 vmoveto $check_x $check_y checkcolor $check_x $check_y 0 1 1 if {$stat != 1} { puts "Error : V3d view ::FitAll is broken." } vdump ${imagedir}/${casename}_1.png vinit View2 vautozfit 1 vsetdispmode 1 vdisplay shape OCC24606 vmoveto $check_x $check_y checkcolor $check_x $check_y 0 1 1 if {$stat != 1} { puts "Error : V3d view ::FitAll is broken." } vdump ${imagedir}/${casename}_2.png