1
0
mirror of https://git.dev.opencascade.org/repos/occt.git synced 2025-05-21 10:55:33 +03:00

23 lines
468 B
Plaintext

box b 10 10 10
box b1 20 20 20 30 30 30
explode b
explode b_1
explode b1
explode b1_1
NewDocument D
XAddShape D b
XAddShape D b1
XAddDimension D b_1_1 b1_1_1
#0:1:4:1
XSetDimensionType D 0:1:4:1 2
XSetDimensionValue D 0:1:4:1 6
XSetDimensionPlusMinusTol D 0:1:4:1 -0.001 0.002
XSetDimensionDir D 0:1:4:1 1 1 0
set c_value "6"
set c_type "Location_LinearDistance"
set c_plusminus "lower -0.001 upper 0.002"
set c_dir "0.70710678118654757;0.70710678118654757;0"