File: TestDivergence.tcl

package info (click to toggle)
paraview 4.0.1-1~bpo70%2B1
  • links: PTS, VCS
  • area: main
  • in suites: wheezy-backports
  • size: 526,572 kB
  • sloc: cpp: 2,284,430; ansic: 816,374; python: 239,936; xml: 70,162; tcl: 48,295; fortran: 39,116; yacc: 5,466; java: 3,518; perl: 3,107; lex: 1,620; sh: 1,555; makefile: 932; asm: 471; pascal: 228
file content (30 lines) | stat: -rw-r--r-- 508 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
28
29
30
# Divergence measures rate of change of gradient.
package require vtk


# Image pipeline

vtkPNGReader reader
reader SetFileName "$VTK_DATA_ROOT/Data/fullhead15.png"

vtkImageGradient gradient
gradient SetDimensionality 2
gradient SetInputConnection [reader GetOutputPort]

vtkImageDivergence derivative
derivative SetInputConnection [gradient GetOutputPort]

vtkImageViewer viewer
viewer SetInputConnection [derivative GetOutputPort]
viewer SetColorWindow 1000
viewer SetColorLevel 0


viewer Render