DPsim
EMT_Ph1_Inductor.cpp
1 /* Copyright 2017-2021 Institute for Automation of Complex Power Systems,
2  * EONERC, RWTH Aachen University
3  *
4  * This Source Code Form is subject to the terms of the Mozilla Public
5  * License, v. 2.0. If a copy of the MPL was not distributed with this
6  * file, You can obtain one at https://mozilla.org/MPL/2.0/.
7  *********************************************************************************/
8 
9 #include <dpsim-models/EMT/EMT_Ph1_Inductor.h>
10 
11 using namespace CPS;
12 
13 EMT::Ph1::Inductor::Inductor(String uid, String name, Logger::Level logLevel)
14  : MNASimPowerComp<Real>(uid, name, true, true, logLevel),
15  Base::Ph1::Inductor(mAttributes) {
16  mEquivCurrent = 0;
17  **mIntfVoltage = Matrix::Zero(1, 1);
18  **mIntfCurrent = Matrix::Zero(1, 1);
19  setTerminalNumber(2);
20 }
21 
23  auto copy = Inductor::make(name, mLogLevel);
24  copy->setParameters(**mInductance);
25  return copy;
26 }
27 
29 
30  Real omega = 2 * PI * frequency;
31  Complex impedance = {0, omega * **mInductance};
32  Complex voltage =
33  RMS3PH_TO_PEAK1PH * (initialSingleVoltage(1) - initialSingleVoltage(0));
34  (**mIntfVoltage)(0, 0) = voltage.real();
35  (**mIntfCurrent)(0, 0) = (voltage / impedance).real();
36 
37  SPDLOG_LOGGER_INFO(mSLog,
38  "\n--- Initialization from powerflow ---"
39  "\nVoltage across: {:f}"
40  "\nCurrent: {:f}"
41  "\nTerminal 0 voltage: {:f}"
42  "\nTerminal 1 voltage: {:f}"
43  "\n--- Initialization from powerflow finished ---",
44  (**mIntfVoltage)(0, 0), (**mIntfCurrent)(0, 0),
45  (RMS3PH_TO_PEAK1PH * initialSingleVoltage(0)).real(),
46  (RMS3PH_TO_PEAK1PH * initialSingleVoltage(1)).real());
47 }
48 
49 void EMT::Ph1::Inductor::mnaCompInitialize(Real omega, Real timeStep,
50  Attribute<Matrix>::Ptr leftVector) {
51  updateMatrixNodeIndices();
52 
53  mEquivCond = timeStep / (2.0 * **mInductance);
54  // Update internal state
55  mEquivCurrent = mEquivCond * (**mIntfVoltage)(0, 0) + (**mIntfCurrent)(0, 0);
56 }
57 
59  SparseMatrixRow &systemMatrix) {
60  MNAStampUtils::stampConductance(mEquivCond, systemMatrix, matrixNodeIndex(0),
61  matrixNodeIndex(1), terminalNotGrounded(0),
62  terminalNotGrounded(1), mSLog);
63 }
64 
66  // Update internal state
67  mEquivCurrent = mEquivCond * (**mIntfVoltage)(0, 0) + (**mIntfCurrent)(0, 0);
68  if (terminalNotGrounded(0))
69  Math::setVectorElement(rightVector, matrixNodeIndex(0), mEquivCurrent);
70  if (terminalNotGrounded(1))
71  Math::setVectorElement(rightVector, matrixNodeIndex(1), -mEquivCurrent);
72 }
73 
75  AttributeBase::List &prevStepDependencies,
76  AttributeBase::List &attributeDependencies,
77  AttributeBase::List &modifiedAttributes) {
78  // actually depends on L, but then we'd have to modify the system matrix anyway
79  modifiedAttributes.push_back(mRightVector);
80  prevStepDependencies.push_back(mIntfCurrent);
81  prevStepDependencies.push_back(mIntfVoltage);
82 }
83 
84 void EMT::Ph1::Inductor::mnaCompPreStep(Real time, Int timeStepCount) {
85  mnaCompApplyRightSideVectorStamp(**mRightVector);
86 }
87 
89  AttributeBase::List &prevStepDependencies,
90  AttributeBase::List &attributeDependencies,
91  AttributeBase::List &modifiedAttributes,
92  Attribute<Matrix>::Ptr &leftVector) {
93  attributeDependencies.push_back(leftVector);
94  modifiedAttributes.push_back(mIntfVoltage);
95  modifiedAttributes.push_back(mIntfCurrent);
96 }
97 
98 void EMT::Ph1::Inductor::mnaCompPostStep(Real time, Int timeStepCount,
99  Attribute<Matrix>::Ptr &leftVector) {
100  mnaCompUpdateVoltage(**leftVector);
101  mnaCompUpdateCurrent(**leftVector);
102 }
103 
104 void EMT::Ph1::Inductor::mnaCompUpdateVoltage(const Matrix &leftVector) {
105  // v1 - v0
106  (**mIntfVoltage)(0, 0) = 0;
107  if (terminalNotGrounded(1))
108  (**mIntfVoltage)(0, 0) =
109  Math::realFromVectorElement(leftVector, matrixNodeIndex(1));
110  if (terminalNotGrounded(0))
111  (**mIntfVoltage)(0, 0) =
112  (**mIntfVoltage)(0, 0) -
113  Math::realFromVectorElement(leftVector, matrixNodeIndex(0));
114 }
115 
116 void EMT::Ph1::Inductor::mnaCompUpdateCurrent(const Matrix &leftVector) {
117  (**mIntfCurrent)(0, 0) = mEquivCond * (**mIntfVoltage)(0, 0) + mEquivCurrent;
118 }
void mnaCompUpdateVoltage(const Matrix &leftVector) override
Update interface voltage from MNA system result.
void mnaCompInitialize(Real omega, Real timeStep, Attribute< Matrix >::Ptr leftVector) override
Initializes internal variables of the component.
Inductor(String uid, String name, Logger::Level logLevel=Logger::Level::off)
Defines UID, name, component parameters and logging level.
SimPowerComp< Real >::Ptr clone(String name) override
Returns a modified copy of the component with the given suffix added to the name and without.
void mnaCompAddPreStepDependencies(AttributeBase::List &prevStepDependencies, AttributeBase::List &attributeDependencies, AttributeBase::List &modifiedAttributes) override
Add MNA pre step dependencies.
void mnaCompApplyRightSideVectorStamp(Matrix &rightVector) override
Stamps right side (source) vector.
void mnaCompUpdateCurrent(const Matrix &leftVector) override
Update interface current from MNA system result.
void mnaCompApplySystemMatrixStamp(SparseMatrixRow &systemMatrix) override
Stamps system matrix.
void mnaCompAddPostStepDependencies(AttributeBase::List &prevStepDependencies, AttributeBase::List &attributeDependencies, AttributeBase::List &modifiedAttributes, Attribute< Matrix >::Ptr &leftVector) override
Add MNA post step dependencies.
void initializeFromNodesAndTerminals(Real frequency) override
Initializes component from power flow data.
Real mEquivCurrent
DC equivalent current source [A].
Base class for all MNA components that are transmitting power.
Base class for all components that are transmitting power.
Definition: SimPowerComp.h:17
const Attribute< MatrixVar< Real > >::Ptr mIntfCurrent
Current through component.
Definition: SimPowerComp.h:47
const Attribute< MatrixVar< Real > >::Ptr mIntfVoltage
Voltage between terminals.
Definition: SimPowerComp.h:45