diff options
Diffstat (limited to '2078/CH4/EX4.5/Example4_5.sce')
-rwxr-xr-x | 2078/CH4/EX4.5/Example4_5.sce | 20 |
1 files changed, 20 insertions, 0 deletions
diff --git a/2078/CH4/EX4.5/Example4_5.sce b/2078/CH4/EX4.5/Example4_5.sce new file mode 100755 index 000000000..cfe710f3b --- /dev/null +++ b/2078/CH4/EX4.5/Example4_5.sce @@ -0,0 +1,20 @@ +//Exa 4.5
+clc;
+clear;
+close;
+//Given data :
+r=1.2;//cm
+rdash=0.7788*r;//cm
+d12=0.12*100;//cm
+d11dash=(0.2+1.2)*100;//cm
+d22dash=(0.2+1.2)*100;//cm
+d12dash=(0.2+1.2+0.2)*100;//cm
+d21dash=(1.2)*100;//cm
+Dm=(d11dash*d12dash*d21dash*d22dash)^(1/4);//cm
+d11=0.93456;//cm
+d22=0.93456;//cm
+d12=20;//cm
+d21=20;//cm
+Ds=(d11*d12*d21*d22)^(1/4);//cm
+L=0.4*log(Dm/Ds);//mH/km
+disp(L,"Loop inductance of line(mH/km)");
|