DPsim
DP_Ph3_SeriesResistor.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 #include <dpsim-models/DP/DP_Ph3_SeriesResistor.h>
9 
10 using namespace CPS;
11 
13  Logger::Level logLevel)
14  : MNASimPowerComp<Complex>(uid, name, false, true, logLevel),
15  Base::Ph1::Resistor(mAttributes) {
16  mPhaseType = PhaseType::ABC;
17  setTerminalNumber(2);
18  **mIntfVoltage = MatrixComp::Zero(3, 1);
19  **mIntfCurrent = MatrixComp::Zero(3, 1);
20 }
21 
23  auto copy = SeriesResistor::make(name, mLogLevel);
24  copy->setParameters(**mResistance);
25  return copy;
26 }
27 
29 
30  mTerminals[0]->setPhaseType(PhaseType::ABC);
31  mTerminals[1]->setPhaseType(PhaseType::ABC);
32 
33  Matrix impedance = Matrix::Zero(3, 1);
34  impedance << **mResistance, **mResistance, **mResistance;
35  (**mIntfVoltage)(0, 0) = initialSingleVoltage(1) - initialSingleVoltage(0);
36 
37  Real voltMag = Math::abs((**mIntfVoltage)(0, 0));
38  Real voltPhase = Math::phase((**mIntfVoltage)(0, 0));
39  (**mIntfVoltage)(1, 0) = Complex(voltMag * cos(voltPhase - 2. / 3. * PI),
40  voltMag * sin(voltPhase - 2. / 3. * PI));
41  (**mIntfVoltage)(2, 0) = Complex(voltMag * cos(voltPhase + 2. / 3. * PI),
42  voltMag * sin(voltPhase + 2. / 3. * PI));
43 
44  **mIntfCurrent = impedance.cwiseInverse().cwiseProduct(**mIntfVoltage);
45 
46  SPDLOG_LOGGER_INFO(mSLog,
47  "\n--- Initialization from powerflow ---"
48  "\nVoltage across amplitude and phase: \n{:s}"
49  "\nCurrent amplitude and phase: \n{:s}"
50  "\nTerminal 0 voltage amplitude and phase: \n{:s}"
51  "\nTerminal 1 voltage amplitude and phase: \n{:s}"
52  "\n--- Initialization from powerflow finished ---",
53  Logger::phasorMatrixToString(**mIntfVoltage),
54  Logger::phasorMatrixToString(**mIntfCurrent),
55  Logger::phasorMatrixToString(initialVoltage(0)),
56  Logger::phasorMatrixToString(initialVoltage(1)));
57 }
58 
59 void DP::Ph3::SeriesResistor::mnaCompInitialize(
60  Real omega, Real timeStep, Attribute<Matrix>::Ptr leftVector) {
61  updateMatrixNodeIndices();
62  **mRightVector = Matrix::Zero(0, 0);
63 }
64 
66  SparseMatrixRow &systemMatrix) {
67  Complex conductance = {(1. / **mResistance), 0};
68 
70  //if (terminalNotGrounded(0))
71  // Math::addToMatrixElement(systemMatrix, matrixNodeIndices(0), matrixNodeIndices(0), conductance);
72  //if (terminalNotGrounded(1))
73  // Math::addToMatrixElement(systemMatrix, matrixNodeIndices(1), matrixNodeIndices(1), conductance);
75  //if (terminalNotGrounded(0) && terminalNotGrounded(1)) {
76  // Math::addToMatrixElement(systemMatrix, matrixNodeIndices(0), matrixNodeIndices(1), -conductance);
77  // Math::addToMatrixElement(systemMatrix, matrixNodeIndices(1), matrixNodeIndices(0), -conductance);
78  //}
79  // Set diagonal entries
80  if (terminalNotGrounded(0)) {
81  Math::addToMatrixElement(systemMatrix, matrixNodeIndices(0),
82  matrixNodeIndices(0), conductance);
83  }
84  if (terminalNotGrounded(1)) {
85  Math::addToMatrixElement(systemMatrix, matrixNodeIndices(1),
86  matrixNodeIndices(1), conductance);
87  }
88  // Set off diagonal entries
89  if (terminalNotGrounded(0) && terminalNotGrounded(1)) {
90  Math::addToMatrixElement(systemMatrix, matrixNodeIndices(0),
91  matrixNodeIndices(1), -conductance);
92  Math::addToMatrixElement(systemMatrix, matrixNodeIndices(1),
93  matrixNodeIndices(0), -conductance);
94  }
95 
96  if (terminalNotGrounded(0))
97  SPDLOG_LOGGER_INFO(mSLog, "Add {} to {}, {}", conductance,
98  matrixNodeIndex(0, 0), matrixNodeIndex(0, 0));
99  if (terminalNotGrounded(1))
100  SPDLOG_LOGGER_INFO(mSLog, "Add {} to {}, {}", conductance,
101  matrixNodeIndex(1, 0), matrixNodeIndex(1, 0));
102  if (terminalNotGrounded(0) && terminalNotGrounded(1)) {
103  SPDLOG_LOGGER_INFO(mSLog, "Add {} to {}, {}", -conductance,
104  matrixNodeIndex(0, 0), matrixNodeIndex(1, 0));
105  SPDLOG_LOGGER_INFO(mSLog, "Add {} to {}, {}", -conductance,
106  matrixNodeIndex(1, 0), matrixNodeIndex(0, 0));
107  }
108 }
109 
111  AttributeBase::List &prevStepDependencies,
112  AttributeBase::List &attributeDependencies,
113  AttributeBase::List &modifiedAttributes,
114  Attribute<Matrix>::Ptr &leftVector) {
115  attributeDependencies.push_back(leftVector);
116  modifiedAttributes.push_back(mIntfVoltage);
117  modifiedAttributes.push_back(mIntfCurrent);
118 }
119 
120 void DP::Ph3::SeriesResistor::mnaCompPostStep(
121  Real time, Int timeStepCount, Attribute<Matrix>::Ptr &leftVector) {
122  mnaCompUpdateVoltage(**leftVector);
123  mnaCompUpdateCurrent(**leftVector);
124 }
125 
126 void DP::Ph3::SeriesResistor::mnaCompUpdateVoltage(const Matrix &leftVector) {
127  // Voltage across component is defined as V1 - V0
128  **mIntfVoltage = MatrixComp::Zero(3, 1);
129  if (terminalNotGrounded(1)) {
130  (**mIntfVoltage)(0, 0) =
131  Math::complexFromVectorElement(leftVector, matrixNodeIndex(1, 0));
132  (**mIntfVoltage)(1, 0) =
133  Math::complexFromVectorElement(leftVector, matrixNodeIndex(1, 1));
134  (**mIntfVoltage)(2, 0) =
135  Math::complexFromVectorElement(leftVector, matrixNodeIndex(1, 2));
136  }
137  if (terminalNotGrounded(0)) {
138  (**mIntfVoltage)(0, 0) =
139  (**mIntfVoltage)(0, 0) -
140  Math::complexFromVectorElement(leftVector, matrixNodeIndex(0, 0));
141  (**mIntfVoltage)(1, 0) =
142  (**mIntfVoltage)(1, 0) -
143  Math::complexFromVectorElement(leftVector, matrixNodeIndex(0, 1));
144  (**mIntfVoltage)(2, 0) =
145  (**mIntfVoltage)(2, 0) -
146  Math::complexFromVectorElement(leftVector, matrixNodeIndex(0, 2));
147  }
148 
149  SPDLOG_LOGGER_DEBUG(mSLog, "Voltage A: {} < {}",
150  std::abs((**mIntfVoltage)(0, 0)),
151  std::arg((**mIntfVoltage)(0, 0)));
152 }
153 
154 void DP::Ph3::SeriesResistor::mnaCompUpdateCurrent(const Matrix &leftVector) {
155  **mIntfCurrent = **mIntfVoltage / **mResistance;
156 
157  SPDLOG_LOGGER_DEBUG(mSLog, "Current A: {} < {}",
158  std::abs((**mIntfCurrent)(0, 0)),
159  std::arg((**mIntfCurrent)(0, 0)));
160 }
SeriesResistor(String uid, String name, Logger::Level logLevel=Logger::Level::off)
Defines UID, name and logging level.
void initializeFromNodesAndTerminals(Real frequency) override
Initializes component from power flow data.
SimPowerComp< Complex >::Ptr clone(String name) override
Returns a modified copy of the component with the given suffix added to the name and without.
void mnaCompAddPostStepDependencies(AttributeBase::List &prevStepDependencies, AttributeBase::List &attributeDependencies, AttributeBase::List &modifiedAttributes, Attribute< Matrix >::Ptr &leftVector) override
Add MNA post step dependencies.
void mnaCompApplySystemMatrixStamp(SparseMatrixRow &systemMatrix) override
Stamps system matrix.
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< Complex > >::Ptr mIntfCurrent
Current through component.
Definition: SimPowerComp.h:47
const Attribute< MatrixVar< Complex > >::Ptr mIntfVoltage
Voltage between terminals.
Definition: SimPowerComp.h:45