File: TestDICOMTcl.tcl

package info (click to toggle)
vtk-dicom 0.8.17-2
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid
  • size: 7,176 kB
  • sloc: cpp: 113,811; python: 2,041; makefile: 43; tcl: 10
file content (13 lines) | stat: -rw-r--r-- 210 bytes parent folder | download | duplicates (6)
1
2
3
4
5
6
7
8
9
10
11
12
13
package require vtk
package require vtkdicom

vtkDICOMMetaData meta
vtkDICOMReader reader
vtkDICOMWriter writer
writer SetInputConnection [reader GetOutputPort]

meta Delete
reader Delete
writer Delete

exit 0