mirror of
https://github.com/Open-Cascade-SAS/OCCT.git
synced 2026-05-14 12:40:31 +08:00
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"
|