DPsim
Loading...
Searching...
No Matches
DP_Ph3_Capacitor.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/DP/DP_Ph3_Capacitor.h>
10
11using namespace CPS;
12using namespace CPS::DP::Ph3;
13
14DP::Ph3::Capacitor::Capacitor(String uid, String name, Logger::Level logLevel)
15 : MNASimPowerComp<Complex>(uid, name, true, true, logLevel),
16 Base::Ph3::Capacitor(mAttributes) {
17 mPhaseType = PhaseType::ABC;
18 setTerminalNumber(2);
19 mEquivCurrent = MatrixComp::Zero(3, 1);
20 **mIntfVoltage = MatrixComp::Zero(3, 1);
21 **mIntfCurrent = MatrixComp::Zero(3, 1);
22}
23
24SimPowerComp<Complex>::Ptr DP::Ph3::Capacitor::clone(String name) {
25 auto copy = Capacitor::make(name, mLogLevel);
26 copy->setParameters(**mCapacitance);
27 return copy;
28}
29
31
32 Real omega = 2 * PI * frequency;
33 MatrixComp susceptance = Matrix::Zero(3, 3);
34
35 susceptance << Complex(0, omega * (**mCapacitance)(0, 0)),
36 Complex(0, omega * (**mCapacitance)(0, 1)),
37 Complex(0, omega * (**mCapacitance)(0, 2)),
38 Complex(0, omega * (**mCapacitance)(1, 0)),
39 Complex(0, omega * (**mCapacitance)(1, 1)),
40 Complex(0, omega * (**mCapacitance)(1, 2)),
41 Complex(0, omega * (**mCapacitance)(2, 0)),
42 Complex(0, omega * (**mCapacitance)(2, 1)),
43 Complex(0, omega * (**mCapacitance)(2, 2));
44
45 // IntfVoltage initialization for each phase
46 (**mIntfVoltage)(0, 0) = initialSingleVoltage(1) - initialSingleVoltage(0);
47 Real voltMag = Math::abs((**mIntfVoltage)(0, 0));
48 Real voltPhase = Math::phase((**mIntfVoltage)(0, 0));
49 (**mIntfVoltage)(1, 0) = Complex(voltMag * cos(voltPhase - 2. / 3. * M_PI),
50 voltMag * sin(voltPhase - 2. / 3. * M_PI));
51 (**mIntfVoltage)(2, 0) = Complex(voltMag * cos(voltPhase + 2. / 3. * M_PI),
52 voltMag * sin(voltPhase + 2. / 3. * M_PI));
53
54 **mIntfCurrent = susceptance * **mIntfVoltage;
55
56 SPDLOG_LOGGER_INFO(mSLog, "\n--- Initialize from power flow ---");
57}
58
59void DP::Ph3::Capacitor::initVars(Real omega, Real timeStep) {
60 Matrix a = timeStep / 2 * (**mCapacitance).inverse();
61 Real b = timeStep * omega / 2.;
62
63 Matrix equivCondReal = a.inverse();
64 Matrix equivCondImag = b * equivCondReal;
65 mEquivCond = Matrix::Zero(3, 3);
66 mEquivCond << Complex(equivCondReal(0, 0), equivCondImag(0, 0)),
67 Complex(equivCondReal(0, 1), equivCondImag(0, 1)),
68 Complex(equivCondReal(0, 2), equivCondImag(0, 2)),
69 Complex(equivCondReal(1, 0), equivCondImag(1, 0)),
70 Complex(equivCondReal(1, 1), equivCondImag(1, 1)),
71 Complex(equivCondReal(1, 2), equivCondImag(1, 2)),
72 Complex(equivCondReal(2, 0), equivCondImag(2, 0)),
73 Complex(equivCondReal(2, 1), equivCondImag(2, 1)),
74 Complex(equivCondReal(2, 2), equivCondImag(2, 2));
75
76 Matrix mPrevVoltCoeffReal = equivCondReal;
77 Matrix mPrevVoltCoeffImag = -b * equivCondReal;
78
79 mPrevVoltCoeff = Matrix::Zero(3, 3);
80 mPrevVoltCoeff << Complex(mPrevVoltCoeffReal(0, 0), mPrevVoltCoeffImag(0, 0)),
81 Complex(mPrevVoltCoeffReal(0, 1), mPrevVoltCoeffImag(0, 1)),
82 Complex(mPrevVoltCoeffReal(0, 2), mPrevVoltCoeffImag(0, 2)),
83 Complex(mPrevVoltCoeffReal(1, 0), mPrevVoltCoeffImag(1, 0)),
84 Complex(mPrevVoltCoeffReal(1, 1), mPrevVoltCoeffImag(1, 1)),
85 Complex(mPrevVoltCoeffReal(1, 2), mPrevVoltCoeffImag(1, 2)),
86 Complex(mPrevVoltCoeffReal(2, 0), mPrevVoltCoeffImag(2, 0)),
87 Complex(mPrevVoltCoeffReal(2, 1), mPrevVoltCoeffImag(2, 1)),
88 Complex(mPrevVoltCoeffReal(2, 2), mPrevVoltCoeffImag(2, 2));
89
91}
92
93void DP::Ph3::Capacitor::mnaCompInitialize(Real omega, Real timeStep,
94 Attribute<Matrix>::Ptr leftVector) {
96 initVars(omega, timeStep);
97}
98
100 SparseMatrixRow &systemMatrix) {
101 MNAStampUtils::stampAdmittanceMatrix(
102 mEquivCond, systemMatrix, matrixNodeIndex(0), matrixNodeIndex(1),
103 terminalNotGrounded(0), terminalNotGrounded(1), mSLog);
104}
105
108
109 if (terminalNotGrounded(0)) {
110 Math::setVectorElement(rightVector, matrixNodeIndex(0, 0),
111 mEquivCurrent(0, 0));
112 Math::setVectorElement(rightVector, matrixNodeIndex(0, 1),
113 mEquivCurrent(1, 0));
114 Math::setVectorElement(rightVector, matrixNodeIndex(0, 2),
115 mEquivCurrent(2, 0));
116 }
117 if (terminalNotGrounded(1)) {
118 Math::setVectorElement(rightVector, matrixNodeIndex(1, 0),
119 -mEquivCurrent(0, 0));
120 Math::setVectorElement(rightVector, matrixNodeIndex(1, 1),
121 -mEquivCurrent(1, 0));
122 Math::setVectorElement(rightVector, matrixNodeIndex(1, 2),
123 -mEquivCurrent(2, 0));
124 }
125}
126
128 AttributeBase::List &prevStepDependencies,
129 AttributeBase::List &attributeDependencies,
130 AttributeBase::List &modifiedAttributes) {
131 // actually depends on C, but then we'd have to modify the system matrix anyway
132 modifiedAttributes.push_back(mRightVector);
133 prevStepDependencies.push_back(mIntfCurrent);
134 prevStepDependencies.push_back(mIntfVoltage);
135}
136
137void DP::Ph3::Capacitor::mnaCompPreStep(Real time, Int timeStepCount) {
138 mnaCompApplyRightSideVectorStamp(**mRightVector);
139}
140
142 AttributeBase::List &prevStepDependencies,
143 AttributeBase::List &attributeDependencies,
144 AttributeBase::List &modifiedAttributes,
145 Attribute<Matrix>::Ptr &leftVector) {
146 attributeDependencies.push_back(leftVector);
147 modifiedAttributes.push_back(mIntfVoltage);
148 modifiedAttributes.push_back(mIntfCurrent);
149}
150
151void DP::Ph3::Capacitor::mnaCompPostStep(Real time, Int timeStepCount,
152 Attribute<Matrix>::Ptr &leftVector) {
153 mnaCompUpdateVoltage(**leftVector);
154 mnaCompUpdateCurrent(**leftVector);
155}
156
157void DP::Ph3::Capacitor::mnaCompUpdateVoltage(const Matrix &leftVector) {
158 // v1 - v0
159 **mIntfVoltage = Matrix::Zero(3, 1);
160 if (terminalNotGrounded(1)) {
161 (**mIntfVoltage)(0, 0) =
162 Math::complexFromVectorElement(leftVector, matrixNodeIndex(1, 0));
163 (**mIntfVoltage)(1, 0) =
164 Math::complexFromVectorElement(leftVector, matrixNodeIndex(1, 1));
165 (**mIntfVoltage)(2, 0) =
166 Math::complexFromVectorElement(leftVector, matrixNodeIndex(1, 2));
167 }
168 if (terminalNotGrounded(0)) {
169 (**mIntfVoltage)(0, 0) =
170 (**mIntfVoltage)(0, 0) -
171 Math::complexFromVectorElement(leftVector, matrixNodeIndex(0, 0));
172 (**mIntfVoltage)(1, 0) =
173 (**mIntfVoltage)(1, 0) -
174 Math::complexFromVectorElement(leftVector, matrixNodeIndex(0, 1));
175 (**mIntfVoltage)(2, 0) =
176 (**mIntfVoltage)(2, 0) -
177 Math::complexFromVectorElement(leftVector, matrixNodeIndex(0, 2));
178 }
179}
180
const CPS::Attribute< Matrix >::Ptr mCapacitance
Capacitance [F].
void mnaCompApplySystemMatrixStamp(SparseMatrixRow &systemMatrix) override
Stamps system matrix.
Capacitor(String uid, String name, Logger::Level logLevel=Logger::Level::off)
Defines UID, name and logging level.
void mnaCompInitialize(Real omega, Real timeStep, Attribute< Matrix >::Ptr leftVector) override
Initializes internal variables of the component.
void mnaCompUpdateVoltage(const Matrix &leftVector) override
Update interface voltage from MNA system result.
void mnaCompUpdateCurrent(const Matrix &leftVector) override
Update interface current from MNA system result.
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 mnaCompAddPreStepDependencies(AttributeBase::List &prevStepDependencies, AttributeBase::List &attributeDependencies, AttributeBase::List &modifiedAttributes) override
Add MNA pre step dependencies.
MatrixComp mEquivCond
Equivalent conductance [S].
void initializeFromNodesAndTerminals(Real frequency) override
Initializes component from power flow data.
MatrixComp mPrevVoltCoeff
Coefficient in front of previous voltage value.
void mnaCompApplyRightSideVectorStamp(Matrix &rightVector) override
Stamps right side (source) vector.
void mnaCompAddPostStepDependencies(AttributeBase::List &prevStepDependencies, AttributeBase::List &attributeDependencies, AttributeBase::List &modifiedAttributes, Attribute< Matrix >::Ptr &leftVector) override
Add MNA post step dependencies.
void initVars(Real omega, Real timeStep)
init resistive companion model of capacitor
MatrixComp mEquivCurrent
DC equivalent current source [A].
String uid()
Returns unique id.
AttributeList::Ptr mAttributes
Attribute List.
MNASimPowerComp(String uid, String name, Bool hasPreStep, Bool hasPostStep, Logger::Level logLevel)
Attribute< Matrix >::Ptr mRightVector
const Attribute< MatrixVar< Complex > >::Ptr mIntfCurrent
const Attribute< MatrixVar< Complex > >::Ptr mIntfVoltage
Logger::Level mLogLevel
Component logger control for internal variables.
Logger::Log mSLog
Component logger.