Class TcMatrix

Unit

Declaration

type TcMatrix = class(TObject)

Description

Hierarchy

Overview

Fields

Public InvertError: Integer;

Methods

Public constructor CreateMatrix(N: Integer);
Public constructor CreateMatrixInplace(N: Integer; pValues: pComplex);
Public destructor Destroy; OVERRIDE;
Public procedure Invert;
Public procedure Negate;
Public function IsZero: Boolean;
Public function IsColRowZero(n: Integer): Boolean;
Public procedure Clear; inline;
Public procedure AddFrom(OtherMatrix: TcMatrix);
Public procedure CopyFrom(OtherMatrix: TcMatrix);
Public procedure SetElement(i, j: Integer; Value: Complex);
Public procedure SetElemsym(i, j: Integer; Value: Complex);
Public procedure AddElement(i, j: Integer; Value: Complex);
Public procedure AddElemsym(i, j: Integer; Value: Complex);
Public function GetElement(i, j: Integer): Complex;
Public function GetErrorCode: Integer;
Public procedure MVmult(b, x: pComplexArray); inline;
Public function GetValuesArrayPtr(var Order: Integer): pComplexArray;
Public procedure ZeroRow(iRow: Integer);
Public procedure ZeroCol(iCol: Integer);
Public function AvgDiagonal: Complex;
Public function AvgOffDiagonal: Complex;
Public function MtrxMult(B: TcMatrix): TcMatrix;
Public function Kron(EliminationRow: Integer): TcMatrix;

Properties

Public property Order: Integer READ Norder;

Description

Fields

Public InvertError: Integer;
 

Methods

Public constructor CreateMatrix(N: Integer);
 
Public constructor CreateMatrixInplace(N: Integer; pValues: pComplex);
 
Public destructor Destroy; OVERRIDE;
 
Public procedure Invert;
 
Public procedure Negate;
 
Public function IsZero: Boolean;
 
Public function IsColRowZero(n: Integer): Boolean;
 
Public procedure Clear; inline;
 
Public procedure AddFrom(OtherMatrix: TcMatrix);

Zero out matrix

Public procedure CopyFrom(OtherMatrix: TcMatrix);
 
Public procedure SetElement(i, j: Integer; Value: Complex);
 
Public procedure SetElemsym(i, j: Integer; Value: Complex);
 
Public procedure AddElement(i, j: Integer; Value: Complex);
 
Public procedure AddElemsym(i, j: Integer; Value: Complex);
 
Public function GetElement(i, j: Integer): Complex;
 
Public function GetErrorCode: Integer;
 
Public procedure MVmult(b, x: pComplexArray); inline;
 
Public function GetValuesArrayPtr(var Order: Integer): pComplexArray;

b = Ax

Public procedure ZeroRow(iRow: Integer);
 
Public procedure ZeroCol(iCol: Integer);
 
Public function AvgDiagonal: Complex;
 
Public function AvgOffDiagonal: Complex;

Average of Diagonal Elements

Public function MtrxMult(B: TcMatrix): TcMatrix;
 
Public function Kron(EliminationRow: Integer): TcMatrix;

Multiply two square matrices of same order. Result = A*B

Properties

Public property Order: Integer READ Norder;

Perform Kron reduction on last row/col and return new matrix


Generated by PasDoc 0.16.0.