diff options
Diffstat (limited to '1397/CH8/EX8.4/8_4.sce')
| -rwxr-xr-x | 1397/CH8/EX8.4/8_4.sce | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/1397/CH8/EX8.4/8_4.sce b/1397/CH8/EX8.4/8_4.sce new file mode 100755 index 000000000..0f8fea7bb --- /dev/null +++ b/1397/CH8/EX8.4/8_4.sce @@ -0,0 +1,8 @@ +//clc();
+clear;
+//To calculate angle of acceptance
+n1=1.563; //refractive index of core
+n2=1.498; //refractive index of cladding
+NA=sqrt(n1^2-n2^2);
+theta0=asind(NA);
+printf("angle of acceptance is %f degrees",theta0);
|