mirror of
https://github.com/Open-Cascade-SAS/OCCT.git
synced 2026-05-12 02:40:22 +08:00
21 lines
380 B
Plaintext
Executable File
21 lines
380 B
Plaintext
Executable File
if { [array get Draw_Groups "TOPOLOGY Check commands"] == "" } {
|
|
pload TOPTEST
|
|
}
|
|
|
|
# To prevent loops limit to 5 minutes
|
|
cpulimit 300
|
|
|
|
dset SCALE 100
|
|
protect SCALE
|
|
|
|
if {[string compare [datadir] "."] == 0} {
|
|
datadir [file dirname [info script]]/data
|
|
}
|
|
if { [info exists imagedir] == 0 } {
|
|
set imagedir .
|
|
}
|
|
|
|
if { [info exists test_image ] == 0 } {
|
|
set test_image photo
|
|
}
|