0025945: Make stable checking of shape global properties in tests
[occt.git] / tests / blend / tolblend_simple / D8
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
10 #donly s_3  s_1 s_2  s_4  
11 #sewing t  s_3  s_1 s_2  s_4 
12 #explode t sh
13 #save t_1 5_B12.draw 
14
15 restore [locate_data_file CFI_5_b12fgg.rle] s
16 tscale s 0 0 0 SCALE1 
17 explode s E 
18 blend result s 0.5*SCALE1 s_4 0.5*SCALE1 s_8 
19 explode result sh 
20 tcopy result_1 result 
21
22 checkprops result -s 4825.16