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.
508 lines
16 KiB
508 lines
16 KiB
2 years ago
|
package require vtk
|
||
|
|
package require vtkinteraction
|
||
|
|
package require vtktesting
|
||
|
|
|
||
|
|
# Contour every quadratic cell type
|
||
|
|
|
||
|
|
# Create a scene with one of each cell type.
|
||
|
|
# QuadraticEdge
|
||
|
|
vtkPoints edgePoints
|
||
|
|
edgePoints SetNumberOfPoints 3
|
||
|
|
edgePoints InsertPoint 0 0 0 0
|
||
|
|
edgePoints InsertPoint 1 1.0 0 0
|
||
|
|
edgePoints InsertPoint 2 0.5 0.25 0
|
||
|
|
vtkFloatArray edgeScalars
|
||
|
|
edgeScalars SetNumberOfTuples 3
|
||
|
|
edgeScalars InsertValue 0 0.0
|
||
|
|
edgeScalars InsertValue 1 0.0
|
||
|
|
edgeScalars InsertValue 2 0.9
|
||
|
|
vtkQuadraticEdge aEdge
|
||
|
|
[aEdge GetPointIds] SetId 0 0
|
||
|
|
[aEdge GetPointIds] SetId 1 1
|
||
|
|
[aEdge GetPointIds] SetId 2 2
|
||
|
|
vtkUnstructuredGrid aEdgeGrid
|
||
|
|
aEdgeGrid Allocate 1 1
|
||
|
|
aEdgeGrid InsertNextCell [aEdge GetCellType] [aEdge GetPointIds]
|
||
|
|
aEdgeGrid SetPoints edgePoints
|
||
|
|
[aEdgeGrid GetPointData] SetScalars edgeScalars
|
||
|
|
vtkClipDataSet edgeContours
|
||
|
|
edgeContours SetInput aEdgeGrid
|
||
|
|
edgeContours SetValue 0.5
|
||
|
|
vtkDataSetMapper aEdgeContourMapper
|
||
|
|
aEdgeContourMapper SetInputConnection [edgeContours GetOutputPort]
|
||
|
|
aEdgeContourMapper ScalarVisibilityOff
|
||
|
|
vtkDataSetMapper aEdgeMapper
|
||
|
|
aEdgeMapper SetInput aEdgeGrid
|
||
|
|
aEdgeMapper ScalarVisibilityOff
|
||
|
|
vtkActor aEdgeActor
|
||
|
|
aEdgeActor SetMapper aEdgeMapper
|
||
|
|
[aEdgeActor GetProperty] SetRepresentationToWireframe
|
||
|
|
[aEdgeActor GetProperty] SetAmbient 1.0
|
||
|
|
vtkActor aEdgeContourActor
|
||
|
|
aEdgeContourActor SetMapper aEdgeContourMapper
|
||
|
|
[aEdgeContourActor GetProperty] BackfaceCullingOn
|
||
|
|
[aEdgeContourActor GetProperty] SetAmbient 1.0
|
||
|
|
|
||
|
|
# Quadratic triangle
|
||
|
|
vtkPoints triPoints
|
||
|
|
triPoints SetNumberOfPoints 6
|
||
|
|
triPoints InsertPoint 0 0.0 0.0 0.0
|
||
|
|
triPoints InsertPoint 1 1.0 0.0 0.0
|
||
|
|
triPoints InsertPoint 2 0.5 0.8 0.0
|
||
|
|
triPoints InsertPoint 3 0.5 0.0 0.0
|
||
|
|
triPoints InsertPoint 4 0.75 0.4 0.0
|
||
|
|
triPoints InsertPoint 5 0.25 0.4 0.0
|
||
|
|
vtkFloatArray triScalars
|
||
|
|
triScalars SetNumberOfTuples 6
|
||
|
|
triScalars InsertValue 0 0.0
|
||
|
|
triScalars InsertValue 1 0.0
|
||
|
|
triScalars InsertValue 2 0.0
|
||
|
|
triScalars InsertValue 3 1.0
|
||
|
|
triScalars InsertValue 4 0.0
|
||
|
|
triScalars InsertValue 5 0.0
|
||
|
|
vtkQuadraticTriangle aTri
|
||
|
|
[aTri GetPointIds] SetId 0 0
|
||
|
|
[aTri GetPointIds] SetId 1 1
|
||
|
|
[aTri GetPointIds] SetId 2 2
|
||
|
|
[aTri GetPointIds] SetId 3 3
|
||
|
|
[aTri GetPointIds] SetId 4 4
|
||
|
|
[aTri GetPointIds] SetId 5 5
|
||
|
|
vtkUnstructuredGrid aTriGrid
|
||
|
|
aTriGrid Allocate 1 1
|
||
|
|
aTriGrid InsertNextCell [aTri GetCellType] [aTri GetPointIds]
|
||
|
|
aTriGrid SetPoints triPoints
|
||
|
|
[aTriGrid GetPointData] SetScalars triScalars
|
||
|
|
vtkClipDataSet triContours
|
||
|
|
triContours SetInput aTriGrid
|
||
|
|
triContours SetValue 0.5
|
||
|
|
vtkDataSetMapper aTriContourMapper
|
||
|
|
aTriContourMapper SetInputConnection [triContours GetOutputPort]
|
||
|
|
aTriContourMapper ScalarVisibilityOff
|
||
|
|
vtkDataSetMapper aTriMapper
|
||
|
|
aTriMapper SetInput aTriGrid
|
||
|
|
aTriMapper ScalarVisibilityOff
|
||
|
|
vtkActor aTriActor
|
||
|
|
aTriActor SetMapper aTriMapper
|
||
|
|
[aTriActor GetProperty] SetRepresentationToWireframe
|
||
|
|
[aTriActor GetProperty] SetAmbient 1.0
|
||
|
|
vtkActor aTriContourActor
|
||
|
|
aTriContourActor SetMapper aTriContourMapper
|
||
|
|
[aTriContourActor GetProperty] BackfaceCullingOn
|
||
|
|
[aTriContourActor GetProperty] SetAmbient 1.0
|
||
|
|
|
||
|
|
# Quadratic quadrilateral
|
||
|
|
vtkPoints quadPoints
|
||
|
|
quadPoints SetNumberOfPoints 8
|
||
|
|
quadPoints InsertPoint 0 0.0 0.0 0.0
|
||
|
|
quadPoints InsertPoint 1 1.0 0.0 0.0
|
||
|
|
quadPoints InsertPoint 2 1.0 1.0 0.0
|
||
|
|
quadPoints InsertPoint 3 0.0 1.0 0.0
|
||
|
|
quadPoints InsertPoint 4 0.5 0.0 0.0
|
||
|
|
quadPoints InsertPoint 5 1.0 0.5 0.0
|
||
|
|
quadPoints InsertPoint 6 0.5 1.0 0.0
|
||
|
|
quadPoints InsertPoint 7 0.0 0.5 0.0
|
||
|
|
vtkFloatArray quadScalars
|
||
|
|
quadScalars SetNumberOfTuples 8
|
||
|
|
quadScalars InsertValue 0 0.0
|
||
|
|
quadScalars InsertValue 1 0.0
|
||
|
|
quadScalars InsertValue 2 1.0
|
||
|
|
quadScalars InsertValue 3 1.0
|
||
|
|
quadScalars InsertValue 4 1.0
|
||
|
|
quadScalars InsertValue 5 0.0
|
||
|
|
quadScalars InsertValue 6 0.0
|
||
|
|
quadScalars InsertValue 7 0.0
|
||
|
|
vtkQuadraticQuad aQuad
|
||
|
|
[aQuad GetPointIds] SetId 0 0
|
||
|
|
[aQuad GetPointIds] SetId 1 1
|
||
|
|
[aQuad GetPointIds] SetId 2 2
|
||
|
|
[aQuad GetPointIds] SetId 3 3
|
||
|
|
[aQuad GetPointIds] SetId 4 4
|
||
|
|
[aQuad GetPointIds] SetId 5 5
|
||
|
|
[aQuad GetPointIds] SetId 6 6
|
||
|
|
[aQuad GetPointIds] SetId 7 7
|
||
|
|
vtkUnstructuredGrid aQuadGrid
|
||
|
|
aQuadGrid Allocate 1 1
|
||
|
|
aQuadGrid InsertNextCell [aQuad GetCellType] [aQuad GetPointIds]
|
||
|
|
aQuadGrid SetPoints quadPoints
|
||
|
|
[aQuadGrid GetPointData] SetScalars quadScalars
|
||
|
|
vtkClipDataSet quadContours
|
||
|
|
quadContours SetInput aQuadGrid
|
||
|
|
quadContours SetValue 0.5
|
||
|
|
vtkDataSetMapper aQuadContourMapper
|
||
|
|
aQuadContourMapper SetInputConnection [quadContours GetOutputPort]
|
||
|
|
aQuadContourMapper ScalarVisibilityOff
|
||
|
|
vtkDataSetMapper aQuadMapper
|
||
|
|
aQuadMapper SetInput aQuadGrid
|
||
|
|
aQuadMapper ScalarVisibilityOff
|
||
|
|
vtkActor aQuadActor
|
||
|
|
aQuadActor SetMapper aQuadMapper
|
||
|
|
[aQuadActor GetProperty] SetRepresentationToWireframe
|
||
|
|
[aQuadActor GetProperty] SetAmbient 1.0
|
||
|
|
vtkActor aQuadContourActor
|
||
|
|
aQuadContourActor SetMapper aQuadContourMapper
|
||
|
|
[aQuadContourActor GetProperty] BackfaceCullingOn
|
||
|
|
[aQuadContourActor GetProperty] SetAmbient 1.0
|
||
|
|
|
||
|
|
# Quadratic tetrahedron
|
||
|
|
vtkPoints tetPoints
|
||
|
|
tetPoints SetNumberOfPoints 10
|
||
|
|
tetPoints InsertPoint 0 0.0 0.0 0.0
|
||
|
|
tetPoints InsertPoint 1 1.0 0.0 0.0
|
||
|
|
tetPoints InsertPoint 2 0.5 0.8 0.0
|
||
|
|
tetPoints InsertPoint 3 0.5 0.4 1.0
|
||
|
|
tetPoints InsertPoint 4 0.5 0.0 0.0
|
||
|
|
tetPoints InsertPoint 5 0.75 0.4 0.0
|
||
|
|
tetPoints InsertPoint 6 0.25 0.4 0.0
|
||
|
|
tetPoints InsertPoint 7 0.25 0.2 0.5
|
||
|
|
tetPoints InsertPoint 8 0.75 0.2 0.5
|
||
|
|
tetPoints InsertPoint 9 0.50 0.6 0.5
|
||
|
|
vtkFloatArray tetScalars
|
||
|
|
tetScalars SetNumberOfTuples 10
|
||
|
|
tetScalars InsertValue 0 1.0
|
||
|
|
tetScalars InsertValue 1 1.0
|
||
|
|
tetScalars InsertValue 2 1.0
|
||
|
|
tetScalars InsertValue 3 1.0
|
||
|
|
tetScalars InsertValue 4 0.0
|
||
|
|
tetScalars InsertValue 5 0.0
|
||
|
|
tetScalars InsertValue 6 0.0
|
||
|
|
tetScalars InsertValue 7 0.0
|
||
|
|
tetScalars InsertValue 8 0.0
|
||
|
|
tetScalars InsertValue 9 0.0
|
||
|
|
vtkQuadraticTetra aTet
|
||
|
|
[aTet GetPointIds] SetId 0 0
|
||
|
|
[aTet GetPointIds] SetId 1 1
|
||
|
|
[aTet GetPointIds] SetId 2 2
|
||
|
|
[aTet GetPointIds] SetId 3 3
|
||
|
|
[aTet GetPointIds] SetId 4 4
|
||
|
|
[aTet GetPointIds] SetId 5 5
|
||
|
|
[aTet GetPointIds] SetId 6 6
|
||
|
|
[aTet GetPointIds] SetId 7 7
|
||
|
|
[aTet GetPointIds] SetId 8 8
|
||
|
|
[aTet GetPointIds] SetId 9 9
|
||
|
|
vtkUnstructuredGrid aTetGrid
|
||
|
|
aTetGrid Allocate 1 1
|
||
|
|
aTetGrid InsertNextCell [aTet GetCellType] [aTet GetPointIds]
|
||
|
|
aTetGrid SetPoints tetPoints
|
||
|
|
[aTetGrid GetPointData] SetScalars tetScalars
|
||
|
|
vtkClipDataSet tetContours
|
||
|
|
tetContours SetInput aTetGrid
|
||
|
|
tetContours SetValue 0.5
|
||
|
|
vtkDataSetMapper aTetContourMapper
|
||
|
|
aTetContourMapper SetInputConnection [tetContours GetOutputPort]
|
||
|
|
aTetContourMapper ScalarVisibilityOff
|
||
|
|
vtkDataSetMapper aTetMapper
|
||
|
|
aTetMapper SetInput aTetGrid
|
||
|
|
aTetMapper ScalarVisibilityOff
|
||
|
|
vtkActor aTetActor
|
||
|
|
aTetActor SetMapper aTetMapper
|
||
|
|
[aTetActor GetProperty] SetRepresentationToWireframe
|
||
|
|
[aTetActor GetProperty] SetAmbient 1.0
|
||
|
|
vtkActor aTetContourActor
|
||
|
|
aTetContourActor SetMapper aTetContourMapper
|
||
|
|
[aTetContourActor GetProperty] SetAmbient 1.0
|
||
|
|
|
||
|
|
# Quadratic hexahedron
|
||
|
|
vtkPoints hexPoints
|
||
|
|
hexPoints SetNumberOfPoints 20
|
||
|
|
hexPoints InsertPoint 0 0 0 0
|
||
|
|
hexPoints InsertPoint 1 1 0 0
|
||
|
|
hexPoints InsertPoint 2 1 1 0
|
||
|
|
hexPoints InsertPoint 3 0 1 0
|
||
|
|
hexPoints InsertPoint 4 0 0 1
|
||
|
|
hexPoints InsertPoint 5 1 0 1
|
||
|
|
hexPoints InsertPoint 6 1 1 1
|
||
|
|
hexPoints InsertPoint 7 0 1 1
|
||
|
|
hexPoints InsertPoint 8 0.5 0 0
|
||
|
|
hexPoints InsertPoint 9 1 0.5 0
|
||
|
|
hexPoints InsertPoint 10 0.5 1 0
|
||
|
|
hexPoints InsertPoint 11 0 0.5 0
|
||
|
|
hexPoints InsertPoint 12 0.5 0 1
|
||
|
|
hexPoints InsertPoint 13 1 0.5 1
|
||
|
|
hexPoints InsertPoint 14 0.5 1 1
|
||
|
|
hexPoints InsertPoint 15 0 0.5 1
|
||
|
|
hexPoints InsertPoint 16 0 0 0.5
|
||
|
|
hexPoints InsertPoint 17 1 0 0.5
|
||
|
|
hexPoints InsertPoint 18 1 1 0.5
|
||
|
|
hexPoints InsertPoint 19 0 1 0.5
|
||
|
|
vtkFloatArray hexScalars
|
||
|
|
hexScalars SetNumberOfTuples 20
|
||
|
|
hexScalars InsertValue 0 1.0
|
||
|
|
hexScalars InsertValue 1 1.0
|
||
|
|
hexScalars InsertValue 2 1.0
|
||
|
|
hexScalars InsertValue 3 1.0
|
||
|
|
hexScalars InsertValue 4 1.0
|
||
|
|
hexScalars InsertValue 5 1.0
|
||
|
|
hexScalars InsertValue 6 1.0
|
||
|
|
hexScalars InsertValue 7 1.0
|
||
|
|
hexScalars InsertValue 8 0.0
|
||
|
|
hexScalars InsertValue 9 0.0
|
||
|
|
hexScalars InsertValue 10 0.0
|
||
|
|
hexScalars InsertValue 11 0.0
|
||
|
|
hexScalars InsertValue 12 0.0
|
||
|
|
hexScalars InsertValue 13 0.0
|
||
|
|
hexScalars InsertValue 14 0.0
|
||
|
|
hexScalars InsertValue 15 0.0
|
||
|
|
hexScalars InsertValue 16 0.0
|
||
|
|
hexScalars InsertValue 17 0.0
|
||
|
|
hexScalars InsertValue 18 0.0
|
||
|
|
hexScalars InsertValue 19 0.0
|
||
|
|
vtkQuadraticHexahedron aHex
|
||
|
|
[aHex GetPointIds] SetId 0 0
|
||
|
|
[aHex GetPointIds] SetId 1 1
|
||
|
|
[aHex GetPointIds] SetId 2 2
|
||
|
|
[aHex GetPointIds] SetId 3 3
|
||
|
|
[aHex GetPointIds] SetId 4 4
|
||
|
|
[aHex GetPointIds] SetId 5 5
|
||
|
|
[aHex GetPointIds] SetId 6 6
|
||
|
|
[aHex GetPointIds] SetId 7 7
|
||
|
|
[aHex GetPointIds] SetId 8 8
|
||
|
|
[aHex GetPointIds] SetId 9 9
|
||
|
|
[aHex GetPointIds] SetId 10 10
|
||
|
|
[aHex GetPointIds] SetId 11 11
|
||
|
|
[aHex GetPointIds] SetId 12 12
|
||
|
|
[aHex GetPointIds] SetId 13 13
|
||
|
|
[aHex GetPointIds] SetId 14 14
|
||
|
|
[aHex GetPointIds] SetId 15 15
|
||
|
|
[aHex GetPointIds] SetId 16 16
|
||
|
|
[aHex GetPointIds] SetId 17 17
|
||
|
|
[aHex GetPointIds] SetId 18 18
|
||
|
|
[aHex GetPointIds] SetId 19 19
|
||
|
|
vtkUnstructuredGrid aHexGrid
|
||
|
|
aHexGrid Allocate 1 1
|
||
|
|
aHexGrid InsertNextCell [aHex GetCellType] [aHex GetPointIds]
|
||
|
|
aHexGrid SetPoints hexPoints
|
||
|
|
[aHexGrid GetPointData] SetScalars hexScalars
|
||
|
|
vtkClipDataSet hexContours
|
||
|
|
hexContours SetInput aHexGrid
|
||
|
|
hexContours SetValue 0.5
|
||
|
|
vtkDataSetMapper aHexContourMapper
|
||
|
|
aHexContourMapper SetInputConnection [hexContours GetOutputPort]
|
||
|
|
aHexContourMapper ScalarVisibilityOff
|
||
|
|
vtkDataSetMapper aHexMapper
|
||
|
|
aHexMapper SetInput aHexGrid
|
||
|
|
aHexMapper ScalarVisibilityOff
|
||
|
|
vtkActor aHexActor
|
||
|
|
aHexActor SetMapper aHexMapper
|
||
|
|
[aHexActor GetProperty] SetRepresentationToWireframe
|
||
|
|
[aHexActor GetProperty] SetAmbient 1.0
|
||
|
|
vtkActor aHexContourActor
|
||
|
|
aHexContourActor SetMapper aHexContourMapper
|
||
|
|
[aHexContourActor GetProperty] SetAmbient 1.0
|
||
|
|
|
||
|
|
aHex GetEdge 110
|
||
|
|
#aHex GetFace 11
|
||
|
|
|
||
|
|
# Quadratic wedge
|
||
|
|
vtkPoints wedgePoints
|
||
|
|
wedgePoints SetNumberOfPoints 15
|
||
|
|
wedgePoints InsertPoint 0 0 0 0
|
||
|
|
wedgePoints InsertPoint 1 1 0 0
|
||
|
|
wedgePoints InsertPoint 2 0 1 0
|
||
|
|
wedgePoints InsertPoint 3 0 0 1
|
||
|
|
wedgePoints InsertPoint 4 1 0 1
|
||
|
|
wedgePoints InsertPoint 5 0 1 1
|
||
|
|
wedgePoints InsertPoint 6 0.5 0 0
|
||
|
|
wedgePoints InsertPoint 7 0.5 0.5 0
|
||
|
|
wedgePoints InsertPoint 8 0 0.5 0
|
||
|
|
wedgePoints InsertPoint 9 0.5 0 1
|
||
|
|
wedgePoints InsertPoint 10 0.5 0.5 1
|
||
|
|
wedgePoints InsertPoint 11 0 0.5 1
|
||
|
|
wedgePoints InsertPoint 12 0 0 0.5
|
||
|
|
wedgePoints InsertPoint 13 1 0 0.5
|
||
|
|
wedgePoints InsertPoint 14 0 1 0.5
|
||
|
|
vtkFloatArray wedgeScalars
|
||
|
|
wedgeScalars SetNumberOfTuples 15
|
||
|
|
wedgeScalars InsertValue 0 1.0
|
||
|
|
wedgeScalars InsertValue 1 1.0
|
||
|
|
wedgeScalars InsertValue 2 1.0
|
||
|
|
wedgeScalars InsertValue 3 1.0
|
||
|
|
wedgeScalars InsertValue 4 1.0
|
||
|
|
wedgeScalars InsertValue 5 1.0
|
||
|
|
wedgeScalars InsertValue 6 0.0
|
||
|
|
wedgeScalars InsertValue 7 0.0
|
||
|
|
wedgeScalars InsertValue 8 0.0
|
||
|
|
wedgeScalars InsertValue 9 0.0
|
||
|
|
wedgeScalars InsertValue 10 0.0
|
||
|
|
wedgeScalars InsertValue 11 0.0
|
||
|
|
wedgeScalars InsertValue 12 0.0
|
||
|
|
wedgeScalars InsertValue 13 0.0
|
||
|
|
wedgeScalars InsertValue 14 0.0
|
||
|
|
vtkQuadraticWedge aWedge
|
||
|
|
[aWedge GetPointIds] SetId 0 0
|
||
|
|
[aWedge GetPointIds] SetId 1 1
|
||
|
|
[aWedge GetPointIds] SetId 2 2
|
||
|
|
[aWedge GetPointIds] SetId 3 3
|
||
|
|
[aWedge GetPointIds] SetId 4 4
|
||
|
|
[aWedge GetPointIds] SetId 5 5
|
||
|
|
[aWedge GetPointIds] SetId 6 6
|
||
|
|
[aWedge GetPointIds] SetId 7 7
|
||
|
|
[aWedge GetPointIds] SetId 8 8
|
||
|
|
[aWedge GetPointIds] SetId 9 9
|
||
|
|
[aWedge GetPointIds] SetId 10 10
|
||
|
|
[aWedge GetPointIds] SetId 11 11
|
||
|
|
[aWedge GetPointIds] SetId 12 12
|
||
|
|
[aWedge GetPointIds] SetId 13 13
|
||
|
|
[aWedge GetPointIds] SetId 14 14
|
||
|
|
vtkUnstructuredGrid aWedgeGrid
|
||
|
|
aWedgeGrid Allocate 1 1
|
||
|
|
aWedgeGrid InsertNextCell [aWedge GetCellType] [aWedge GetPointIds]
|
||
|
|
aWedgeGrid SetPoints wedgePoints
|
||
|
|
[aWedgeGrid GetPointData] SetScalars wedgeScalars
|
||
|
|
vtkClipDataSet wedgeContours
|
||
|
|
wedgeContours SetInput aWedgeGrid
|
||
|
|
wedgeContours SetValue 0.5
|
||
|
|
vtkDataSetMapper aWedgeContourMapper
|
||
|
|
aWedgeContourMapper SetInputConnection [wedgeContours GetOutputPort]
|
||
|
|
#aWedgeContourMapper ScalarVisibilityOff
|
||
|
|
vtkDataSetMapper aWedgeMapper
|
||
|
|
aWedgeMapper SetInput aWedgeGrid
|
||
|
|
#aWedgeMapper ScalarVisibilityOff
|
||
|
|
vtkActor aWedgeActor
|
||
|
|
aWedgeActor SetMapper aWedgeMapper
|
||
|
|
[aWedgeActor GetProperty] SetRepresentationToWireframe
|
||
|
|
[aWedgeActor GetProperty] SetAmbient 1.0
|
||
|
|
vtkActor aWedgeContourActor
|
||
|
|
aWedgeContourActor SetMapper aWedgeContourMapper
|
||
|
|
[aWedgeContourActor GetProperty] SetAmbient 1.0
|
||
|
|
|
||
|
|
# Quadratic pyramid
|
||
|
|
vtkPoints pyraPoints
|
||
|
|
pyraPoints SetNumberOfPoints 13
|
||
|
|
pyraPoints InsertPoint 0 0 0 0
|
||
|
|
pyraPoints InsertPoint 1 1 0 0
|
||
|
|
pyraPoints InsertPoint 2 1 1 0
|
||
|
|
pyraPoints InsertPoint 3 0 1 0
|
||
|
|
pyraPoints InsertPoint 4 0 0 1
|
||
|
|
pyraPoints InsertPoint 5 0.5 0 0
|
||
|
|
pyraPoints InsertPoint 6 1 0.5 0
|
||
|
|
pyraPoints InsertPoint 7 0.5 1 0
|
||
|
|
pyraPoints InsertPoint 8 0 0.5 0
|
||
|
|
pyraPoints InsertPoint 9 0 0 0.5
|
||
|
|
pyraPoints InsertPoint 10 0.5 0 0.5
|
||
|
|
pyraPoints InsertPoint 11 0.5 0.5 0.5
|
||
|
|
pyraPoints InsertPoint 12 0 0.5 0.5
|
||
|
|
vtkFloatArray pyraScalars
|
||
|
|
pyraScalars SetNumberOfTuples 13
|
||
|
|
pyraScalars InsertValue 0 1.0
|
||
|
|
pyraScalars InsertValue 1 1.0
|
||
|
|
pyraScalars InsertValue 2 1.0
|
||
|
|
pyraScalars InsertValue 3 1.0
|
||
|
|
pyraScalars InsertValue 4 1.0
|
||
|
|
pyraScalars InsertValue 5 0.0
|
||
|
|
pyraScalars InsertValue 6 0.0
|
||
|
|
pyraScalars InsertValue 7 0.0
|
||
|
|
pyraScalars InsertValue 8 0.0
|
||
|
|
pyraScalars InsertValue 9 0.0
|
||
|
|
pyraScalars InsertValue 10 0.0
|
||
|
|
pyraScalars InsertValue 11 0.0
|
||
|
|
pyraScalars InsertValue 12 0.0
|
||
|
|
vtkQuadraticPyramid aPyramid
|
||
|
|
[aPyramid GetPointIds] SetId 0 0
|
||
|
|
[aPyramid GetPointIds] SetId 1 1
|
||
|
|
[aPyramid GetPointIds] SetId 2 2
|
||
|
|
[aPyramid GetPointIds] SetId 3 3
|
||
|
|
[aPyramid GetPointIds] SetId 4 4
|
||
|
|
[aPyramid GetPointIds] SetId 5 5
|
||
|
|
[aPyramid GetPointIds] SetId 6 6
|
||
|
|
[aPyramid GetPointIds] SetId 7 7
|
||
|
|
[aPyramid GetPointIds] SetId 8 8
|
||
|
|
[aPyramid GetPointIds] SetId 9 9
|
||
|
|
[aPyramid GetPointIds] SetId 10 10
|
||
|
|
[aPyramid GetPointIds] SetId 11 11
|
||
|
|
[aPyramid GetPointIds] SetId 12 12
|
||
|
|
vtkUnstructuredGrid aPyramidGrid
|
||
|
|
aPyramidGrid Allocate 1 1
|
||
|
|
aPyramidGrid InsertNextCell [aPyramid GetCellType] [aPyramid GetPointIds]
|
||
|
|
aPyramidGrid SetPoints pyraPoints
|
||
|
|
[aPyramidGrid GetPointData] SetScalars pyraScalars
|
||
|
|
vtkClipDataSet pyraContours
|
||
|
|
pyraContours SetInput aPyramidGrid
|
||
|
|
pyraContours SetValue 0.5
|
||
|
|
vtkDataSetMapper aPyramidContourMapper
|
||
|
|
aPyramidContourMapper SetInputConnection [pyraContours GetOutputPort]
|
||
|
|
#aPyramidContourMapper ScalarVisibilityOff
|
||
|
|
vtkDataSetMapper aPyramidMapper
|
||
|
|
aPyramidMapper SetInput aPyramidGrid
|
||
|
|
#aPyramidMapper ScalarVisibilityOff
|
||
|
|
vtkActor aPyramidActor
|
||
|
|
aPyramidActor SetMapper aPyramidMapper
|
||
|
|
[aPyramidActor GetProperty] SetRepresentationToWireframe
|
||
|
|
[aPyramidActor GetProperty] SetAmbient 1.0
|
||
|
|
vtkActor aPyramidContourActor
|
||
|
|
aPyramidContourActor SetMapper aPyramidContourMapper
|
||
|
|
[aPyramidContourActor GetProperty] SetAmbient 1.0
|
||
|
|
|
||
|
|
# Create the rendering related stuff.
|
||
|
|
# Since some of our actors are a single vertex, we need to remove all
|
||
|
|
# cullers so the single vertex actors will render
|
||
|
|
vtkRenderer ren1
|
||
|
|
[ren1 GetCullers] RemoveAllItems
|
||
|
|
|
||
|
|
vtkRenderWindow renWin
|
||
|
|
renWin AddRenderer ren1
|
||
|
|
vtkRenderWindowInteractor iren
|
||
|
|
iren SetRenderWindow renWin
|
||
|
|
|
||
|
|
ren1 SetBackground .1 .2 .3
|
||
|
|
renWin SetSize 400 200
|
||
|
|
|
||
|
|
# specify properties
|
||
|
|
ren1 AddActor aEdgeActor
|
||
|
|
ren1 AddActor aEdgeContourActor
|
||
|
|
|
||
|
|
ren1 AddActor aTriActor
|
||
|
|
ren1 AddActor aTriContourActor
|
||
|
|
|
||
|
|
ren1 AddActor aQuadActor
|
||
|
|
ren1 AddActor aQuadContourActor
|
||
|
|
|
||
|
|
ren1 AddActor aTetActor
|
||
|
|
ren1 AddActor aTetContourActor
|
||
|
|
|
||
|
|
ren1 AddActor aHexActor
|
||
|
|
ren1 AddActor aHexContourActor
|
||
|
|
|
||
|
|
ren1 AddActor aWedgeActor
|
||
|
|
ren1 AddActor aWedgeContourActor
|
||
|
|
|
||
|
|
ren1 AddActor aPyramidActor
|
||
|
|
ren1 AddActor aPyramidContourActor
|
||
|
|
|
||
|
|
# places everyone!!
|
||
|
|
aEdgeContourActor AddPosition 0 2 0
|
||
|
|
aTriActor AddPosition 2 0 0
|
||
|
|
aTriContourActor AddPosition 2 2 0
|
||
|
|
aQuadActor AddPosition 4 0 0
|
||
|
|
aQuadContourActor AddPosition 4 2 0
|
||
|
|
aTetActor AddPosition 6 0 0
|
||
|
|
aTetContourActor AddPosition 6 2 0
|
||
|
|
aHexActor AddPosition 8 0 0
|
||
|
|
aHexContourActor AddPosition 8 2 0
|
||
|
|
aWedgeActor AddPosition 10 0 0
|
||
|
|
aWedgeContourActor AddPosition 10 2 0
|
||
|
|
aPyramidActor AddPosition 12 0 0
|
||
|
|
aPyramidContourActor AddPosition 12 2 0
|
||
|
|
|
||
|
|
BuildBackdrop -1 15 -1 4 -1 2 .1
|
||
|
|
|
||
|
|
ren1 AddActor base
|
||
|
|
[base GetProperty] SetDiffuseColor .2 .2 .2
|
||
|
|
ren1 AddActor left
|
||
|
|
[left GetProperty] SetDiffuseColor .2 .2 .2
|
||
|
|
ren1 AddActor back
|
||
|
|
[back GetProperty] SetDiffuseColor .2 .2 .2
|
||
|
|
|
||
|
|
ren1 ResetCamera
|
||
|
|
[ren1 GetActiveCamera] Dolly 2.5
|
||
|
|
ren1 ResetCameraClippingRange
|
||
|
|
|
||
|
|
renWin Render
|
||
|
|
|
||
|
|
# render the image
|
||
|
|
#
|
||
|
|
iren AddObserver UserEvent {wm deiconify .vtkInteract}
|
||
|
|
iren Initialize
|
||
|
|
wm withdraw .
|
||
|
|
|
||
|
|
|