blob: e514e15cc0f3b07f55e8bdddec59193191f9e213 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
|
// Ex 71 Page 411
clc;clear;close;
// Given
f=50;//Hz
Vm=500;//V
R=20;//ohm
L=0.2;//H
t=0.02;//sec
XL=2*%pi*f*L;//ohm
Z=R+%i*XL;//ohm
Im=Vm/abs(Z);//A
fi=atan(XL/R);//degree
lambda=L/R;//sec
printf("expression for current:")
printf("\n i = %.1f*sin(314*t-%.3f)+0.95*e**(-100*t)",Im,fi)
i = Im*sin(314*t-fi)+0.95*%e**(-100*t);//A
printf("\n current after 0.02 sec is : %0.1f A",-i)
i2=Im*(0.95*%e**(-100*t));//A
printf("\n transient component is : %0.2f A",i2)
|
