DPsim
Loading...
Searching...
No Matches
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
11using namespace CPS;
12
13EMT::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
22SimPowerComp<Real>::Ptr EMT::Ph1::Inductor::clone(String name) {
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
49void EMT::Ph1::Inductor::mnaCompInitialize(Real omega, Real timeStep,
50 Attribute<Matrix>::Ptr leftVector) {
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
84void 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
98void EMT::Ph1::Inductor::mnaCompPostStep(Real time, Int timeStepCount,
99 Attribute<Matrix>::Ptr &leftVector) {
100 mnaCompUpdateVoltage(**leftVector);
101 mnaCompUpdateCurrent(**leftVector);
102}
103
104void 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
116void EMT::Ph1::Inductor::mnaCompUpdateCurrent(const Matrix &leftVector) {
117 (**mIntfCurrent)(0, 0) = mEquivCond * (**mIntfVoltage)(0, 0) + mEquivCurrent;
118}
const CPS::Attribute< Real >::Ptr mInductance
Inductance [H].
void mnaCompUpdateVoltage(const Matrix &leftVector) override
Update interface voltage from MNA system result.
Real mEquivCond
Equivalent conductance [S].
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].
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< Real > >::Ptr mIntfCurrent
const Attribute< MatrixVar< Real > >::Ptr mIntfVoltage
Logger::Level mLogLevel
Component logger control for internal variables.
Logger::Log mSLog
Component logger.