1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
|
#by apn on master-master 03.12.2012
#puts "TODO OCC12345 ALL: An exception was caught"
#puts "TODO OCC12345 ALL: \\*\\* Exception *\\*\\*.*"
#puts "TODO OCC12345 ALL: TEST INCOMPLETE"
puts "================"
puts "OCC293"
puts "================"
puts ""
restore [locate_data_file OCC293.brep] a
tclean a
checkshape a
vinit
#vdisplay a
#vfit
renamevar a edge
explode edge e
renamevar edge face
explode face f
chamf result1 face edge_26 face_5 A 1 45
checkshape result1
chamf result2 face edge_30 face_5 A 1 45
checkshape result2
chamf result3 face edge_34 face_5 A 1 45
checkshape result3
chamf result4 face edge_39 face_5 A 1 45
checkshape result4
chamf result5 face edge_35 face_5 A 1 45
checkshape result5
chamf result6 face edge_31 face_5 A 1 45
checkshape result6
chamf result7 face edge_27 face_5 A 1 45
checkshape result7
chamf result8 face edge_24 face_5 A 1 45
checkshape result8
# all contour is :
#chamf result face edge_26 face_5 A 1 45 edge_28 face_5 A 1 45 edge_30 face_5 A 1 45 edge_32 face_5 A 1 45 edge_34 face_5 A 1 45 edge_36 face_5 A 1 45 edge_38 face_5 A 1 45 edge_40 face_5 A 1 45 edge_13 face_5 A 1 45 edge_14 face_5 A 1 45 edge_39 face_5 A 1 45 edge_37 face_5 A 1 45 edge_35 face_5 A 1 45 edge_33 face_5 A 1 45 edge_31 face_5 A 1 45 edge_29 face_5 A 1 45 edge_27 face_5 A 1 45 edge_6 face_5 A 1 45 edge_4 face_5 A 1 45 edge_19 face_5 A 1 45 edge_22 face_5 A 1 45 edge_23 face_5 A 1 45 edge_24 face_5 A 1 45 edge_25 face_5 A 1 45 edge_26 face_5 A 1 45
#checkshape result
vclear
#vdisplay result1
#vdisplay result2
#vdisplay result3
#vdisplay result4
#vdisplay result5
#vdisplay result6
#vdisplay result7
#vdisplay result8
compound result1 result2 result3 result4 result5 result6 result7 result8 result
vdisplay result
vfit
set square 9.80214e+06
set only_screen 1
|
