Class TDSSCktElement

Unit

Declaration

type TDSSCktElement = class(TDSSObject)

Description

No description available, ancestor TDSSObject description follows
No description available, ancestor TNamedObject description follows

this is a GUID compliant to RFC 4122, v4

Hierarchy

Overview

Fields

Protected FEnabled: Boolean;
Public Fnterms: Int8;
Public Fnconds: Int8;
Public Fnphases: Integer;
Public ComplexBuffer: pComplexArray;
Public IterminalSolutionCount: Integer;
Public BusIndex: Integer;
Public YPrim_Series: TCMatrix;
Public YPrim_Shunt: TCMatrix;
Public YPrim: TCMatrix;
Public FYprimFreq: Double;
Public NodeRef: pIntegerArray;
Public Yorder: Integer;
Public ControlElementList: TDSSPointerList;
Public Iterminal: pComplexArray;
Public Vterminal: pComplexArray;
Public BaseFrequency: Double;
Public Terminals: Array of TPowerTerminal;
Public TerminalsChecked: Array of Boolean;
Public ActiveTerminal: ˆTPowerTerminal;
Public PublicDataSize: Integer;
Public PublicDataStruct: Pointer;

Methods

Public procedure Set_Enabled(Value: Boolean); VIRTUAL;
Public procedure Set_ConductorClosed(Index: Integer; Value: Boolean); VIRTUAL;
Public procedure Set_NTerms(Value: Int8);
Public procedure Set_Handle(Value: Integer);
Public constructor Create(ParClass: TDSSClass);
Public destructor Destroy; OVERRIDE;
Public procedure MakeLike(OtherObj: Pointer); override;
Public function GetYPrim(var Ymatrix: TCmatrix; Opt: Integer): Integer; VIRTUAL;
Public function GetYPrimValues(Opt: Integer): pComplexArray; VIRTUAL;
Public function MaxTerminalOneIMag: Double;
Public procedure ComputeIterminal; VIRTUAL;
Public procedure ComputeVterminal;
Public procedure ZeroITerminal; inline;
Public procedure GetCurrents(Curr: pComplexArray); VIRTUAL; ABSTRACT;
Public function InjCurrents: Integer; VIRTUAL;
Public function GetBus(i: Integer): String;
Public procedure SetBus(i: Integer; const s: String); virtual;
Public procedure SetNodeRef(iTerm: Integer; NodeRefArray: pIntegerArray); VIRTUAL;
Public procedure RecalcElementData; VIRTUAL; ABSTRACT;
Public procedure CalcYPrim; VIRTUAL;
Public procedure MakePosSequence(); VIRTUAL;
Public procedure GetTermVoltages(iTerm: Integer; VBuffer: PComplexArray);
Public procedure GetPhasePower(PowerBuffer: pComplexArray); VIRTUAL;
Public procedure GetPhaseLosses(var Num_Phases: Integer; LossBuffer: pComplexArray); VIRTUAL;
Public procedure GetLosses(var TotalLosses, LoadLosses, NoLoadLosses: Complex); VIRTUAL;
Public procedure GetSeqLosses(var PosSeqLosses, NegSeqLosses, ZeroModeLosses: complex); VIRTUAL;
Public procedure DumpProperties(F: TFileStream; Complete: Boolean; Leaf: Boolean = False); OVERRIDE;
Public procedure SumCurrents;
Public procedure Get_Current_Mags(cMBuffer: pDoubleArray);

Properties

Public property Handle: Integer READ FHandle WRITE Set_Handle;
Public property Enabled: Boolean READ FEnabled WRITE Set_Enabled;
Public property YPrimInvalid: Boolean READ FYPrimInvalid WRITE set_YprimInvalid;
Public property YPrimFreq: Double READ FYprimFreq WRITE Set_Freq;
Public property NTerms: Int8 READ Fnterms WRITE Set_NTerms;
Public property NConds: Int8 READ Fnconds WRITE Set_Nconds;
Public property NPhases: Integer READ Fnphases;
Public property FirstBus: String READ Get_FirstBus;
Public property NextBus: String READ Get_NextBus;
Public property Losses: Complex READ Get_Losses;
Public property Power[idxTerm:Integer]: Complex READ Get_Power;
Public property MaxPower[idxTerm:Integer]: Complex READ Get_MaxPower;
Public property MaxCurrent[idxTerm:Integer]: Double READ Get_MaxCurrent;
Public property MaxVoltage[idxTerm:Integer]: Double READ Get_MaxVoltage;
Public property ActiveTerminalIdx: Int8 READ Get_ActiveTerminal WRITE Set_ActiveTerminal;
Public property Closed[Index:Integer]: Boolean READ Get_ConductorClosed WRITE Set_ConductorClosed;
Public property MaxCurrentAng[idxTerm:Integer]: Double READ Get_MaxCurrentAng;
Public property MaxVoltageAng[idxTerm:Integer]: Double READ Get_MaxVoltageAng;
Public property PCEValue[Index:Integer;ValType:Integer]: Double READ Get_PCE_Value;

Description

Fields

Protected FEnabled: Boolean;
 
Public Fnterms: Int8;
 
Public Fnconds: Int8;
 
Public Fnphases: Integer;

no. conductors per terminal

Public ComplexBuffer: pComplexArray;

Phases, this device – TODO: Int8 someday...

Public IterminalSolutionCount: Integer;
 
Public BusIndex: Integer;
 
Public YPrim_Series: TCMatrix;
 
Public YPrim_Shunt: TCMatrix;
 
