summaryrefslogtreecommitdiff
path: root/1979/CH8/EX8.16/Ex8_16.sce
blob: 82584ea016ec1e892274be09aaf9a00e09ea756a (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
//chapter-8 page 348 example 8.16
//==============================================================================
clc;
clear;

//For a reflex klystron 
n=2;//peak mode value
V0=300;//beam voltage in V
Rsh=20000;//Shunt resistance in ohms
L=0.001;//distance in m
J1=0.582;//bessel coefficient value [JI(X')]
f=8*10^(9);////Operation frequency in Hz
V1=200;//RF gap voltage in V
x=1.759*10^11;//e/m value in C/kg

//CALCULATION
disp('Assume the gap transit time and beam loading are neglected');
w=2*(%pi)*f;//angular frequency in rad
VR=(V0+((sqrt(8*V0/x)*w*L)/((2*(%pi)*n)-((%pi)/2))));//Repeller voltage in V
disp('Assuming output coupling coefficient Bo=1');
I0=(V1/(2*J1*Rsh))/10^(-3);//Beam current necessary to obtain an RF gap voltafe of 200V in mA

//OUTPUT
mprintf('\nThe Repeller voltage is VR=%3.2f V \nBeam current necessary to obtain an RF gap voltafe of 200V is I0=%1.2f mA',VR,I0);

//=========================END OF PROGRAM===============================