mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-03 17:56:21 +03:00
24 lines
411 B
Plaintext
Executable File
24 lines
411 B
Plaintext
Executable File
# File : begin
|
|
|
|
if { [info exists WorkDirectory] == 0 } {
|
|
set WorkDirectory "/tmp"
|
|
if { [array get env TEMP] != "" } {
|
|
set WorkDirectory "$env(TEMP)"
|
|
}
|
|
}
|
|
|
|
if { [array get Draw_Groups "DF basic commands"] == "" } {
|
|
pload DCAF
|
|
}
|
|
|
|
chrono qat start
|
|
# Create a new document and set UndoLimit
|
|
NewDocument D MDTV-Standard
|
|
|
|
#NewDocument D
|
|
cpulimit 300
|
|
UndoLimit D 100
|
|
|
|
# Open a transaction
|
|
NewCommand D
|