summaryrefslogtreecommitdiff
path: root/3411/CH7/EX7.6.u1
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /3411/CH7/EX7.6.u1
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 '3411/CH7/EX7.6.u1')
-rw-r--r--3411/CH7/EX7.6.u1/Ex7_6_u1.sce21
-rw-r--r--3411/CH7/EX7.6.u1/Ex7_6_u1.txt8
2 files changed, 29 insertions, 0 deletions
diff --git a/3411/CH7/EX7.6.u1/Ex7_6_u1.sce b/3411/CH7/EX7.6.u1/Ex7_6_u1.sce
new file mode 100644
index 000000000..106900195
--- /dev/null
+++ b/3411/CH7/EX7.6.u1/Ex7_6_u1.sce
@@ -0,0 +1,21 @@
+//Example 7_6_u1
+clc();
+clear;
+//To calculate the numerical aperture,acceptance angle,critical angle,velocity of the light in core and cladding
+n1=1.5
+delta=1.8*10^-2
+NA=n1*sqrt(2*delta)
+printf("Numerical apperture is NA=%.3f\n",NA)
+ia=asin(NA)*180/%pi //units in degrees
+printf("Angle of acceptance is ia=%.2f Degrees\n",ia)
+n2=0.982*n1
+n2_n1=0.982
+ic=asin(n2_n1)*180/%pi //units in degrees
+printf("Critical angle is ic=%.2f Degrees\n",ic)
+c=3*10^8
+vc=c/n1
+printf("Velocity of light in core is vc=")
+disp(vc)
+vcc=c/n2
+printf("Velocity of light in cladding is vcc=")
+disp(vcc)
diff --git a/3411/CH7/EX7.6.u1/Ex7_6_u1.txt b/3411/CH7/EX7.6.u1/Ex7_6_u1.txt
new file mode 100644
index 000000000..9bd9eabf3
--- /dev/null
+++ b/3411/CH7/EX7.6.u1/Ex7_6_u1.txt
@@ -0,0 +1,8 @@
+Numerical apperture is NA=0.285
+Angle of acceptance is ia=16.54 Degrees
+Critical angle is ic=79.11 Degrees
+Velocity of light in core is vc=
+ 2.000D+08
+Velocity of light in cladding is vcc=
+ 2.037D+08
+ \ No newline at end of file