Restoring test cases removed by last commit.
[occt.git] / tests / bugs / moddata / bug20
... / ...
CommitLineData
1puts "TODO OCC12345 ALL: Faulty OCC20: here is shading problem"
2
3puts "================"
4puts "OCC20"
5puts "================"
6puts ""
7###############################
8## Face apearence in shading mode is wrong
9###############################
10
11pload QAcommands
12restore [locate_data_file OCC20.brep] result
13
14puts [checkshape result]
15
16tclean result
17vinit
18vdisplay result
19vsetdispmode result 1
20
21QASetViewCharac 5.1346924 95.358439 -4.910448 0.23495967 -0.302 0.923899 -0.7304302 0.5722587 0.372815 9.550874 -7.55706 -28.83166
22
23isos result 0
24triangles result
25
26set info [trinfo result]
27regexp { +([-0-9.+eE]+) +triangles} $info full tri
28regexp { +([-0-9.+eE]+) +nodes} $info full nod
29
30if { $tri != 416 || $nod != 367 } {
31 puts "Faulty OCC20: here is shading problem"
32}
33
34set 2dviewer 0
35