Restoring test cases removed by last commit.
[occt.git] / tests / bugs / moddata / bug428
CommitLineData
a87752f3 1puts "========"
2puts "OCC428"
3puts "SAM1414"
4puts "========"
5
6################################################
7## Exception during vizualization on attached shape in application.
8## Exception is raised in the package StdPrs.
9################################################
10
11restore [locate_data_file OCC428.brep] result
12
13tclean result
14vinit
15vdisplay result
16vsetdispmode result 1
17vclear
18
19isos result 0
20triangles result
21vfit
22
23set tri_info [trinfo result]
24regexp { +([-0-9.+eE]+) +triangles} $tri_info full tri
25regexp { +([-0-9.+eE]+) +nodes} $tri_info full nod
26
27if { $tri == 5496 && $nod == 5406 } {
28 puts "Warning OCC428: here is shading problem, but source shape is invalid"
29} else {
30 puts "Warning OCC428: Shading of OCC428 was made, source shape is invalid"
31}
32
33set 3dviewer 1
34