mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-03 17:56:21 +03:00
11 lines
170 B
Plaintext
Executable File
11 lines
170 B
Plaintext
Executable File
smallview
|
|
clear
|
|
if { [isdraw result] } {
|
|
donly result
|
|
} else {
|
|
puts "Error : result shape is not done."
|
|
}
|
|
fit
|
|
xwd $imagedir/${test_image}.gif
|
|
puts "TEST COMPLETED"
|