1 files changed, 23 insertions, 0 deletions
diff --git a/1979/CH8/EX8.12/Ex8_12.sce b/1979/CH8/EX8.12/Ex8_12.sce
new file mode 100755
index 000000000..d2b9f5d61
--- /dev/null
+++ b/1979/CH8/EX8.12/Ex8_12.sce
@@ -0,0 +1,23 @@
+//chapter-8 page 345 example 8.12
+//==============================================================================
+clc;
+clear;
+
+//For a reflex klystron 
+f=5*10^9;//Frequency of operation in hz
+V0=1000;//anode voltage in V
+d=0.002;//cavity gap in m
+Vr=-500;//repeller voltage in V
+
+//CALCULATION 
+N=7/4;//mode value
+VR=abs(Vr);
+L=(((VR+V0)*N)/(6.74*10^(-6)*f*sqrt(V0)))/10^(-3);//Optimum length of the drift region in mm
+u=5.93*10^5*sqrt(V0);// in m/sec
+w=2*(%pi)*f;//angular frequency in rad
+Tg=(w*d)/u;//Gap transit angle in rad
+
+//OUTPUT
+mprintf('\nOptimum length of the drift region is L=%1.3f mm \nGap transit angle is Tg=%1.3f rad',L,Tg);
+
+//=========================END OF PROGRAM===============================