diff options
Diffstat (limited to '2855/CH1/EX1.10/Ex1_10.sce')
-rwxr-xr-x | 2855/CH1/EX1.10/Ex1_10.sce | 10 |
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);
|