0024606: DepthFitAll and ZFitAll do not eliminate z-clipping
[occt.git] / tests / bugs / vis / bug24606
1 puts "============"
2 puts "OCC24606"
3 puts "============"
4 puts ""
5 ####################################################################################
6 # Tests ::FitDepth and ::FitAll implementation of V3d_View.
7 ####################################################################################
8
9 set check_x 402
10 set check_y 320
11
12 restore [locate_data_file bug24606.brep] shape
13
14 vinit View1
15 vautozfit 0
16 vsetdispmode 1
17 vdisplay shape
18 OCC24606
19 vmoveto $check_x $check_y
20
21 checkcolor $check_x $check_y 0 1 1
22
23 if {$stat != 1} {
24     puts "Error : V3d view ::FitAll is broken."
25 }
26 vdump ${imagedir}/${casename}_1.png
27
28 vinit View2
29 vautozfit 1
30 vsetdispmode 1
31 vdisplay shape
32 OCC24606
33 vmoveto $check_x $check_y
34
35 checkcolor $check_x $check_y 0 1 1
36
37 if {$stat != 1} {
38     puts "Error : V3d view ::FitAll is broken."
39 }
40 vdump ${imagedir}/${casename}_2.png