1 files changed, 14 insertions, 0 deletions
diff --git a/1865/CH4/EX4.1/prob_1.sce b/1865/CH4/EX4.1/prob_1.sce
new file mode 100644
index 000000000..733be1827
--- /dev/null
+++ b/1865/CH4/EX4.1/prob_1.sce
@@ -0,0 +1,14 @@
+
+//Problem 1
+//Calculate the coherent length for white light
+clear
+clc
+w1=400//initial wavelength of white light (in nm)
+w2=700//final wavelength of white light (in nm)
+dw=w2-w1;//difference between wavelengths
+aw=(w1+w2)/2;// average wavelength (in nm)
+l=((aw)^2/dw);//coherent length for white light (in nm)
+printf('del w = %.9f m\n',dw*(10)^(-9))
+printf('average wavelength= %.9f m \n\n',aw*(10)^(-9))
+printf('coherent length=%.6f m\n\n\n',l*(10)^(-9))
+printf('here coherent length is of the order of one micro meter.\n which is very very small and obtaining a path difference\n of this order between the interfering beam is difficult.\n that is why interference with white light is impossible.')
+\ No newline at end of file