連立一次方程式の計算

Namespace: fvalgcli
Assembly: fvalgcli (in fvalgcli.dll) Version: 3.1.0.0 (3.1.0.11)

Syntax

C#
public static int fnFIE_mat_solve(
	FMATRIX_PTR a,
	FVECTOR_PTR b,
	FVECTOR_PTR x
)
Visual Basic
Public Shared Function fnFIE_mat_solve ( 
	a As FMATRIX_PTR,
	b As FVECTOR_PTR,
	x As FVECTOR_PTR
) As Integer

Parameters

a
Type: fvalgcli..::..FMATRIX_PTR
係数行列Ａ。ＡはNxN、つまり正方行列でなければいけません。
b
Type: fvalgcli..::..FVECTOR_PTR
連立一次方程式の右辺。b の次元はNでなければいけません。
x
Type: fvalgcli..::..FVECTOR_PTR
答え。x の次元はNでなければいけません。

Return Value

Type: Int32
以下のエラーコードを返します。

エラーコード：
f_err内容
F_ERR_NONE正常終了
F_ERR_NOMEMORYメモリ不足エラー
F_ERR_CALC_IMPOSSIBLE 計算不能
F_ERR_INVALID_PARAMパラメータ異常
F_ERR_NO_LICENCEライセンスエラー、または未初期化エラー

Remarks

Examples

C# Copy imageCopy
//    $Revision: 1.1 $

using System;
using System.Collections.Generic;
using System.Text;
using fvalgcli;

namespace TC
{
    public partial class FIE
    {
        [FvPluginExecute]
        public void fnFIE_mat_solve()
        {
            FMATRIX_PTR a = FMATRIX_PTR.Zero;
            FVECTOR_PTR v1 = FVECTOR_PTR.Zero;
            FVECTOR_PTR v2 = FVECTOR_PTR.Zero;

            try
            {
                int status = (int)f_err.F_ERR_NONE;
                a = api.fnFIE_mat_aalloc(3, 3);
                v1 = api.fnFIE_mat_valloc(3);
                v2 = api.fnFIE_mat_valloc(3);

                // 値を格納.
                a[0, 0] = 1.0; a[0, 1] = 3.0; a[0, 2] = 3.0;
                a[1, 0] = 4.0; a[1, 1] = -2.0; a[1, 2] = 1.0;
                a[2, 0] = 2.0; a[2, 1] = 5.0; a[2, 2] = -1.0;

                // 値を格納.
                v1[0] = 3.0; v1[1] = 6.0; v1[2] = 8.0;

                Assert.IsTrue(a != FMATRIX_PTR.Zero, "エラーが発生しました。");
                Assert.IsTrue(v1 != FVECTOR_PTR.Zero, "エラーが発生しました。");
                Assert.IsTrue(v2 != FVECTOR_PTR.Zero, "エラーが発生しました。");
                status = api.fnFIE_mat_solve(a, v1, v2);
                Assert.IsTrue(status == (int)f_err.F_ERR_NONE, "エラーが発生しました。({0})", (f_err)status);
            }
            finally
            {
                // 解放.
                api.fnFIE_mat_afree(a);
                api.fnFIE_mat_vfree(v1);
                api.fnFIE_mat_vfree(v2);
            }
        }
    }
}

Visual Basic Copy imageCopy
'    $Revision: 1.1 $

Imports System.Collections.Generic
Imports System.Text
Imports fvalgcli

Public Partial Class FIE
    <FvPluginExecute> _
    Public Sub fnFIE_mat_solve()
        Dim a As FMATRIX_PTR = FMATRIX_PTR.Zero
        Dim v1 As FVECTOR_PTR = FVECTOR_PTR.Zero
        Dim v2 As FVECTOR_PTR = FVECTOR_PTR.Zero

        Try
            Dim status As Integer = CInt(f_err.F_ERR_NONE)
            a = api.fnFIE_mat_aalloc(3, 3)
            v1 = api.fnFIE_mat_valloc(3)
            v2 = api.fnFIE_mat_valloc(3)

            ' 値を格納.
            a(0, 0) = 1.0
            a(0, 1) = 3.0
            a(0, 2) = 3.0
            a(1, 0) = 4.0
            a(1, 1) = -2.0
            a(1, 2) = 1.0
            a(2, 0) = 2.0
            a(2, 1) = 5.0
            a(2, 2) = -1.0

            ' 値を格納.
            v1(0) = 3.0
            v1(1) = 6.0
            v1(2) = 8.0

            Assert.IsTrue(a <> FMATRIX_PTR.Zero, "エラーが発生しました。")
            Assert.IsTrue(v1 <> FVECTOR_PTR.Zero, "エラーが発生しました。")
            Assert.IsTrue(v2 <> FVECTOR_PTR.Zero, "エラーが発生しました。")
            status = api.fnFIE_mat_solve(a, v1, v2)
            Assert.IsTrue(status = CInt(f_err.F_ERR_NONE), "エラーが発生しました。({0})", CType(status, f_err))
        Finally
            ' 解放.
            api.fnFIE_mat_afree(a)
            api.fnFIE_mat_vfree(v1)
            api.fnFIE_mat_vfree(v2)
        End Try
    End Sub
End Class

See Also