summaryrefslogtreecommitdiff
path: root/3673/CH10/EX10.a.3/Example_a_10_3.sce
blob: fe6c4252c5576aed7c569015db17cbc7a5aa42bf (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
//Example_a_10_3 page no:465
clc;
K=0.5;
L1L2=36;
M=K*sqrt(L1L2);
t=0;
//calculating the voltages
V1=20*(-sind((50*t-30))*50)-6*(-sind((50*t)-30)*50);
V2=-15*(-sind((50*t-30))*50)+18*(-sind((50*t)-30)*50);
W=(((1/2)*4*(5*cosd((50*t)-30))^2)+((1/2)*9*(2*cosd((50*t)-30))^2)-(3*(5*cosd((50*t)-30)*2*cosd((50*t)-30))))*%i;
disp(V1,"the value of V1 is (in V)");
disp(V2,"the value of V2 is (in V)");
disp(W,"the total energy stored in the system is (in W)");