4 files changed, 75 insertions, 0 deletions
diff --git a/1979/CH7/EX7.1/Ex7_1.sce b/1979/CH7/EX7.1/Ex7_1.sce
new file mode 100755
index 000000000..6b9dfd5c8
--- /dev/null
+++ b/1979/CH7/EX7.1/Ex7_1.sce
@@ -0,0 +1,22 @@
+//chapter-7 page 278 example 7.1
+//==============================================================================
+clc;
+clear;
+
+a=4;//Length of Waveguide in cm
+b=2.5;//breadth Waveguide in cm
+f=10^10;//Frequency in Hz
+x=0.1;//distance between twice minimum power points in cm
+c=3*10^10;//Velocity of Light in cm/sec
+
+//CALCULATION
+wc=2*a;//Cutoff wavelength in TE10 mode in cms
+w0=(c/f);//Free space wavelength in cms
+wg=(w0/sqrt(1-(w0/wc)^2));//Guide wavelength in cms
+S=(wg/(x*(%pi)));//Voltage Standing Wave Ratio(VSWR) for double minimum method
+
+//OUTPUT
+mprintf('\nFor double minimum method, Voltage Standing Wave Ratio(VSWR) is S=%2.1f',S);
+
+//=========================END OF PROGRAM===============================
+
diff --git a/1979/CH7/EX7.2/Ex7_2.sce b/1979/CH7/EX7.2/Ex7_2.sce
new file mode 100755
index 000000000..7eedffde2
--- /dev/null
+++ b/1979/CH7/EX7.2/Ex7_2.sce
@@ -0,0 +1,18 @@
+//chapter-7 page 279 example 7.2
+//==============================================================================
+clc;
+clear;
+
+x=3;//O/P incident power from first directional coupler in mW
+y=0.1;//O/P reflected power from second directional coupler in mW
+
+//CALCULATION
+Pi=x*100;//Incident Power in mW
+Pr=y*100;//Reflected Power in mW
+p=sqrt(Pr/Pi);//Reflection Coefficient
+S=((1+p)/(1-p));//Voltage Standing Wave Ratio(VSWR)
+
+//OUTPUT
+mprintf('\nVoltage Standing Wave Ratio(VSWR)in the main waveguide is S=%1.2f \nReflected Power is Pr=%2.0f mW',S,Pr);
+
+//=========================END OF PROGRAM===============================
diff --git a/1979/CH7/EX7.3/Ex7_3.sce b/1979/CH7/EX7.3/Ex7_3.sce
new file mode 100755
index 000000000..d14bc60e5
--- /dev/null
+++ b/1979/CH7/EX7.3/Ex7_3.sce
@@ -0,0 +1,16 @@
+//chapter-7 page 279 example 7.3
+//==============================================================================
+clc;
+clear;
+
+Pi=2.5;//Incident Power from one directional coupler in mW
+Pr=0.15;//Reflected Power from other directional coupler in mW
+
+//CALCULATION
+p=sqrt(Pr/Pi);//Reflection Coefficient
+S=((1+p)/(1-p));//Voltage Standing Wave Ratio(VSWR)
+
+//OUTPUT
+mprintf('\nVoltage Standing Wave Ratio(VSWR)in the waveguide is S=%1.2f',S);
+
+//=========================END OF PROGRAM===============================
diff --git a/1979/CH7/EX7.4/Ex7_4.sce b/1979/CH7/EX7.4/Ex7_4.sce
new file mode 100755
index 000000000..e8b8162ce
--- /dev/null
+++ b/1979/CH7/EX7.4/Ex7_4.sce
@@ -0,0 +1,19 @@
+//chapter-7 page 279 example 7.4
+//==============================================================================
+clc;
+clear;
+
+S=2;//Voltage Standing Wave Ratio(VSWR)
+C=30;//Coupling Power of a Directional Coupler in dB
+Pf=4.5;//Coupler Incident Sampling Power in mW
+
+//CALCULATION
+p=((S-1)/(S+1));//Reflection Coefficient
+Pi=Pf*10^(C/10);//Incident Power in mW [From C=10log(Pi/Pf)]
+Pr=(Pi*(p^2))/10^3;//Reflected Power in W [From p=sqrt(Pr/Pi)]
+
+//OUTPUT
+mprintf('\nValue of Reflected Power is Pr=%1.2f W',Pr);
+
+//=========================END OF PROGRAM===============================
+