summaryrefslogtreecommitdiff
path: root/3871/CH5/EX5.9/Ex5_9.sce
blob: 5fa635988bb193e1fc6a5976ac38067e96fc5482 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
//===========================================================================
//chapter 5 example 9
clc;clear all;

//variable declaration 
//dL/dtheta  = x
y     = 2.3*10^-6;
Td1    = 5*10**-7; 
t       = 52;     

//calculations
x     = y*(180/%pi);
Td     = Td1*t;
//Td     = (1/2)*(I**2)*(dL/dtheta);
I           = sqrt((Td*2)/(x));		//current in A

//result
mprintf("current = %3.2f A",I);