1 files changed, 24 insertions, 0 deletions
diff --git a/3740/CH3/EX3.4/Ex3_4.sce b/3740/CH3/EX3.4/Ex3_4.sce
new file mode 100644
index 000000000..7c23668e0
--- /dev/null
+++ b/3740/CH3/EX3.4/Ex3_4.sce
@@ -0,0 +1,24 @@
+//Optoelectronics - An Introduction, 2nd Edition by J. Wilson and J.F.B. Hawkes
+//Example 3.4
+//OS=Windows XP sp3
+//Scilab version 5.5.2
+clc;
+clear;
+
+//given
+lambda=633e-9;//Wavelength in m
+Deltaf=5e6;//Frequency bandwidth in Hz
+L=50e-3;//Length of the modulator in m
+eta=0.7;//diffraction efficiency
+lambdaa=4.3e-5;//Acoustic wavelength in m
+va=3500;//Acoustic velocity in m/s
+
+ThetaB=asind(lambda/(2*lambdaa));//Angle of diffraction in degrees
+mprintf("ThetaB = %.2f degrees",ThetaB);
+
+//As eta=(sin(Phi/2))^2, Rearranging the terms we get:
+Phi=2*asind(sqrt(eta));
+mprintf("\n Phi = %.1f degrees",Phi);
+
+B=va/Deltaf;//Maximum optical beamwidth in m
+mprintf("\n B = %.1f mm",B/1e-3);//Division by 10^(-3) to convert into mm