diff options
Diffstat (limited to '3840/CH11')
-rw-r--r-- | 3840/CH11/EX11.1/Ex11_1.sce | 24 | ||||
-rw-r--r-- | 3840/CH11/EX11.10/Ex11_10.sce | 14 | ||||
-rw-r--r-- | 3840/CH11/EX11.11/Ex11_11.sce | 20 | ||||
-rw-r--r-- | 3840/CH11/EX11.12/Ex11_12.sce | 19 | ||||
-rw-r--r-- | 3840/CH11/EX11.2/Ex11_2.sce | 16 | ||||
-rw-r--r-- | 3840/CH11/EX11.3/Ex11_3.sce | 13 | ||||
-rw-r--r-- | 3840/CH11/EX11.4/Ex11_4.sce | 14 | ||||
-rw-r--r-- | 3840/CH11/EX11.5/Ex11_5.sce | 15 | ||||
-rw-r--r-- | 3840/CH11/EX11.6/Ex11_6.sce | 14 | ||||
-rw-r--r-- | 3840/CH11/EX11.7/Ex11_7.sce | 16 | ||||
-rw-r--r-- | 3840/CH11/EX11.8/Ex11_8.sce | 17 | ||||
-rw-r--r-- | 3840/CH11/EX11.9/Ex11_9.sce | 21 |
12 files changed, 203 insertions, 0 deletions
diff --git a/3840/CH11/EX11.1/Ex11_1.sce b/3840/CH11/EX11.1/Ex11_1.sce new file mode 100644 index 000000000..04b5a8173 --- /dev/null +++ b/3840/CH11/EX11.1/Ex11_1.sce @@ -0,0 +1,24 @@ +clear +// +// +// + +//Variable declaration +n1=1.48 //Core refractive index +n2=1.45 //Cladding refractive index + +//Calculation +NA=sqrt(n1**2-n2**2) //numerical aperture +theta0=asin(NA) //acceptance angle(radian) +theta0=theta0*180/%pi //acceptance angle(degrees) +theta0m=60*(theta0-int(theta0)) //acceptance angle(minutes) +thetac=asin(n2/n1) //critical angle(radian) +thetac=thetac*180/%pi //critical angle(degrees) +thetacm=60*(thetac-int(thetac)) //critical angle(minutes) +delta=(n1-n2)/n1 //fractional index change + +//Result +printf("\n numerical aperture is %0.4f ",NA) +printf("\n acceptance angle is %0.3f degrees %0.0f minutes",theta0,theta0m) +printf("\n critical angle is %0.3f degrees %0.3f minutes",thetac,thetacm) +printf("\n fractional index change is %0.2f ",delta) diff --git a/3840/CH11/EX11.10/Ex11_10.sce b/3840/CH11/EX11.10/Ex11_10.sce new file mode 100644 index 000000000..e89db0a03 --- /dev/null +++ b/3840/CH11/EX11.10/Ex11_10.sce @@ -0,0 +1,14 @@ +clear +// +// +// + +//Variable declaration +n1=1.45 //Core refractive index +n2=1.44 //Cladding refractive index + +//Calculation +delta=(n1-n2)/n1 //fractional index change + +//Result +printf("\n fractional index change is %0.4f *10**-3",delta*10**3) diff --git a/3840/CH11/EX11.11/Ex11_11.sce b/3840/CH11/EX11.11/Ex11_11.sce new file mode 100644 index 000000000..96b4ff79f --- /dev/null +++ b/3840/CH11/EX11.11/Ex11_11.sce @@ -0,0 +1,20 @@ +clear +// +// +// + +//Variable declaration +n1=1.50 //Core refractive index +delta=4/100 //fractional index change + +//Calculation +n2=n1-(delta*n1) //Cladding refractive index +NA=sqrt(n1**2-n2**2) //numerical aperture +theta0=asin(NA) //acceptance angle(radian) +theta0=theta0*180/%pi //acceptance angle(degrees) +theta0m=60*(theta0-int(theta0)) //acceptance angle(minutes) +thetac=asin(n2/n1) //critical angle(radian) +thetac=thetac*180/%pi //critical angle(degrees) +thetacm=60*(thetac-int(thetac)) //critical angle(minutes) + +//Result diff --git a/3840/CH11/EX11.12/Ex11_12.sce b/3840/CH11/EX11.12/Ex11_12.sce new file mode 100644 index 000000000..6cc9f641d --- /dev/null +++ b/3840/CH11/EX11.12/Ex11_12.sce @@ -0,0 +1,19 @@ +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) //acceptance angle(radian) +theta0=theta0*180/%pi //acceptance angle(degrees) +theta0m=60*(theta0-int(theta0)) //acceptance angle(minutes) + +//Result +printf("\n numerical aperture is %0.3f ",NA) +printf("\n acceptance angle is %0.3f degrees %0.0f minutes",theta0,theta0m) +printf("\n answer for angle in minutes given in the book varies due to rounding off errors") diff --git a/3840/CH11/EX11.2/Ex11_2.sce b/3840/CH11/EX11.2/Ex11_2.sce new file mode 100644 index 000000000..c1b873fc0 --- /dev/null +++ b/3840/CH11/EX11.2/Ex11_2.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) //acceptance angle(radian) +theta0=theta0*180/%pi //acceptance angle(degrees) +theta0m=60*(theta0-int(theta0)) //acceptance angle(minutes) + +//Resul" diff --git a/3840/CH11/EX11.3/Ex11_3.sce b/3840/CH11/EX11.3/Ex11_3.sce new file mode 100644 index 000000000..392b3dcd2 --- /dev/null +++ b/3840/CH11/EX11.3/Ex11_3.sce @@ -0,0 +1,13 @@ +clear +// +// +// + +//Variable declaration +n1=1.563 //Core refractive index +n2=1.498 //Cladding refractive index + +//Calculation +delta=(n1-n2)/n1 //fractional index change + +//Result diff --git a/3840/CH11/EX11.4/Ex11_4.sce b/3840/CH11/EX11.4/Ex11_4.sce new file mode 100644 index 000000000..6dd8e205c --- /dev/null +++ b/3840/CH11/EX11.4/Ex11_4.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.4f ",NA) diff --git a/3840/CH11/EX11.5/Ex11_5.sce b/3840/CH11/EX11.5/Ex11_5.sce new file mode 100644 index 000000000..72ee299ee --- /dev/null +++ b/3840/CH11/EX11.5/Ex11_5.sce @@ -0,0 +1,15 @@ +clear +// +// +// + +//Variable declaration +NA=0.39 //numerical aperture +n1_n2=0.05 //difference in refractive indices + +//Calculation +n1n2=NA**2/n1_n2 +n2=(n1n2-n1_n2)/2 //Cladding refractive index +n1=n2+n1_n2 //Core refractive index + +//Result diff --git a/3840/CH11/EX11.6/Ex11_6.sce b/3840/CH11/EX11.6/Ex11_6.sce new file mode 100644 index 000000000..6dd8e205c --- /dev/null +++ b/3840/CH11/EX11.6/Ex11_6.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.4f ",NA) diff --git a/3840/CH11/EX11.7/Ex11_7.sce b/3840/CH11/EX11.7/Ex11_7.sce new file mode 100644 index 000000000..fa06d77f8 --- /dev/null +++ b/3840/CH11/EX11.7/Ex11_7.sce @@ -0,0 +1,16 @@ +clear +// +// +// + +//Variable declaration +n1=1.48 //Core refractive index +n2=1.45 //Cladding refractive index + +//Calculation +NA=sqrt(n1**2-n2**2) //numerical aperture +theta0=asin(NA) //acceptance angle(radian) +theta0=theta0*180/%pi //acceptance angle(degrees) +theta0m=60*(theta0-int(theta0)) //acceptance angle(minutes) + +//Result diff --git a/3840/CH11/EX11.8/Ex11_8.sce b/3840/CH11/EX11.8/Ex11_8.sce new file mode 100644 index 000000000..8b7d46ee7 --- /dev/null +++ b/3840/CH11/EX11.8/Ex11_8.sce @@ -0,0 +1,17 @@ +clear +// +// +// + +//Variable declaration +NA=0.33 //numerical aperture +delta=0.02 //refractive index of cladding + +//Calculation +x=1-delta +n1=sqrt(NA**2/(1-x**2)) //refractive index of core +n2=x*n1 //refractive index of cladding + +//Result +printf("\n refractive index of core is %0.4f ",n1) +printf("\n refractive index of cladding is %0.3f ",n2) diff --git a/3840/CH11/EX11.9/Ex11_9.sce b/3840/CH11/EX11.9/Ex11_9.sce new file mode 100644 index 000000000..eec791858 --- /dev/null +++ b/3840/CH11/EX11.9/Ex11_9.sce @@ -0,0 +1,21 @@ +clear +// +// +// + +//Variable declaration +NA=0.20 //numerical aperture +n0=1.33 //refractive index of water +n2=1.59 //Cladding refractive index + +//Calculation +n1=sqrt((NA**2)+(n2**2)) //core refractive index +x=sqrt((n1**2)-(n2**2))/n0 +theta0=asin(x) //acceptance angle(radian) +theta0=theta0*180/%pi //acceptance angle(degrees) +theta0m=60*(theta0-int(theta0)) //acceptance angle(minutes) +theta0s=60*(theta0m-int(theta0m)) //acceptance angle(seconds) + +//Resul" +printf("\n acceptance angle is %0.3f degrees %0.3f minutes %0.3f seconds",theta0,theta0m,theta0s) +printf("\n answer for angle in seconds given in the book varies due to rounding off errors") |