DP_VS_RL1.cpp 1.93 KB
Newer Older
Petra Raussi's avatar
Petra Raussi committed
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
/** Reference Circuits
 *
 * @author Markus Mirz <mmirz@eonerc.rwth-aachen.de>
 * @copyright 2017-2018, Institute for Automation of Complex Power Systems, EONERC
 *
 * DPsim
 *
 * This program is free software: you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation, either version 3 of the License, or
 * any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program.  If not, see <http://www.gnu.org/licenses/>.
 *********************************************************************************/

22
#include <DPsim.h>
Petra Raussi's avatar
Petra Raussi committed
23
24
25
26
27
28

using namespace DPsim;
using namespace CPS::DP;
using namespace CPS::DP::Ph1;

int main(int argc, char* argv[]) {
Markus Mirz's avatar
Markus Mirz committed
29
30
31
32
33
	// Define simulation scenario
	Real timeStep = 0.0001;
	Real finalTime = 0.1;
	String simName = "DP_VS_RL1";

Petra Raussi's avatar
Petra Raussi committed
34
35
36
37
38
	// Nodes
	auto n1 = Node::make("n1");
	auto n2 = Node::make("n2");

	// Components
Petra Raussi's avatar
Petra Raussi committed
39
	auto vs = VoltageSource::make("vs");
Markus Mirz's avatar
Markus Mirz committed
40
41
42
	vs->setParameters(Complex(10, 0));
	vs->connect(Node::List{ Node::GND, n1 });

Petra Raussi's avatar
Petra Raussi committed
43
	auto r1 = Resistor::make("r_1");
Petra Raussi's avatar
Petra Raussi committed
44
	r1->setParameters(5);
45
	r1->connect(Node::List{ n1, n2 });
Markus Mirz's avatar
Markus Mirz committed
46

Petra Raussi's avatar
Petra Raussi committed
47
	auto l1 = Inductor::make("l_1");
Petra Raussi's avatar
Petra Raussi committed
48
	l1->setParameters(0.02);
49
	l1->connect(Node::List{ n2, Node::GND });
Steffen Vogel's avatar
Steffen Vogel committed
50

Petra Raussi's avatar
Petra Raussi committed
51
52
	// Define system topology
	auto sys = SystemTopology(50, SystemNodeList{n1, n2}, SystemComponentList{vs, r1, l1});
Steffen Vogel's avatar
Steffen Vogel committed
53

Markus Mirz's avatar
Markus Mirz committed
54
55
56
57
	// Logger
	auto logger = DataLogger::make(simName);
	logger->addAttribute("v1", n1->attribute("voltage"));
	logger->addAttribute("v2", n2->attribute("voltage"));
Markus Mirz's avatar
Markus Mirz committed
58
	logger->addAttribute("i1", r1->attribute("i_intf"));
Markus Mirz's avatar
Markus Mirz committed
59

Petra Raussi's avatar
Petra Raussi committed
60
	Simulation sim(simName, sys, timeStep, finalTime);
Markus Mirz's avatar
Markus Mirz committed
61
62
	sim.addLogger(logger);

Petra Raussi's avatar
Petra Raussi committed
63
64
65
66
	sim.run();

	return 0;
}