0029076: Visualization - implement element shrinking Shader
[occt.git] / tests / bugs / mesh / bug29751
1 puts "======="
2 puts "0029751: Incremental mesh produces different meshes for windows and linux (debian 8)"
3 puts "======="
4 puts ""
5
6 psphere sp 10
7 pcylinder b1 2 10
8 ttranslate b1 0 0 -10
9 bcut result sp b1
10 trotate result 0 0 0 1 0 0 45
11 incmesh result 0.1
12
13 vclear
14 vinit View1
15 vaxo
16 vdefaults -autoTriang 0
17 vdisplay -dispMode 1 result
18 vaspects result -setInteriorStyle HOLLOW -setDrawEdges 1
19 vfit
20
21 set log [tricheck result]
22 if { [llength $log] != 0 } {
23   puts "Error : Invalid mesh"
24 } else {
25   puts "Mesh is OK"
26 }
27
28 checktrinfo result -tri 1013 -nod 578 -defl 0.1
29
30 checkview -screenshot -3d -path ${imagedir}/${test_image}.png