IMath.MDeterm

Fore Syntax

MDeterm(Data: Array): Double;

Fore.NET Syntax

MDeterm(Data: System.Array): double;

Parameters

Values. Array of real numbers.

Description

The MDeterm method returns the determinant of the specified matrix.

Comments

The matrix must be square.

If an input array contains gaps, the function returns error.

Fore Example

To execute the example, add a link to the MathFin system assembly.

Sub UserProc;
Var
    matr: Array Of Double;
    r: Double;
Begin
    matr := New Double[4, 4];
    matr[0, 0] := 1; matr[0, 1] := 3; matr[0, 2] := 8; matr[0, 3] := 5;
    matr[1, 0] := 1; matr[1, 1] := 3; matr[1, 2] := 6; matr[1, 3] := 1;
    matr[2, 0] := 1; matr[2, 1] := 1; matr[2, 2] := 1; matr[2, 2] := 0;
    matr[3, 0] := 7; matr[3, 1] := 3; matr[3, 2] := 10; matr[3, 3] := 2;
    r := Math.MDeterm(matr);
    Debug.WriteLine(r);
End Sub UserProc;

After executing the example the console window displays the result of the product equal to 2250.

Fore.NET Example

The requirements and result of the Fore.NET example execution match with those in the Fore example.

Imports Prognoz.Platform.Interop.MathFin;
…
Public Shared Sub Main(Params: StartParams);
Var
    r: double;
    Math: MathClass = New MathClass();
    matr: System.Array;
Begin
    matr := New Double[4, 4];
    matr[0, 0] := 1; matr[0, 1] := 3; matr[0, 2] := 8; matr[0, 3] := 5;
    matr[1, 0] := 1; matr[1, 1] := 3; matr[1, 2] := 6; matr[1, 3] := 1;
    matr[2, 0] := 1; matr[2, 1] := 1; matr[2, 2] := 1; matr[2, 2] := 0;
    matr[3, 0] := 7; matr[3, 1] := 3; matr[3, 2] := 10; matr[3, 3] := 2;
    r := Math.MDeterm(matr);
    System.Diagnostics.Debug.WriteLine(r);
End Sub;