summaryrefslogtreecommitdiff
path: root/3809/CH9/EX9.2/EX9_2.sce
blob: 2a21519aaedb59c7ed271e3d11ae9b27ebb0238f (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
//Chapter 9, Example 9.2
clc
//Initialisation
L=400*10**-3                   //inductance in henry
R=20                         //resistance in ohm
V=15                                //voltage
i=300*10**-3                        //current in amp
e=2.7183                            //exponent

//Calculation
T=L/R                            //time constant in sec
I=V/R                            //current in amp from Ohms Law
t=(log10(I/(I-i))/log10(e))*T     //time period



//Results
printf("t = %.1f ms",t*1000)