Added new codeHEADmaster

20 files changed, 325 insertions, 0 deletions

diff --git a/3869/CH5/EX5.1/Ex5_1.sce b/3869/CH5/EX5.1/Ex5_1.sce
new file mode 100644
index 000000000..4c88ade83
--- /dev/null
+++ b/3869/CH5/EX5.1/Ex5_1.sce
@@ -0,0 +1,20 @@
+clear
+//
+//
+//
+
+//Variable declaration
+n1=1.50          //Core refractive index
+n2=1.47          //Cladding refractive index
+
+//Calculation
+phic=asin(n2/n1)      //critical angle(radian)
+phic=phic*180/%pi     //critical angle(degrees)
+NA=sqrt(n1**2-n2**2)    //numerical aperture
+phimax=asin(NA)         //acceptance angle(radian)
+phimax=asin(NA)*180/%pi     //acceptance angle(degrees)
+
+//Result
+printf("\n critical angle is %0.1f  degrees",phic)
+printf("\n numerical aperture is %0.1f  ",NA)
+printf("\n acceptance angle is %0.1f  degrees",phimax)
diff --git a/3869/CH5/EX5.11/Ex5_11.sce b/3869/CH5/EX5.11/Ex5_11.sce
new file mode 100644
index 000000000..3385abe49
--- /dev/null
+++ b/3869/CH5/EX5.11/Ex5_11.sce
@@ -0,0 +1,14 @@
+clear
+//
+//
+//
+
+//Variable declaration
+n1=1.563      //Core refractive index
+n2=1.498      //Cladding refractive index
+
+//Calculation
+delta=(n1-n2)/n1    //fractional index change
+
+//Result
+printf("\n fractional index change is %0.4f  ",delta)
diff --git a/3869/CH5/EX5.12/Ex5_12.sce b/3869/CH5/EX5.12/Ex5_12.sce
new file mode 100644
index 000000000..2ce273a7b
--- /dev/null
+++ b/3869/CH5/EX5.12/Ex5_12.sce
@@ -0,0 +1,18 @@
+clear
+//
+//
+//
+
+//Variable declaration
+n1=1.48      //Core refractive index
+n2=1.45      //Cladding refractive index
+
+//Calculation
+NA=sqrt(n1**2-n2**2)     //numerical aperture
+thetamax=asin(NA)*180/%pi     
+thetamaxd=int(thetamax)       //angle of acceptance(degrees)
+thetamaxm=60*(thetamax-thetamaxd)   //angle of acceptance(minutes)
+
+//Result
+printf("\n numerical aperture is %0.4f  ",NA)
+printf("\n angle of acceptance is %0.3f degrees %0.0f minutes",thetamaxd,thetamaxm)
diff --git a/3869/CH5/EX5.13/Ex5_13.sce b/3869/CH5/EX5.13/Ex5_13.sce
new file mode 100644
index 000000000..d75db81b1
--- /dev/null
+++ b/3869/CH5/EX5.13/Ex5_13.sce
@@ -0,0 +1,14 @@
+clear
+//
+//
+//
+
+//Variable declaration
+NA=0.39          //numerical aperture
+delta=0.05       //fractional index change
+
+//Calculation
+n1=NA/sqrt(2*delta)     //refractive index of core
+
+//Result
+printf("\n refractive index of core is %0.3f  ",n1)
diff --git a/3869/CH5/EX5.14/Ex5_14.sce b/3869/CH5/EX5.14/Ex5_14.sce
new file mode 100644
index 000000000..74cc8fd12
--- /dev/null
+++ b/3869/CH5/EX5.14/Ex5_14.sce
@@ -0,0 +1,14 @@
+clear
+//
+//
+//
+
+//Variable declaration
+n1=1.563      //Core refractive index
+n2=1.498      //Cladding refractive index
+
+//Calculation
+delta=(n1-n2)/n1    //fractional index change
+
+//Result
+printf("\n fractional index change is %0.5f  ",delta)
diff --git a/3869/CH5/EX5.15/Ex5_15.sce b/3869/CH5/EX5.15/Ex5_15.sce
new file mode 100644
index 000000000..4d9771663
--- /dev/null
+++ b/3869/CH5/EX5.15/Ex5_15.sce
@@ -0,0 +1,14 @@
+clear
+//
+//
+//
+
+//Variable declaration
+n1=1.55          //Core refractive index
+n2=1.50          //Cladding refractive index
+
+//Calculation
+NA=sqrt(n1**2-n2**2)    //numerical aperture
+
+//Result
+printf("\n numerical aperture is %0.2f  ",NA)
diff --git a/3869/CH5/EX5.16/Ex5_16.sce b/3869/CH5/EX5.16/Ex5_16.sce
new file mode 100644
index 000000000..6881a602b
--- /dev/null
+++ b/3869/CH5/EX5.16/Ex5_16.sce
@@ -0,0 +1,16 @@
+clear
+//
+//
+//
+
+//Variable declaration
+n1=1.563          //Core refractive index
+n2=1.498          //Cladding refractive index
+
+//Calculation
+NA=sqrt(n1**2-n2**2)    //numerical aperture
+theta0=asin(NA)*180/%pi          //acceptance angle(degrees)
+
+//Result
+printf("\n numerical aperture is %0.4f  ",NA)
+printf("\n acceptance angle is %0.2f  degrees",theta0)
diff --git a/3869/CH5/EX5.17/Ex5_17.sce b/3869/CH5/EX5.17/Ex5_17.sce
new file mode 100644
index 000000000..8b5f29fa0
--- /dev/null
+++ b/3869/CH5/EX5.17/Ex5_17.sce
@@ -0,0 +1,14 @@
+clear
+//
+//
+//
+
+//Variable declaration
+n1=1.53          //Core refractive index
+n2=1.42          //Cladding refractive index
+
+//Calculation
+thetac=asin(n2/n1)*180/%pi       //critical angle(degrees)
+
+//Result
+printf("\n critical angle is %0.2f  degrees",thetac)
diff --git a/3869/CH5/EX5.18/Ex5_18.sce b/3869/CH5/EX5.18/Ex5_18.sce
new file mode 100644
index 000000000..5035b4904
--- /dev/null
+++ b/3869/CH5/EX5.18/Ex5_18.sce
@@ -0,0 +1,17 @@
+clear
+//
+//
+//
+
+//Variable declaration
+n1=1.6          //Core refractive index
+n2=1.4          //Cladding refractive index
+n0=1.33         //water refractive index
+
+//Calculation
+NA=sqrt(n1**2-n2**2)/n0    //numerical aperture
+theta0=asin(NA)*180/%pi          //acceptance angle(degrees)
+
+//Result
+printf("\n numerical aperture is %0.3f  ",NA)
+printf("\n acceptance angle is %0.4f  degrees",theta0)
diff --git a/3869/CH5/EX5.19/Ex5_19.sce b/3869/CH5/EX5.19/Ex5_19.sce
new file mode 100644
index 000000000..3c36c6741
--- /dev/null
+++ b/3869/CH5/EX5.19/Ex5_19.sce
@@ -0,0 +1,14 @@
+clear
+//
+//
+//
+
+//Variable declaration
+n1=1.5      //Core refractive index
+n2=1.3      //Cladding refractive index
+
+//Calculation
+delta=(n1-n2)/n1    //fractional index change
+
+//Result
+printf("\n fractional index change is %0.3f  ",delta)
diff --git a/3869/CH5/EX5.2/Ex5_2.sce b/3869/CH5/EX5.2/Ex5_2.sce
new file mode 100644
index 000000000..39d1dc6f3
--- /dev/null
+++ b/3869/CH5/EX5.2/Ex5_2.sce
@@ -0,0 +1,14 @@
+clear
+//
+//
+//
+
+//Variable declaration
+n1=1.46          //Core refractive index
+delta=0.05       //relative refractive index difference
+
+//Calculation
+NA=n1*sqrt(2*delta)    //numerical aperture
+
+//Result
+printf("\n numerical aperture is %0.2f  ",NA)
diff --git a/3869/CH5/EX5.20/Ex5_20.sce b/3869/CH5/EX5.20/Ex5_20.sce
new file mode 100644
index 000000000..561ba9b36
--- /dev/null
+++ b/3869/CH5/EX5.20/Ex5_20.sce
@@ -0,0 +1,16 @@
+clear
+//
+//
+//
+
+//Variable declaration
+n1=1.55       //Core refractive index
+n2=1.6      //Cladding refractive index
+theta1=60*%pi/180     //angle of incidence(radian)
+
+//Calculation
+x=n1*sin(theta1)/n2     
+theta2=asin(x)*180/%pi        //angle of reflection(degrees)
+
+//Result
+printf("\n angle of reflection is %0.2f  degrees",theta2)
diff --git a/3869/CH5/EX5.21/Ex5_21.sce b/3869/CH5/EX5.21/Ex5_21.sce
new file mode 100644
index 000000000..2b4b75a0e
--- /dev/null
+++ b/3869/CH5/EX5.21/Ex5_21.sce
@@ -0,0 +1,14 @@
+clear
+//
+//
+//
+
+//Variable declaration
+n2=1.3      //Cladding refractive index
+delta=0.14    //fractional index change
+
+//Calculation
+n1=n2/(1-delta)      //Core refractive index
+
+//Result
+printf("\n Core refractive index is %0.2f  ",n1)
diff --git a/3869/CH5/EX5.22/Ex5_22.sce b/3869/CH5/EX5.22/Ex5_22.sce
new file mode 100644
index 000000000..562b0624d
--- /dev/null
+++ b/3869/CH5/EX5.22/Ex5_22.sce
@@ -0,0 +1,13 @@
+clear
+//
+//
+//
+
+//Variable declaration
+theta0=26.80*%pi/180        //acceptance angle(radian)
+
+//Calculation
+NA=sin(theta0)              //numerical aperture
+
+//Result
+printf("\n numerical aperture is %0.5f  ",NA)
diff --git a/3869/CH5/EX5.3/Ex5_3.sce b/3869/CH5/EX5.3/Ex5_3.sce
new file mode 100644
index 000000000..17b02b9c8
--- /dev/null
+++ b/3869/CH5/EX5.3/Ex5_3.sce
@@ -0,0 +1,18 @@
+clear
+//
+//
+//
+
+//Variable declaration
+NA=0.3    //numerical aperture
+gama=45*%pi/180   //angle(radian)
+
+//Calculation
+thetaa1=asin(NA)         //acceptance angle for meridional rays(radian)
+thetaa1=thetaa1*180/%pi          //acceptance angle for meridional rays(degrees)
+thetaa2=asin(NA/cos(gama))*180/%pi     //acceptance angle for skew rays(degrees)
+
+//Result
+printf("\n acceptance angle for meridional rays is %0.2f  degrees",thetaa1)
+printf("\n acceptance angle for skew rays is %0.3f  degrees",thetaa2)
+printf("\n answer for acceptance angle for skew rays given in the textbook varies due to rounding off errors")
diff --git a/3869/CH5/EX5.4/Ex5_4.sce b/3869/CH5/EX5.4/Ex5_4.sce
new file mode 100644
index 000000000..c155858de
--- /dev/null
+++ b/3869/CH5/EX5.4/Ex5_4.sce
@@ -0,0 +1,17 @@
+clear
+//
+//
+//
+
+//Variable declaration
+n1=1.53          //Core refractive index
+delta=0.0196       //relative refractive index difference
+
+//Calculation
+NA=n1*sqrt(2*delta)    //numerical aperture
+thetaa=asin(NA)*180/%pi      //acceptance angle(degrees)
+
+//Result
+printf("\n numerical aperture is %0.3f  ",NA)
+printf("\n acceptance angle is %0.3f  degrees",thetaa)
+printf("\n answer for acceptance angle given in the textbook varies due to rounding off errors")
diff --git a/3869/CH5/EX5.5/Ex5_5.sce b/3869/CH5/EX5.5/Ex5_5.sce
new file mode 100644
index 000000000..6cd2fc7d7
--- /dev/null
+++ b/3869/CH5/EX5.5/Ex5_5.sce
@@ -0,0 +1,25 @@
+clear
+//
+//
+//
+
+//Variable declaration
+n1=1.5          //Core refractive index
+n2=1.49         //Cladding refractive index
+a=25*10**-6     //radius of core(m)
+L=1             //distance(m)
+
+//Calculation
+phic=(asin(n2/n1)*180/%pi )       //critical angle(degrees)
+
+phicr=phic*%pi/180                  //critical angle(radian) 
+l=2*a*tan(phicr)                //fibre length(m) 
+r=1/l                        //number of reflections
+od=L/sin(phicr)         //total distance travelled by light(m)
+
+//Result
+printf("\n critical angle is %0.3f  degrees",phic)
+printf("\n fibre length is %0.2f  micro m",l*10**6)
+printf("\n answer for fibre length given in the book is wrong")
+printf("\n number of reflections is %0.3f  ",r)
+printf("\n total distance travelled by light is %0.4f  m",od)
diff --git a/3869/CH5/EX5.7/Ex5_7.sce b/3869/CH5/EX5.7/Ex5_7.sce
new file mode 100644
index 000000000..57cf234f9
--- /dev/null
+++ b/3869/CH5/EX5.7/Ex5_7.sce
@@ -0,0 +1,19 @@
+clear
+//
+//
+//
+
+//Variable declaration
+n=1.55           //Core refractive index
+L=10             //length(m)
+delta=0.026      //relative refractive index difference
+C=3*10**5
+
+//Calculation
+deltaT=L*n*delta/C         //total dispersion(s)
+blp=L/(2*deltaT)           //bandwidth length product(Hz km)
+
+//Result
+printf("\n total dispersion is %0.1f  ns",deltaT*10**9)
+printf("\n bandwidth length product is %0.2f  *10**5 Hz km",blp/10**5)
+printf("\n answer for bandwidth length product given in the book is wrong")
diff --git a/3869/CH5/EX5.8/Ex5_8.sce b/3869/CH5/EX5.8/Ex5_8.sce
new file mode 100644
index 000000000..5b58bd099
--- /dev/null
+++ b/3869/CH5/EX5.8/Ex5_8.sce
@@ -0,0 +1,14 @@
+clear
+//
+//
+//
+
+//Variable declaration
+n1=1.55          //Core refractive index
+n2=1.50          //Cladding refractive index
+
+//Calculation
+NA=sqrt(n1**2-n2**2)    //numerical aperture
+
+//Result
+printf("\n numerical aperture is %0.3f  ",NA)
diff --git a/3869/CH5/EX5.9/Ex5_9.sce b/3869/CH5/EX5.9/Ex5_9.sce
new file mode 100644
index 000000000..fd78ee0e8
--- /dev/null
+++ b/3869/CH5/EX5.9/Ex5_9.sce
@@ -0,0 +1,20 @@
+clear
+//
+//
+//
+
+//Variable declaration
+n1=1.563          //Core refractive index
+n2=1.498          //Cladding refractive index
+
+//Calculation
+NA=sqrt(n1**2-n2**2)    //numerical aperture
+phimax=asin(NA)         //acceptance angle(radian)
+phimax=asin(NA)*180/%pi     
+phimaxd=int(phimax)          //acceptance angle(degrees)
+phimaxm=60*(phimax-phimaxd)  //acceptance angle(minutes)
+
+//Result
+printf("\n numerical aperture is %0.4f  ",NA)
+printf("\n acceptance angle is %0.3f degrees %0.1f minutes",phimaxd,phimaxm)
+printf("\n answer for acceptance angle in minutes given in the book varies due to rounding off errors")