summaryrefslogtreecommitdiff
path: root/2855/CH1/EX1.10/Ex1_10.sce
diff options
context:
space:
mode:
Diffstat (limited to '2855/CH1/EX1.10/Ex1_10.sce')
-rwxr-xr-x2855/CH1/EX1.10/Ex1_10.sce10
1 files changed, 10 insertions, 0 deletions
diff --git a/2855/CH1/EX1.10/Ex1_10.sce b/2855/CH1/EX1.10/Ex1_10.sce
new file mode 100755
index 000000000..2cc6c1f21
--- /dev/null
+++ b/2855/CH1/EX1.10/Ex1_10.sce
@@ -0,0 +1,10 @@
+//Example no 1-10
+//page no. 26
+clc;
+clear;
+//p=m/{m+[2*n/(1-n)^2]^2};
+
+m=5; //no. of reflective plates
+n=1.33; //refractive indices
+p=m/{m+[2*n/(1-(n)^2)]^2}; //degree of polarisation
+printf("\n The degree of polarisation is %0.1f \n",p);