mirror of
https://github.com/Open-Cascade-SAS/OCCT.git
synced 2026-08-10 16:32:33 +08:00
vtn
9 lines
236 B
Plaintext
9 lines
236 B
Plaintext
# test for creation of bottle as in tutorial (script is in samples)
|
|
source $env(CASROOT)/samples/tcl/bottle.tcl
|
|
|
|
# check result for validity and make a snapshot
|
|
checkshape bottle
|
|
vdump $imagedir/${test_image}.png
|
|
|
|
puts "TEST COMPLETED"
|