summaryrefslogtreecommitdiff
path: root/3523/CH12/EX12.17.1/Ex12_1.sce
diff options
context:
space:
mode:
authorprashantsinalkar2017-10-10 12:27:19 +0530
committerprashantsinalkar2017-10-10 12:27:19 +0530
commit7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch)
treedbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /3523/CH12/EX12.17.1/Ex12_1.sce
parentb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (diff)
downloadScilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.gz
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.bz2
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.zip
initial commit / add all books
Diffstat (limited to '3523/CH12/EX12.17.1/Ex12_1.sce')
-rw-r--r--3523/CH12/EX12.17.1/Ex12_1.sce32
1 files changed, 32 insertions, 0 deletions
diff --git a/3523/CH12/EX12.17.1/Ex12_1.sce b/3523/CH12/EX12.17.1/Ex12_1.sce
new file mode 100644
index 000000000..ced0d28ff
--- /dev/null
+++ b/3523/CH12/EX12.17.1/Ex12_1.sce
@@ -0,0 +1,32 @@
+//Example 1// Ch 12
+clc;
+clear;
+close;
+// given data
+r1=2;//inner coaxial cable radius
+r2=5;//sheath radius over the insulation
+Em1=40;//max stress in the insulation in kV/cm
+Em2=25;//max stress in the insulation in kV/cm
+epsilon1=6;
+epsilon2=4;
+x=Em1/Em2;
+r=x*((epsilon1*r1)/(epsilon2));//radial thickness of the dielectric
+printf("radial thickness of the dielectric %f cm",r)
+inner=r-r1;//inner thickness of dielectric
+outer=r2-r;//outer thickness of dielectric
+printf("inner thickness of dielectric %f cm",inner)
+printf("outer thickness of dielectric %f cm",outer)
+V1=Em1*r1*log(r/r1);//voltage drop across dielectric in kV
+V2=Em2*r*log(r2/r);//voltage drop across outer dielectric
+printf("voltage drop across dielectric %f kV",V1)
+printf("voltage drop across outer dielectric %f kV",V2)
+pv = V1+V2;//peak voltage of cable
+printf("peak voltage of cable %f kV",pv)
+pvrms=pv/sqrt(2);
+printf("peak voltage in rms %f kV",pvrms)
+
+
+
+
+
+