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