1
0
mirror of https://git.dev.opencascade.org/repos/occt.git synced 2025-04-04 18:06:22 +03:00

14 lines
210 B
Plaintext

box b 10 10 10
explode b
explode b_1
NewDocument D
XAddShape D b
XAddDimension D b_1_1
#0:1:4:1
XSetDimensionType D 0:1:4:1 14
XSetDimensionValue D 0:1:4:1 1.5
set c_value "1.5"
set c_type "Size_CurveLength"