4 files changed, 56 insertions, 0 deletions
diff --git a/3363/CH3/EX3.1/Ex3_1.sce b/3363/CH3/EX3.1/Ex3_1.sce
new file mode 100755
index 000000000..db20b29e1
--- /dev/null
+++ b/3363/CH3/EX3.1/Ex3_1.sce
@@ -0,0 +1,14 @@
+//Example 3.1, page 74
+clc
+m=1//in kg
+h=6.63*10^-34//Joule-sec
+v=10//in m/sec
+lambda=h/(m*v)
+disp('part a')
+printf("\n De broglie wavelength for v=10m/sec %e m",lambda)
+disp('part b')
+//For KE=100ev
+m=9.1*10^-31
+K=100*1.6*10^-19//in Joules
+lambda=h/sqrt(2*m*K)
+printf("\n De broglie wavelength is %e m",lambda)
+\ No newline at end of file
diff --git a/3363/CH3/EX3.2/Ex3_2.sce b/3363/CH3/EX3.2/Ex3_2.sce
new file mode 100755
index 000000000..73337b5a5
--- /dev/null
+++ b/3363/CH3/EX3.2/Ex3_2.sce
@@ -0,0 +1,10 @@
+//Example 3.2, Page 80
+clc
+h=6.63*10^-34//Joule-sec
+v=1.635*10^3//m/s
+M=4*10^-3//in kg/mole
+No=6.02*10^23//atom/mole
+m=M/No
+printf("\n Mass of Helium atom is %e kg",m)
+lambda=h/(m*v)
+printf("\n De broglie wavelength is %e m",lambda)
+\ No newline at end of file
diff --git a/3363/CH3/EX3.3/Ex3_3.sce b/3363/CH3/EX3.3/Ex3_3.sce
new file mode 100755
index 000000000..705d91860
--- /dev/null
+++ b/3363/CH3/EX3.3/Ex3_3.sce
@@ -0,0 +1,17 @@
+//Example 3.3, Page 87
+clc
+//For electron
+m1=9.1*10^-31//in kg
+v=300//in m/s
+h=6.6*10^-34//in joule-sec
+p1=m1*v//delta v
+delta_p1=.0001*p1//m*delata_v in kg-m/sec
+delta_x1=(h)/(4*%pi*delta_p1)
+printf("\n Position of electron %e  m",delta_x1)
+
+//For bullet
+m2=0.05//in kg
+p2=m2*v
+delta_p2=0.0001*p2//in kg-m/s
+delta_x2=(h)/(4*%pi*delta_p2)
+printf("\n Position of bullet %e  m",delta_x2)
+\ No newline at end of file
diff --git a/3363/CH3/EX3.5/Ex3_5.sce b/3363/CH3/EX3.5/Ex3_5.sce
new file mode 100755
index 000000000..427e60de1
--- /dev/null
+++ b/3363/CH3/EX3.5/Ex3_5.sce
@@ -0,0 +1,15 @@
+//Example 3.5, page no 94
+clc
+disp('part b')
+lambda=5890*10^-8//in cm
+c=3*10^10//in cm/s
+v=c/lambda
+del_v=8*10^6//per s
+x=del_v/v
+h=4.14*10^-15//in ev-sec
+printf("\n Fractional width of either line(del_v/v) %e  ",x)
+//Calculate uncertainty
+disp('part c')
+del_t=10^-8
+del_e=(h)/(4*%pi*del_t)
+printf("\n Uncertainty is %e ev ",del_e)
+\ No newline at end of file