summaryrefslogtreecommitdiff
path: root/1979/CH8/EX8.12
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /1979/CH8/EX8.12
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '1979/CH8/EX8.12')
-rwxr-xr-x1979/CH8/EX8.12/Ex8_12.sce23
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===============================