TECFieldElement

type TECFieldElement = class(TInterfacedObject,IECFieldElement)

strict protected

  function GetBitLength; virtual;

  function GetIsOne; virtual;

  function GetIsZero; virtual;

  function GetFieldName; virtual; abstract;

  function GetFieldSize; virtual; abstract;

public

  constructor Create;

  destructor Destroy; override;

  function ToBigInteger; virtual; abstract;

  function Add(); virtual; abstract;

  function AddOne; virtual; abstract;

  function Subtract(); virtual; abstract;

  function Multiply(); virtual; abstract;

  function Divide(); virtual; abstract;

  function Negate; virtual; abstract;

  function Square; virtual; abstract;

  function Invert; virtual; abstract;

  function Sqrt; virtual; abstract;

  function MultiplyMinusProduct(); virtual;

  function MultiplyPlusProduct(); virtual;

  function SquareMinusProduct(); virtual;

  function SquarePlusProduct(); virtual;

  function SquarePow(); virtual;

  function TestBitZero; virtual;

  function Equals(); virtual;

  function GetHashCode; override;

  function ToString; override;

  function GetEncoded; virtual;

  property FieldName: string; [r]

  property FieldSize: Int32; [r]

  property BitLength: Int32; [r]

  property IsOne: Boolean; [r]

  property IsZero: Boolean; [r]

end;

TECFieldElement

TObject,IECFieldElement