0025945: Make stable checking of shape global properties in tests
[occt.git] / tests / blend / tolblend_simple / D6
1 puts "TODO ?OCC24156 MacOS: TEST INCOMPLETE"
2
3 #polyline d 0 0 0  0 5 0 7 7 -1
4 #polyline dd -5 0 -5  -5 0 5  5 0 5  5 0 -5 -5 0 -5
5 #mkplane dd dd
6 #wire d d
7 #pipe s d dd
8 #explode s F 
9 #donly s_3  s_1 s_2  s_4  
10 #sewing t  s_3  s_1 s_2  s_4 
11 #explode t sh
12 #save t_1 5_B12.draw 
13
14 restore [locate_data_file CFI_5_b12fgg.rle] s
15 tscale s 0 0 0 SCALE1
16 explode s E 
17 blend result s 0.5*SCALE1 s_4 0.5*SCALE1 s_8 0.5*SCALE1 s_7 
18 explode result sh
19 tcopy result_1 result
20
21 checkprops result -s 4811.88