せん断変形(y方向)する同次変換行列を作成
Namespace: fvalgcliAssembly: fvalgcli (in fvalgcli.dll) Version: 3.1.0.0 (3.1.0.11)
Syntax
C# |
---|
public static int fnFIE_geotrans_calc_yshear_matrix( FMATRIX_PTR mat, double rad ) |
Visual Basic |
---|
Public Shared Function fnFIE_geotrans_calc_yshear_matrix ( mat As FMATRIX_PTR, rad As Double ) As Integer |
Return Value
Type: Int32以下のエラーコードを返します。
エラーコード:
f_err | 内容 |
---|---|
F_ERR_NONE | 正常終了 |
F_ERR_INVALID_PARAM | 不正なパラメータが渡された |
F_ERR_NO_LICENCE | ライセンスエラー、または未初期化エラー |
Remarks
Examples
C# | Copy |
---|---|
// $Revision: 1.1 $ using System; using System.Collections.Generic; using System.Text; using fvalgcli; namespace TC { public partial class FIE { /// <summary> /// せん断変形(y方向)する同次変換行列の作成. /// </summary> [FvPluginExecute] public void fnFIE_geotrans_calc_yshear_matrix() { int status = (int)f_err.F_ERR_NONE; FMATRIX_PTR mat = FMATRIX_PTR.Zero; // 同次変換行列. const double rad = 0.523599; // せん断角. try { // 同次変換行列の確保. mat = api.fnFIE_mat_aalloc(3, 3); // 処理の実行. status = api.fnFIE_geotrans_calc_yshear_matrix(mat, rad); // エラー判定. Assert.IsTrue(status == (int)f_err.F_ERR_NONE, "エラーが発生しました。({0})", (f_err)status); // 結果出力. ConsoleOut.WriteFunctionName(":\t"); ConsoleOut.IsEqualMatrix( mat, 1, 0, 0, Math.Tan(rad), 1, 0, 0, 0, 1 ); ConsoleOut.WriteFMATRIX(mat, 3, 3); } finally { // オブジェクトの開放. mat.Dispose(); } } } } |
Visual Basic | Copy |
---|---|
' $Revision: 1.1 $ Imports System.Collections.Generic Imports System.Text Imports fvalgcli Public Partial Class FIE ''' <summary> ''' せん断変形(y方向)する同次変換行列の作成. ''' </summary> <FvPluginExecute> _ Public Sub fnFIE_geotrans_calc_yshear_matrix() Dim status As Integer = CInt(f_err.F_ERR_NONE) Dim mat As FMATRIX_PTR = FMATRIX_PTR.Zero ' 同次変換行列. Const rad As Double = 0.523599 ' せん断角. Try ' 同次変換行列の確保. mat = api.fnFIE_mat_aalloc(3, 3) ' 処理の実行. status = api.fnFIE_geotrans_calc_yshear_matrix(mat, rad) ' エラー判定. Assert.IsTrue(status = CInt(f_err.F_ERR_NONE), "エラーが発生しました。({0})", CType(status, f_err)) ' 結果出力. ConsoleOut.WriteFunctionName(":" & vbTab) ConsoleOut.IsEqualMatrix(mat, 1, 0, 0, Math.Tan(rad), 1, _ 0, 0, 0, 1) ConsoleOut.WriteFMATRIX(mat, 3, 3) Finally ' オブジェクトの開放. mat.Dispose() End Try End Sub End Class |