mirror of
https://github.com/Open-Cascade-SAS/OCCT.git
synced 2026-05-12 11:06:26 +08:00
5 lines
81 B
Plaintext
5 lines
81 B
Plaintext
puts [fixsmall result a 1]
|
|
if { [isdraw result] } {
|
|
puts [checkshape result]
|
|
}
|