mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-10 18:51:21 +03:00
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
25 lines
485 B
Plaintext
25 lines
485 B
Plaintext
#pcone c 25 50 50 180
|
|
#explode c F
|
|
#prism s1 c_3 25.0001 0 -50
|
|
#explode s1 F
|
|
#glue t c s1 c_3 s1_4
|
|
#trotate c 0 0 0 0 0 1 180
|
|
#explode c F
|
|
#prism s1 c_3 25.0001 0 -50
|
|
#explode s1 F
|
|
#glue t2 c s1 c_3 s1_4
|
|
#explode t F
|
|
#explode t2 F
|
|
#don t_1 t_5 t2_1 t2_5
|
|
#sewing s t_1 t_5 t2_1 t2_5
|
|
#explode s Sh
|
|
|
|
restore [locate_data_file CFI_7_c3_fhq.rle] s
|
|
tscale s 0 0 0 SCALE1
|
|
explode s e
|
|
blend result s 5*SCALE1 s_3 5*SCALE1 s_8
|
|
explode result Sh
|
|
tcopy result_1 result
|
|
|
|
set square 1.34325e+07
|