1 files changed, 22 insertions, 0 deletions
diff --git a/1979/CH8/EX8.9/Ex8_9.sce b/1979/CH8/EX8.9/Ex8_9.sce
new file mode 100755
index 000000000..e159f61d5
--- /dev/null
+++ b/1979/CH8/EX8.9/Ex8_9.sce
@@ -0,0 +1,22 @@
+//chapter-8 page 343 example 8.9
+//==============================================================================
+clc;
+clear;
+
+//For a helical TWT
+c=3*10^8;//Velocity of light in m/sec
+d=0.002;//diameter in m
+x=5000;//no.of turns per m
+m=9.1*10^(-31);//mass of an electron in kg
+e=1.6*10^(-19);//charge of an electron in C
+
+//CALCULATION
+y=(%pi)*d;//circumference in m
+p=1/x;//pitch in m
+Vp=(c*p)/y;//Axial phase velocity in m/sec
+V0=((m*Vp^2)/(2*e));//The Anode voltage at which the TWT can be operated for useful gain in V
+
+//OUTPUT
+mprintf('\nAxial phase velocity is Vp=%6.2f m/sec \nThe Anode voltage at which the TWT can be operated for useful gain is V0=%2.2f V',Vp,V0);
+
+//=========================END OF PROGRAM===============================