mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-07 18:30:55 +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
20 lines
395 B
Plaintext
20 lines
395 B
Plaintext
#box b -15 -15 -15 15 30 30
|
|
#beziercurve w 4 0 0 0 10 0 0 10 10 0 20 10 0
|
|
#mkedge w w
|
|
#wire w w
|
|
#circle profile 0 0 0 1 0 0 10
|
|
#mkedge profile profile
|
|
#wire profile profile
|
|
#mkplane profile profile
|
|
#pipe p w profile
|
|
#explode b F
|
|
#explode p F
|
|
#glue s p b p_2 b_2
|
|
|
|
restore [locate_data_file CFI_6_g12fhd.rle] s
|
|
tscale s 0 0 0 SCALE2
|
|
explode s E
|
|
blend result s 10*SCALE2 s_10
|
|
|
|
set square 4893.19
|