620208cb4a4de9415e15a8da26bf429cd3471753
[occt.git] / tests / bugs / moddata_1 / bug17
1 puts "TODO OCC12345 ALL: Faulty OCC17: here can be shading problem"
2
3 puts "================"
4 puts "OCC17"
5 puts "================"
6 puts ""
7
8 #####################################################
9 puts " Solid_14 will be the face which is unvisible during displaying entire solid."
10 #####################################################
11
12 restore [locate_data_file OCC17.brep] sh 
13
14 checkshape sh
15
16 explode sh f
17 renamevar sh_14 result
18 tclean result
19 vinit
20 vdisplay result
21 vsetdispmode result 1
22 vfit
23
24 set info [trinfo result]
25 regexp { +([-0-9.+eE]+) +triangles} $info full tri
26 regexp { +([-0-9.+eE]+) +nodes} $info full nod
27
28 if { $tri != 100 && $nod != 94 }  {
29   puts "Faulty OCC17: here can be shading problem"
30 }
31
32 checkview -display result -2d -path ${imagedir}/${test_image}.png
33
34