1 files changed, 16 insertions, 0 deletions
diff --git a/1997/CH6/EX6.4/example4.sce b/1997/CH6/EX6.4/example4.sce
new file mode 100755
index 000000000..d686e317d
--- /dev/null
+++ b/1997/CH6/EX6.4/example4.sce
@@ -0,0 +1,16 @@
+//Chapter-6 example 4
+//=============================================================================
+clc;
+clear;
+//input data
+Va  = 900 ;//Accelarating voltage in volts
+F   = 3.2*10^9;//operating frequency
+d   = 10^-3;
+//Calculations
+Ve  = (0.593*10^6)*sqrt(Va);//electron velocity
+w   = 2*%pi*F;
+theta  = w*(d/Ve);//transit angle in radians
+Be  = sin(theta/2)/(theta/2);//Beam Coupling Co-efficient
+//output
+mprintf('Electron Velocity is %g m/s\n Transit Angle is %g rad\n Beam Coupling Co-efficient is %3.3f ',Ve,theta,Be);
+//=============end of the program===============================================