summaryrefslogtreecommitdiff
path: root/1979/CH8/EX8.7/Ex8_7.sce
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.7/Ex8_7.sce
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.7/Ex8_7.sce')
-rwxr-xr-x1979/CH8/EX8.7/Ex8_7.sce23
1 files changed, 23 insertions, 0 deletions
diff --git a/1979/CH8/EX8.7/Ex8_7.sce b/1979/CH8/EX8.7/Ex8_7.sce
new file mode 100755
index 000000000..f8ff43668
--- /dev/null
+++ b/1979/CH8/EX8.7/Ex8_7.sce
@@ -0,0 +1,23 @@
+//chapter-8 page 342 example 8.7
+//==============================================================================
+clc;
+clear;
+
+//For a reflex klystron
+n=1;//mode value
+Pi=0.04;//the dc input power in W
+x=0.278;//ratio of V1 over V0
+
+//CALCULATION
+X=x*3*(%pi)/4;
+J1=0.3205;//bessel coefficient value [JI(X')]
+ef=((2*X*J1)/((2*(%pi)*n)-((%pi)/2)))*100;//Efficiency of the reflex klystron in %
+Pout=((ef/100)*Pi)/10^(-3);//Total power output in mW
+p=20;//percentage of the power delivered by the electron beam dissipated in the cavity walls
+Pd=Pout*(100-p)/100;//Power delivered to load in mW
+
+//OUTPUT
+mprintf('\nEfficiency of the reflex klystron is ef=%1.2f percentage\nTotal power output is Pout=%1.3f mW \nIf the 20 percentage of the power delivered by the electron beam is dissipated in the cavity walls then the Power delivered to load is Pd=%1.2f mW',ef,Pout,Pd);
+
+//=========================END OF PROGRAM===============================
+