2078/CH4/EX4.8/Example4_8.sce


1
2
3
4
5
6
7
8
9
10
11
12

//Exa 4.8
clc;
clear;
close;
//Given data :
r=(20/2)/10;//cm
d1=4*100;//cm
d2=5*100;//cm
d3=6*100;//cm
rdash=0.7788*r;//cm
L=0.2*log((d1*d2*d3)^(1/3)/rdash);//mH
disp(L,"Inductance per phase(mH)");