XLPack 7.0
XLPack Numerical Library (Excel VBA) Reference Manual
Loading...
Searching...
No Matches

◆ WriteVtkUg()

Sub WriteVtkUg ( FName As  String,
N As  Long,
X() As  Double,
Y() As  Double,
Z() As  Double,
Ne As  Long,
Kc() As  Long,
U() As  Double,
Info As  Long 
)

VTK file output (Solution of PDE by FEM) [Experimental version]

Purpose
Write solution of PDE by FEM to the VTK file (including mesh information).
Parameters
[in]FnameOutput file name.
[in]NTotal number of points.
[in]X()Array X(LX - 1) (LX >= N)
X coordinates of points.
[in]Y()Array Y(LY - 1) (LY >= N)
Y coordinates of points.
[in]Z()Array Z(LZ - 1) (LZ >= N)
Z coordinates of points.
[in]NeNumber of FEM elements. (Ne >= 1)
[in]Kc()Array Kc(LKc1 - 1, LKc2 - 1) (LKc1 >= Nn + 1, LKc2 >= Ne)
Connection matrix: Kc(0, K-1) is the type of K-th element, Kc(1, K-1), ..., Kc(Nn, K-1) point to the nodes of K-th element (Nn is the number of nodes in the element).
The type of element value is as follows:
= 1: 2-node line.
= 2: 3-node triangle.
= 3: 4-node quadrangle.
= 4: 4-node tetrahedron.
= 5: 8-node hexahedron.
= 6: 6-node prism.
= 7: 5-node pyramid.
= 8: 3-node second order line.
= 10: 9-node second order quadrangle.
= 15: vertex.
[in]U()Array U(LU - 1) (LU >= N)
Values at the points.
[out]InfoReturn code.
= 0: Normal return.
= i < 0: The (-i)-th argument is invalid or has an illegal value.
= 11: File open error.
= 12: Invalid element type.