mirror of
https://github.com/Open-Cascade-SAS/OCCT.git
synced 2026-08-10 00:02:41 +08:00
aml
e1ed38e054
Method for preanalysis of input data added (CheckInputData). Now it is possible to work with Error() function, which return error code. Extended output support for all offset commands added. Test-cases for issue #26556
34 lines
789 B
Plaintext
Executable File
34 lines
789 B
Plaintext
Executable File
puts "TODO OCC23068 ALL: ERROR. offsetperform operation not done."
|
|
puts "TODO OCC23068 ALL: result is not a topological shape!!!"
|
|
puts "TODO OCC23068 ALL: TEST INCOMPLETE"
|
|
|
|
puts "========================"
|
|
puts " OCC427 "
|
|
puts "(case 6)"
|
|
puts "========================"
|
|
puts ""
|
|
cpulimit 1200
|
|
proc OFFSETSHAPE {distance faces calcul type} {
|
|
uplevel #0 explode s f
|
|
uplevel #0 offsetparameter 1e-7 $calcul $type
|
|
uplevel #0 offsetload s $distance $faces
|
|
uplevel #0 offsetperform result
|
|
}
|
|
|
|
#Shell no rough and rounded mode
|
|
|
|
set calcul "c"
|
|
set type "i"
|
|
|
|
circle w -20 0 0 20
|
|
mkedge w w 0 pi*2/5
|
|
wire w w
|
|
polyline profile 0 0 0 10 0 0 5 0 5 0 0 0
|
|
mkplane profile profile
|
|
pipe s w profile
|
|
|
|
OFFSETSHAPE 1 {s_4 s_5} $calcul $type
|
|
|
|
set square 808.448
|
|
set 2dviewer 0
|