diff options
Diffstat (limited to '374/CH1')
-rw-r--r-- | 374/CH1/EX1.1/11.sci | 19 | ||||
-rw-r--r-- | 374/CH1/EX1.2/12.sci | 11 | ||||
-rw-r--r-- | 374/CH1/EX1.3/13.sci | 16 |
3 files changed, 46 insertions, 0 deletions
diff --git a/374/CH1/EX1.1/11.sci b/374/CH1/EX1.1/11.sci new file mode 100644 index 000000000..903863145 --- /dev/null +++ b/374/CH1/EX1.1/11.sci @@ -0,0 +1,19 @@ +//Chapter 1 Example1//
+//core refractive index of silica optical fibre =n1,cladding refractive index of silica optical fibre =n2,critical angle =p,angle of obliqueness=pm//
+n1=1.5;n2=1.450;
+p=asind(n2/n1);
+pm=90-p;
+printf("\n a)angle of obliqueness=%f\n",pm);
+//refractive index for air=na,acceptance angle in air=a//
+na=1;
+h=sind(pm);
+k=(n1*h)/(na);
+a=asind(k);
+printf("\n b) acceptance angle of fibre=%f\n",a);
+//numerical aperture=NA,percentage of light collected=x//
+NA=sqrt((n1+n2)*(n1-n2));
+x=(NA^2)*100;
+printf("\n.c) numerical aprture of fibre=%f\n",NA);
+printf("\n.d) percentage of light collected=%f\n",x);
+
+
diff --git a/374/CH1/EX1.2/12.sci b/374/CH1/EX1.2/12.sci new file mode 100644 index 000000000..e954ebb52 --- /dev/null +++ b/374/CH1/EX1.2/12.sci @@ -0,0 +1,11 @@ +//Chapter 1 Example2//
+//refractive index of air=na,acceptance angle=a,numerical aperture=NA//
+clc;
+clear;
+NA=0.3;
+a=asind(NA);
+printf("\n a) acceptance angle=%f\n",a);
+//direction of screw rays=s,acceptance angle of screw rays=as//
+s=45;
+as=(asind(NA))/(cosd(s));
+printf("\n b) acceptance angle of screw rays=%f\n",as);
diff --git a/374/CH1/EX1.3/13.sci b/374/CH1/EX1.3/13.sci new file mode 100644 index 000000000..10f89d78b --- /dev/null +++ b/374/CH1/EX1.3/13.sci @@ -0,0 +1,16 @@ +//Chapter 1 Example3//
+clc;
+clear;
+//refractive index of W step index fibre=n1,refractive index difference between core and cladding=d,numerical aperture=NA//
+d=0.02;
+n1=1.46;
+n2=n1-(n1*d);
+v=n1+n2;
+b=n1-n2;
+NA=sqrt(v*b);
+printf("\n a) numerical aperture=%f,n\",NA);
+//solid acceptance angle in air=as,critical angle of core cladding interface=p//
+as=%pi*(NA^2);
+printf("\n b) solid acceptance angle in air=%f,n\",as);
+p=asind(n2/n1);
+printf("\n c) critical angle of core cladding interface=%f,n\",p);
\ No newline at end of file |