diff options
author | priyanka | 2015-06-24 15:03:17 +0530 |
---|---|---|
committer | priyanka | 2015-06-24 15:03:17 +0530 |
commit | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch) | |
tree | ab291cffc65280e58ac82470ba63fbcca7805165 /2273/CH9/EX9.8/ex9_8.sce | |
download | Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2 Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip |
initial commit / add all books
Diffstat (limited to '2273/CH9/EX9.8/ex9_8.sce')
-rwxr-xr-x | 2273/CH9/EX9.8/ex9_8.sce | 19 |
1 files changed, 19 insertions, 0 deletions
diff --git a/2273/CH9/EX9.8/ex9_8.sce b/2273/CH9/EX9.8/ex9_8.sce new file mode 100755 index 000000000..a4dab0f1d --- /dev/null +++ b/2273/CH9/EX9.8/ex9_8.sce @@ -0,0 +1,19 @@ +//find safe working voltage of cable
+clear;
+clc;
+//soltion
+//given
+d=4;//cm
+D=10;//cm
+e1=5;//realtive permeabilty
+e2=4;//realtive permeabilty
+e3=3;//realtive permeabilty
+d1=e1*d/e2;
+d2=e1*d/e3;
+gmax=40;//kV/cm
+Vper=(gmax/2)*[d*log(d1/d)+d1*log(d2/d1)+d2*log(D/d2)];
+Vsafe1=Vper/sqrt(2);
+printf("Safe working voltage(rms) of a cable= %.2f kV\n",Vsafe1);
+Vpeak=(gmax/2)*[d*log(D/d)];
+Vsafe2=Vpeak/sqrt(2);
+printf("Safe working voltage(rms) of the ungraded cable= %.2f kV",Vsafe2);
|