ホーム / モデリング / CGaudi / 関数 / MeshAdaptiveConvergenceIndex

MeshAdaptiveConvergenceIndex関数

定義

MeshAdaptiveConvergenceIndex(Index As Long) As Double

値の取得		○
値の設定		×

引数

アダプティブメッシュを行う周波数のインデックス

戻り値

アダプティブメッシュでの精度（誤差）

解説

直前に生成したアダプティブメッシュの、指定されたインデックスの周波数での精度(誤差)を取得します。
アダプティブメッシュでない場合は0となります。

実行例

Dim Femtet As New CFemtet
Dim Gaudi As CGaudi
Dim Point As New CGaudiPoint
Dim Err As Double

'新規プロジェクト作成
If Femtet.OpenNewProject() = False Then
    Femtet.ShowLastError
End If

'Femtet.Gaudiを変数Gaudiに代入して使いやすくする
Set Gaudi = Femtet.Gaudi

Point.X = 0
Point.Y = 0
Point.Z = 0
Set Body = Gaudi.CreateBox(Point, 5, 5, 5)
 
'Femtet.Analysisを変数Alsに代入して使いやすくする
Set Als = Femtet.Analysis

Als.MeshProperty.bAdaptiveMeshAtRefFreq = False
Als.MeshProperty.SetAdaptiveFreq 0, 1000000000.0, 0.02
Als.MeshProperty.SetAdaptiveFreq 1, 5000000000.0, 0.02
Als.MeshProperty.SetAdaptiveFreq 2, 10000000000.0, 0.02

Gaudi.MeshSize = 5
Gaudi.Mesh

'精度(誤差)の表示
Err = Gaudi.MeshAdaptiveConvergenceIndex( 1 )