summaryrefslogtreecommitdiff
path: root/3850/CH38/EX38.3/Ex38_3.sce
blob: fd3b9860d5b849993121e28428e9ccb73b659ff7 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22

//To Calculate the Self Inductance of Coil

//Example 38.3

clear;

clc;

If=-5.0;//Final Current flowing through coil in opposite direction in Amperes

Ii=5.0;//Initial Current flowing through coil in Amperes

t=0.20;//Time Required for current to Change from -5 A to 5 A in seconds

di=(If-Ii)/t;//Change in Current through the coil in Amperes

E=0.2;//Average Induced EMF in Volts

L=-E/di;//Self Inductance of the Coil

printf("Self Inductance of the coil (L) = %.1f mH",L*10^3);