From 7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 Mon Sep 17 00:00:00 2001
From: prashantsinalkar
Date: Tue, 10 Oct 2017 12:27:19 +0530
Subject: initial commit / add all books

---
 3523/CH16/EX16.7.9/Ex16_9.sce | 34 ++++++++++++++++++++++++++++++++++
 1 file changed, 34 insertions(+)
 create mode 100644 3523/CH16/EX16.7.9/Ex16_9.sce

(limited to '3523/CH16/EX16.7.9')

diff --git a/3523/CH16/EX16.7.9/Ex16_9.sce b/3523/CH16/EX16.7.9/Ex16_9.sce
new file mode 100644
index 000000000..9d656858b
--- /dev/null
+++ b/3523/CH16/EX16.7.9/Ex16_9.sce
@@ -0,0 +1,34 @@
+clear all
+clc
+close
+
+n=8;//no ofstage
+C1=0.16*1e-6;//Each stage capacitor in F
+C2=1e-9;//Load capacitance in F
+T2=50*1e-6;
+T1=1.2*1e-6;
+Vch=120;//Charging voltage in kV
+
+//Total capacitance in F
+CT=C1/n;
+
+alpha=6.4;
+theta=T2/9.5;
+
+X=(1+C2/C1)/alpha^2;
+R1=alpha*theta/C2*(1-sqrt(1-X));//in ohm
+
+R2=alpha*theta/(CT+C2)*(1+sqrt(1-X));//in ohm
+//Perstage shaping resistance in ohm
+printf('Perstage shaping resistance in %f ohm',R1/n)
+
+Vdc=n*Vch;
+eta=1/(1+(1+R1/R2)*C2/CT)
+
+//Maximum output voltage
+Vmax=eta*Vdc;
+printf('Maxium output voltage in %f kV',Vmax)
+
+//Energy rating in J
+E=0.5*CT*(Vdc*1e3)^2;
+printf('Energy rating in %f J',E)
-- 
cgit