initial commit / add all books

1 files changed, 20 insertions, 0 deletions

diff --git a/3035/CH6/EX6.4/Ex6_4.sce b/3035/CH6/EX6.4/Ex6_4.sce
new file mode 100755
index 000000000..58290a367
--- /dev/null
+++ b/3035/CH6/EX6.4/Ex6_4.sce
@@ -0,0 +1,20 @@
+// Variable Declaration
+E = 40.0        //Safe working stress(kV/cm) rms
+d = 1.5         //Conductor diameter(cm)
+D = 6.7         //Sheath diameter(cm)
+t = 0.1         //Thickness of lead tube(cm)
+
+
+// Calculation Section
+r = d/2                     //Conductor radius(cm)
+R = D/2                     //Sheath radius(cm)
+r_i = r+((R-r)/2)-t/2       //Internal radius of intersheath(cm)
+r_e = r_i + t               //External radius of intersheath(cm)
+V_1 = E*r*log(r_i/r)   //Voltage across conductor & intersheath(kV)
+V_2 = E*r_e*log(R/r_e) //Voltage across intersheath & earthed sheath(kV)
+V = V_1 + V_2               //Safe working voltage with intersheath(kV)
+V_no = E*r*log(R/r)    //Safe working voltage without intersheath(kV)
+
+// Result Section
+printf('Safe working voltage with intersheath , V = %.2f kV' ,V)
+printf('Safe working voltage without intersheath , V = %.2f kV' ,V_no)