0026833: Create command checkview containing all viewer types
[occt.git] / tests / thrusection / specific / H6
CommitLineData
3bea4c16 1puts "============"
2puts "OCC7166"
3puts "============"
4puts ""
5#######################################################################
6# Improvement of API of ThruSection
7#######################################################################
8
9set BugNumber OCC7166
10
11# spine
12polyline s1 0 0 20 0 0 -20
13
14# profile
15polyline s2 0 5 0 5 0 0 -5 -5 0 0 5 0
16
17# 1 vertex
18vertex v1 5 2.5 -20
19
20mksweep s1
21
22addsweep v1
23addsweep s2
24
25buildsweep result
26
27
58cf74e0 28checkprops result -s 1198.3
3bea4c16 29
a4eba920 30checknbshapes result -vertex 4 -edge 6 -wire 3 -face 3 -shell 1 -solid 0 -compsolid 0 -compound 0 -shape 17
3bea4c16 31
32
3bea4c16 33