You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
18 lines
387 B
18 lines
387 B
package require vtk
|
|
package require vtkinteraction
|
|
package require vtktesting
|
|
|
|
# Load base (spike and test)
|
|
|
|
source [file join [file dirname [info script]] TestStyleBase.tcl]
|
|
source [file join [file dirname [info script]] TestStyleBaseSpike.tcl]
|
|
|
|
# Set interactor style
|
|
|
|
vtkInteractorStyleTerrain inStyle
|
|
iren SetInteractorStyle inStyle
|
|
iren Initialize
|
|
|
|
# Test style
|
|
|
|
test_style inStyle
|
|
|