diff options
| author | prashantsinalkar | 2017-10-10 12:27:19 +0530 |
|---|---|---|
| committer | prashantsinalkar | 2017-10-10 12:27:19 +0530 |
| commit | 7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch) | |
| tree | dbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /509/CH9/EX9.6/9_6.sci | |
| parent | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (diff) | |
| download | Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.gz Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.bz2 Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.zip | |
initial commit / add all books
Diffstat (limited to '509/CH9/EX9.6/9_6.sci')
| -rw-r--r-- | 509/CH9/EX9.6/9_6.sci | 36 |
1 files changed, 36 insertions, 0 deletions
diff --git a/509/CH9/EX9.6/9_6.sci b/509/CH9/EX9.6/9_6.sci new file mode 100644 index 000000000..7ac8d0bb2 --- /dev/null +++ b/509/CH9/EX9.6/9_6.sci @@ -0,0 +1,36 @@ +// Chapter 9 Example 6//
+clc
+clear
+// from the above diagram distnce between various conductors can be found out//
+// conductor radius =r//
+r=0.025;// in cms//
+k1=6;//k1=dac=dc1a1//
+k2=4;//k2=dac1=dca1//
+k3=10;//k3=dbb1//
+k4=sqrt((k1/2)^2+(k1/2)^2);//k4=dab=dbc=db1c1=da1b1//
+k5=sqrt((k1)^2+(k2)^2);//k5=daa1=dcc1//
+k6=sqrt((k1/2)^2+(k3-(k3-k2)/2)^2);//k6=dbc1=dba1=dcb1=dab1//
+// mutual GMD in position 1=ds1//
+gmd1=(k4*k1*k6*k2)^(1/4);
+printf("\n Mutual GMD of conductor in position1 = %.4fm \n",gmd1);
+// self-GMD in position in position1=gmr1//
+gmr1=sqrt(0.7788*r*k5);
+printf("\n Self GMD in position1 = %.3fm\n",gmr1);
+gmd2=(k4*k4*k6*k6)^(1/4);
+printf("\n Mutual GMD of conductor in position2 = %.3fm \n",gmd2);
+gmr2=sqrt(0.7788*r*k3);
+printf("\n Self GMD in position2= %.3fm\n",gmr2);
+gmd3=(k1*k6*k2*k4)^(1/4);
+gmr3=sqrt(0.7788*r*k5);
+printf("\n Mutual GMD of conductor in position3 = %.3fm\n",gmd3);
+printf("\n Self GMD in position3 = %.3fm\n",gmr3);
+// mutual gmd=dm//
+dm=(gmd1*gmd2*gmd3)^(1/3);
+printf("\n Mutual GMD = %.3fm\n",dm);
+ds=(gmr1*gmr2*gmr3)^(1/3);
+printf("\n Self GMR = %.3fm\n",ds);
+// inductance of phase a=la//
+la=2*10^-7*(log(dm/ds))*10^6;// 10^6 is conversion factor//
+printf("\n Inductance of phase a = %.3fmH/km\n",la);
+
+
|