0024224: Suspicious logics in changing clipping planes at OpenGl_Structure
[occt.git] / tests / bugs / vis / bug19820
1 puts "============"
2 puts "OCC19820"
3 puts "============"
4 puts ""
5 #######################################################################
6 # 3D discrete topology (voxels)
7 #######################################################################
8
9 set BugNumber OCC19820
10
11 set status 0
12
13 puts "1.  voxelboolds ..."
14 if [catch {voxelboolds}] {
15    set status 1
16 }
17
18 puts "2.  voxelcolords ..."
19 if [catch {voxelcolords}] {
20    set status 1
21 }
22
23 puts "3.  voxelfloatds ..."
24 if [catch {voxelfloatds}] {
25    set status 1
26 }
27
28 puts "4.  voxeloctboolds ..."
29 if [catch {voxeloctboolds}] {
30    set status 1
31 }
32
33 puts "5.  voxelroctboolds ..."
34 if [catch {voxelroctboolds}] {
35    set status 1
36 }
37
38 puts "6.  voxelfuseboolds ..."
39 if [catch {voxelfuseboolds}] {
40    set status 1
41 }
42
43 puts "7.  voxelfusecolords ..."
44 if [catch {voxelfusecolords}] {
45    set status 1
46 }
47
48 puts "8.  voxelfusefloatds ..."
49 if [catch {voxelfusefloatds}] {
50    set status 1
51 }
52
53 puts "9.  voxelcutboolds ..."
54 if [catch {voxelcutboolds}] {
55    set status 1
56 }
57
58 puts "10. voxelcutcolords ..."
59 if [catch {voxelcutcolords}] {
60    set status 1
61 }
62
63 puts "11. voxelcutfloatds ..."
64 if [catch {voxelcutfloatds}] {
65    set status 1
66 }
67
68 if { ${status} != 0 } {
69    puts "Faulty ${BugNumber}"
70 } else {
71    puts "OK ${BugNumber}"
72 }
73