File: TestNormalize.tcl

package info (click to toggle)
paraview 3.2.2-1
  • links: PTS, VCS
  • area: main
  • in suites: lenny
  • size: 124,600 kB
  • ctags: 133,728
  • sloc: cpp: 958,817; ansic: 509,658; tcl: 45,787; xml: 23,401; python: 19,574; perl: 3,112; yacc: 1,787; java: 1,517; sh: 665; asm: 471; lex: 400; makefile: 168; objc: 28
file content (27 lines) | stat: -rw-r--r-- 584 bytes parent folder | download | duplicates (20)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
package require vtk

# This script is for testing the normalize filter.
# Image pipeline

vtkImageSinusoidSource cos
cos SetWholeExtent 0 225 0 225 0 20
cos SetAmplitude 250
cos SetDirection 1 1 1
cos SetPeriod 20
cos ReleaseDataFlagOff

vtkImageGradient gradient
gradient SetInputConnection [cos GetOutputPort]
gradient SetDimensionality 3

vtkImageNormalize norm
norm SetInputConnection [gradient GetOutputPort]

vtkImageViewer viewer
#viewer DebugOn
viewer SetInputConnection [norm GetOutputPort]
viewer SetZSlice 10
viewer SetColorWindow 2.0
viewer SetColorLevel 0

viewer Render