XLPack 7.0
XLPack 数値計算ライブラリ (Excel VBA) リファレンスマニュアル
読み取り中…
検索中…
一致する文字列を見つけられません

◆ ReadMesh()

Sub ReadMesh ( FName As  String,
Ndim As  Long,
N As  Long,
X() As  Double,
Y() As  Double,
Z() As  Double,
Lp() As  Long,
Ne As  Long,
Kc() As  Long,
Le() As  Long,
Nb As  Long,
Ks() As long  ,
Lb() As  Long,
Info As  Long 
)

FreeFEM++ mesh ファイルから有限要素法用のメッシュ情報を読み込む [実験バージョン]

目的
FreeFEM++ mesh (MEDIT) 形式のファイルから有限要素法用のメッシュ情報を読み込む.
ただし, 以下のキーワードの情報のみを読み込む. これら以外はエラーになる.
MeshVersionFormatted (= 2), Dimension (= 2 または 3), Vertices, Edges, Triangles, Quadrilaterals, Tetrahedra, Hexaedra.
引数
[in]Fname入力ファイル名.
[out]Ndim次元数 (2 または 3).
[out]N格子点数.
[out]X()配列 X(LX - 1) (LX >= N)
格子点の X 座標.
[out]Y()配列 Y(LY - 1) (LY >= N)
格子点の Y 座標.
[out]Z()配列 Z(LZ - 1) (LZ >= N)
格子点の Z 座標.
[out]Lp()配列 Lp(LLp - 1) (LLp >= N)
各格子点のラベル番号.
[out]Ne要素数.
[out]Kc()配列 Kc(LKc1 - 1, LKc2 - 1) (LKc1 >= Ns + 1, LKc2 >= Ne (ただし, Ns は各要素の節点数))
コネクション行列: Kc(0, K-1) は要素 K のタイプ, Kc(1, K-1), ..., Kc(Ns, K-1) は要素 K の節点を示す.
要素タイプの値は次のとおり.
= 2: 3節点3角形.
= 3: 4節点4角形.
= 4: 4節点4面体.
= 5: 8節点6面体.
[out]Le()配列 Le(LLe - 1) (LLe >= Ne)
要素のラベル番号.
[out]Nb境界を定義する要素数.
[out]Ks()配列 Ks(LKs1 - 1, LKs2 - 1) (LKs1 >= Nsb + 1, LKs2 >= Nb (ただし, Nsb は各境界要素の節点数))
境界要素のコネクション行列: Ks(0, K-1) は要素 K のタイプ, Ks(1, K-1), ..., Ks(Nsb, K-1) は要素 K の節点を示す.
要素タイプの値は次のとおり.
= 1: 2節点直線.
= 2: 3節点3角形.
= 3: 4節点4角形.
[out]Lb()配列 Lb(LLb - 1) (LLb >= Nb)
境界要素のラベル番号.
[out]Infoリターンコード.
= 0: 正常終了.
= i < 0: (-i)番目の入力パラメータの誤り.
= 11: ファイルオープンエラー.
= 13: データフォーマットエラー.
= 14: データ値エラー.
= 15: セクションの並び順のエラー.
= 16: 処理中にファイルの終わりに達した.