summaryrefslogtreecommitdiff
path: root/1319/CH1/EX1.31/1_31.sce
blob: 3e1184dffd7e38c3f6dd97aff83e7d2dfa02645d (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
//To determine the sum and difference of two alternating voltage sources

clc;
clear;

//Phase angles
tv1=0;
tv2=-%pi/6;

//Taking v1 as reference voltage
v1=110*(expm(%i*tv1));
v2=80*(expm(%i*tv2));

Vs=v1+v2;//Sum
Vd=v1-v2;//Difference

ts=atand(imag(Vs)/real(Vs));
td=atand(imag(Vd)/real(Vd));

printf('i) The sum = %g sin(wt + (%g(degrees))) V\n',abs(Vs),ts)
printf('i) The difference = %g sin(wt + (%g(degrees))) V\n',abs(Vd),td)