mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-08-04 13:13:25 +03:00
34dd4990ed
Modifications: 1.Test cases 2. locate_data_file from DrawResources/TestCommands.tcl Fix for mesh end Adjusting testing cases for current state of master using new organization of data files
21 lines
421 B
Plaintext
21 lines
421 B
Plaintext
#polyline d 0 0 0 0 5 0 7 7 -1
|
|
#polyline dd -5 0 -5 -5 0 5 5 0 5 5 0 -5 -5 0 -5
|
|
#mkplane dd dd
|
|
#wire d d
|
|
#pipe s d dd
|
|
#explode s F
|
|
|
|
#donly s_3 s_1 s_2 s_4
|
|
#sewing t s_3 s_1 s_2 s_4
|
|
#explode t sh
|
|
#save t_1 5_B12.draw
|
|
|
|
restore [locate_data_file CFI_5_b12fgg.rle] s
|
|
tscale s 0 0 0 SCALE1
|
|
explode s E
|
|
blend result s 0.5*SCALE1 s_4 0.5*SCALE1 s_7
|
|
explode result sh
|
|
tcopy result_1 result
|
|
|
|
set square 4836.94
|