Public YPrim: TCMatrix;
 
Public FYprimFreq: Double;

Order will be NTerms * Ncond

Public NodeRef: pIntegerArray;

Total Noderef array for element

Public Yorder: Integer;

Need fast access to this

Public ControlElementList: TDSSPointerList;

LastTerminalChecked: Int8; // Flag used in tree searches – UNUSED

Public Iterminal: pComplexArray;

Pointer to control for this device

Public Vterminal: pComplexArray;

Others need this

Public BaseFrequency: Double;
 
Public Terminals: Array of TPowerTerminal;
 
Public TerminalsChecked: Array of Boolean;
 
Public ActiveTerminal: ˆTPowerTerminal;
 
Public PublicDataSize: Integer;
 
Public PublicDataStruct: Pointer;

size of PublicDataStruct

Methods

Public procedure Set_Enabled(Value: Boolean); VIRTUAL;

Frequency at which YPrim has been computed

Public procedure Set_ConductorClosed(Index: Integer; Value: Boolean); VIRTUAL;
 
Public procedure Set_NTerms(Value: Int8);
 
Public procedure Set_Handle(Value: Integer);
 
Public constructor Create(ParClass: TDSSClass);

Generic Pointer to public data Block that may be access by other classes of elements Accessing app has to know the structure Inited to Nil. If Nil, accessing app should ignore

Public destructor Destroy; OVERRIDE;
 
Public procedure MakeLike(OtherObj: Pointer); override;
 
Public function GetYPrim(var Ymatrix: TCmatrix; Opt: Integer): Integer; VIRTUAL;
 
Public function GetYPrimValues(Opt: Integer): pComplexArray; VIRTUAL;

returns values of array

Public function MaxTerminalOneIMag: Double;
 
Public procedure ComputeIterminal; VIRTUAL;

Max of Iterminal 1 phase currents

Public procedure ComputeVterminal;

Computes Iterminal for this device

Public procedure ZeroITerminal; inline;
 
Public procedure GetCurrents(Curr: pComplexArray); VIRTUAL; ABSTRACT;
 
Public function InjCurrents: Integer; VIRTUAL;

Get present value of terminal Curr for reports

Public function GetBus(i: Integer): String;

Applies to PC Elements Puts straight into Solution Array

Public procedure SetBus(i: Integer; const s: String); virtual;

Get bus name by index

Public procedure SetNodeRef(iTerm: Integer; NodeRefArray: pIntegerArray); VIRTUAL;

Set bus name by index

Public procedure RecalcElementData; VIRTUAL; ABSTRACT;

Set NodeRef Array for fast solution with intrinsics

Public procedure CalcYPrim; VIRTUAL;
 
Public procedure MakePosSequence(); VIRTUAL;
 
Public procedure GetTermVoltages(iTerm: Integer; VBuffer: PComplexArray);

Make a positive Sequence Model

Public procedure GetPhasePower(PowerBuffer: pComplexArray); VIRTUAL;
 
Public procedure GetPhaseLosses(var Num_Phases: Integer; LossBuffer: pComplexArray); VIRTUAL;
 
Public procedure GetLosses(var TotalLosses, LoadLosses, NoLoadLosses: Complex); VIRTUAL;
 
Public procedure GetSeqLosses(var PosSeqLosses, NegSeqLosses, ZeroModeLosses: complex); VIRTUAL;
 
Public procedure DumpProperties(F: TFileStream; Complete: Boolean; Leaf: Boolean = False); OVERRIDE;
 
Public procedure SumCurrents;
 
Public procedure Get_Current_Mags(cMBuffer: pDoubleArray);
 

Properties

Public property Handle: Integer READ FHandle WRITE Set_Handle;
 
Public property Enabled: Boolean READ FEnabled WRITE Set_Enabled;
 
Public property YPrimInvalid: Boolean READ FYPrimInvalid WRITE set_YprimInvalid;
 
Public property YPrimFreq: Double READ FYprimFreq WRITE Set_Freq;
 
Public property NTerms: Int8 READ Fnterms WRITE Set_NTerms;
 
Public property NConds: Int8 READ Fnconds WRITE Set_Nconds;
 
Public property NPhases: Integer READ Fnphases;
 
Public property FirstBus: String READ Get_FirstBus;
 
Public property NextBus: String READ Get_NextBus;
 
Public property Losses: Complex READ Get_Losses;

null string if no more values

Public property Power[idxTerm:Integer]: Complex READ Get_Power;
 
Public property MaxPower[idxTerm:Integer]: Complex READ Get_MaxPower;

Total power in active terminal

Public property MaxCurrent[idxTerm:Integer]: Double READ Get_MaxCurrent;

Total power in active terminal

Public property MaxVoltage[idxTerm:Integer]: Double READ Get_MaxVoltage;

Max current in active terminal

Public property ActiveTerminalIdx: Int8 READ Get_ActiveTerminal WRITE Set_ActiveTerminal;

Max voltage in active terminal

Public property Closed[Index:Integer]: Boolean READ Get_ConductorClosed WRITE Set_ConductorClosed;
 
Public property MaxCurrentAng[idxTerm:Integer]: Double READ Get_MaxCurrentAng;
 
Public property MaxVoltageAng[idxTerm:Integer]: Double READ Get_MaxVoltageAng;

Max current in active terminal

Public property PCEValue[Index:Integer;ValType:Integer]: Double READ Get_PCE_Value;

Max current in active terminal


Generated by PasDoc 0.16.0.