diff options
Diffstat (limited to '3622')
-rw-r--r-- | 3622/CH1/EX1.1/Ex1_1.sce | 7 | ||||
-rw-r--r-- | 3622/CH10/EX10.1/Ex10_1.sce | 7 | ||||
-rw-r--r-- | 3622/CH2/EX2.1/Ex2_1.sce | 8 | ||||
-rw-r--r-- | 3622/CH2/EX2.2/Ex2_2.sce | 18 | ||||
-rw-r--r-- | 3622/CH2/EX2.3/Ex2_3.sce | 9 | ||||
-rw-r--r-- | 3622/CH2/EX2.4/Ex2_4.sce | 11 | ||||
-rw-r--r-- | 3622/CH4/EX4.1/Ex4_1.sce | 7 | ||||
-rw-r--r-- | 3622/CH4/EX4.2/Ex4_2.sce | 12 | ||||
-rw-r--r-- | 3622/CH4/EX4.3/Ex4_3.sce | 9 | ||||
-rw-r--r-- | 3622/CH4/EX4.4/Ex4_4.sce | 9 | ||||
-rw-r--r-- | 3622/CH6/EX6.1/Ex6_1.sce | 10 | ||||
-rw-r--r-- | 3622/CH6/EX6.2/Ex6_2.sce | 9 | ||||
-rw-r--r-- | 3622/CH6/EX6.3/Ex6_3.sce | 8 | ||||
-rw-r--r-- | 3622/CH6/EX6.4/Ex6_4.sce | 11 | ||||
-rw-r--r-- | 3622/CH8/EX8.1/Ex8_1.sce | 10 | ||||
-rw-r--r-- | 3622/CH8/EX8.2/Ex8_2.sce | 4 | ||||
-rw-r--r-- | 3622/CH8/EX8.3/Ex8_3.sce | 12 | ||||
-rw-r--r-- | 3622/CH8/EX8.4/Ex8_4.sce | 9 | ||||
-rw-r--r-- | 3622/CH9/EX9.1/Ex9_1.sce | 7 | ||||
-rw-r--r-- | 3622/CH9/EX9.2/Ex9_2.sce | 7 | ||||
-rw-r--r-- | 3622/CH9/EX9.3/Ex9_3.sce | 12 | ||||
-rw-r--r-- | 3622/CH9/EX9.4/Ex9_4.sce | 8 |
22 files changed, 204 insertions, 0 deletions
diff --git a/3622/CH1/EX1.1/Ex1_1.sce b/3622/CH1/EX1.1/Ex1_1.sce new file mode 100644 index 000000000..609c49cf2 --- /dev/null +++ b/3622/CH1/EX1.1/Ex1_1.sce @@ -0,0 +1,7 @@ +//Initialisation of variables
+clc
+C=20/(9*10^11)//converting cms to farads
+F=154-100//fall in potential
+R=F/60//rate of fall in potential
+I=C*R//ionization current
+printf('ionization current is %e amp \n',I)//correction applied
diff --git a/3622/CH10/EX10.1/Ex10_1.sce b/3622/CH10/EX10.1/Ex10_1.sce new file mode 100644 index 000000000..bf6f73151 --- /dev/null +++ b/3622/CH10/EX10.1/Ex10_1.sce @@ -0,0 +1,7 @@ +//Initialisation of variables
+clc
+l=3e-3//vibrating length
+E=8e10//young modulus
+d=2500//kg per m3
+N=(1/(2*l))*sqrt(E/d)
+printf('frequency is %e Hz \n',N)
diff --git a/3622/CH2/EX2.1/Ex2_1.sce b/3622/CH2/EX2.1/Ex2_1.sce new file mode 100644 index 000000000..2351b34be --- /dev/null +++ b/3622/CH2/EX2.1/Ex2_1.sce @@ -0,0 +1,8 @@ +//Initialisation of variables
+clc
+v=3e9//cms per second
+X=.06//e.s unit
+R=300//cms
+//(m*v^2/r)=X*e
+electronbymass=v^2/(R*X)
+printf('e/m ratio is %e esu \n',electronbymass)
diff --git a/3622/CH2/EX2.2/Ex2_2.sce b/3622/CH2/EX2.2/Ex2_2.sce new file mode 100644 index 000000000..59eaf1d9a --- /dev/null +++ b/3622/CH2/EX2.2/Ex2_2.sce @@ -0,0 +1,18 @@ +//Initialisation of variables
+clc
+e=1.603e-20//electron volts
+t=6.6e-9
+m=9.11e-28//mass of electron
+V=500e8//e.m.u
+d=5//cm
+X=V/d//e.m.u per cm
+f=X*e//force on electron
+a=f/m//acceleration of electron
+v=a*t//velocity of electron
+dist=.5*a*t^2//distance travelled
+printf('velocity of electron is %e cm per s \n',v)
+printf('distance travelled is %d cms \n',dist)
+
+
+
+
diff --git a/3622/CH2/EX2.3/Ex2_3.sce b/3622/CH2/EX2.3/Ex2_3.sce new file mode 100644 index 000000000..69f2647c2 --- /dev/null +++ b/3622/CH2/EX2.3/Ex2_3.sce @@ -0,0 +1,9 @@ +
+//Initialisation of variables
+clc
+a=10^(-5)
+d=1
+e=4.8*10^(-10)
+g=980
+X=4*%pi*a^3*d*g/(3*e)
+printf('field required to keep drop stationary is %e esu per cm \n',X)
diff --git a/3622/CH2/EX2.4/Ex2_4.sce b/3622/CH2/EX2.4/Ex2_4.sce new file mode 100644 index 000000000..16421021a --- /dev/null +++ b/3622/CH2/EX2.4/Ex2_4.sce @@ -0,0 +1,11 @@ +//Initialisation of variables
+clc
+m=9.1*10^(-28)//mass on electron
+e=4.8*10^(-10)//charge on electron
+ev=1.6e-12//electron volt in ergs
+v=10^9//cms/sec
+E=0.5*m*v^2//energy in ergs
+Ev=E/ev
+printf('energy is %e ergs \n',E)
+printf('energy is %f electron volt \n',Ev)
+
diff --git a/3622/CH4/EX4.1/Ex4_1.sce b/3622/CH4/EX4.1/Ex4_1.sce new file mode 100644 index 000000000..0bcafc5e6 --- /dev/null +++ b/3622/CH4/EX4.1/Ex4_1.sce @@ -0,0 +1,7 @@ +//Initialisation of variables
+clc
+e=1.6e-19//coulomb
+o=8.85e-12//farad per metre
+h=6.625e-34//joule sec
+v=sqrt(e^4/(4*o^2*h^2))
+printf('velocity is %e metre per second \n',v)
diff --git a/3622/CH4/EX4.2/Ex4_2.sce b/3622/CH4/EX4.2/Ex4_2.sce new file mode 100644 index 000000000..47885b302 --- /dev/null +++ b/3622/CH4/EX4.2/Ex4_2.sce @@ -0,0 +1,12 @@ +
+//Initialisation of variables
+clc
+Z=1
+n=1
+m=9.11e-31//kg
+e=1.6e-19//coulomb
+o=8.85e-12//farad per metre
+h=6.625e-34//joule sec
+E=Z^2*m*e^4/(8*o^2*h^2*n^2)//relation 4.12
+printf('energy is %e joules \n',E)
+
diff --git a/3622/CH4/EX4.3/Ex4_3.sce b/3622/CH4/EX4.3/Ex4_3.sce new file mode 100644 index 000000000..7fe677f89 --- /dev/null +++ b/3622/CH4/EX4.3/Ex4_3.sce @@ -0,0 +1,9 @@ +//Initialisation of variables
+clc
+Z=1
+m=9.11e-31//kg
+e=1.6e-19//coulomb
+o=8.85e-12//farad per metre
+h=6.625e-34//joule sec
+V=Z^2*m*e^3/(8*o^2*h^2)
+printf('ionization potential is %f volts \n',V)
diff --git a/3622/CH4/EX4.4/Ex4_4.sce b/3622/CH4/EX4.4/Ex4_4.sce new file mode 100644 index 000000000..a6d8ce752 --- /dev/null +++ b/3622/CH4/EX4.4/Ex4_4.sce @@ -0,0 +1,9 @@ +//Initialisation of variables
+clc
+Z=2
+m=9.11e-31//kg
+e=1.6e-19//coulomb
+o=8.85e-12//farad per metre
+h=6.625e-34//joule sec
+V=Z^2*m*e^3/(8*o^2*h^2)
+printf('second ionization potential is %f volts \n',V)
diff --git a/3622/CH6/EX6.1/Ex6_1.sce b/3622/CH6/EX6.1/Ex6_1.sce new file mode 100644 index 000000000..5826aea0b --- /dev/null +++ b/3622/CH6/EX6.1/Ex6_1.sce @@ -0,0 +1,10 @@ +//Initialisation of variables
+clc
+mo=9.028e-28//grams
+c=3e10
+E=mo*c^2
+ev=1.6e-12//electron volt
+EineV=E/ev
+EinMeV=EineV/10^6
+printf('energy in million electron volt is %f MeV \n',EinMeV)
+
diff --git a/3622/CH6/EX6.2/Ex6_2.sce b/3622/CH6/EX6.2/Ex6_2.sce new file mode 100644 index 000000000..38913abaa --- /dev/null +++ b/3622/CH6/EX6.2/Ex6_2.sce @@ -0,0 +1,9 @@ +//Initialisation of variables
+clc
+amu=1.6558e-24
+c=3e10
+ev=1.6e-12//electron volt
+E=amu*c^2/ev
+EinMeV=E/10^6
+printf('energy in million electron volt is %d MeV \n',EinMeV)
+
diff --git a/3622/CH6/EX6.3/Ex6_3.sce b/3622/CH6/EX6.3/Ex6_3.sce new file mode 100644 index 000000000..a93459b4c --- /dev/null +++ b/3622/CH6/EX6.3/Ex6_3.sce @@ -0,0 +1,8 @@ +//Initialisation of variables
+clc
+c=3e10
+//eauating m=2*mo and cancelling we get
+v=sqrt(.75*c^2)// cm per s
+printf('required velocity is %e cm per sec \n',v)
+
+
diff --git a/3622/CH6/EX6.4/Ex6_4.sce b/3622/CH6/EX6.4/Ex6_4.sce new file mode 100644 index 000000000..58564d4ba --- /dev/null +++ b/3622/CH6/EX6.4/Ex6_4.sce @@ -0,0 +1,11 @@ +//Initialisation of variables
+clc
+m=9.11e-28
+e=4.803e-10
+h=6.62e-27
+V=100/300//e.s.u
+//.5*m*v^2=V*e
+v=sqrt(2*V*e/m)
+l=h/(m*v)
+printf('wavelength associated is %e cms \n',l)
+
diff --git a/3622/CH8/EX8.1/Ex8_1.sce b/3622/CH8/EX8.1/Ex8_1.sce new file mode 100644 index 000000000..d5b90caf3 --- /dev/null +++ b/3622/CH8/EX8.1/Ex8_1.sce @@ -0,0 +1,10 @@ +//Initialisation of variables
+clc
+r=1.278e-8
+n=4//number of molecules per unit cell
+M=63.54//for copper
+a=4*r/sqrt(2)
+N=6.023e23
+d=n*M/(a^3*N)
+printf('density is %f gm per cms \n',d)
+
diff --git a/3622/CH8/EX8.2/Ex8_2.sce b/3622/CH8/EX8.2/Ex8_2.sce new file mode 100644 index 000000000..bfab6a69f --- /dev/null +++ b/3622/CH8/EX8.2/Ex8_2.sce @@ -0,0 +1,4 @@ +//Initialisation of variables
+clc
+ratio=1/cosd(30)-1
+printf('minimum ratio is %f \n',ratio)
diff --git a/3622/CH8/EX8.3/Ex8_3.sce b/3622/CH8/EX8.3/Ex8_3.sce new file mode 100644 index 000000000..a6d126409 --- /dev/null +++ b/3622/CH8/EX8.3/Ex8_3.sce @@ -0,0 +1,12 @@ +//Initialisation of variables
+clc
+n=4//number of atoms in a cell for copper
+//APF=n*4*%pi*r^3/(a^3)
+APFCu=4*4*%pi*2*sqrt(2)/(4*16*4)
+printf('APF for copper is %f \n',APFCu)//correction
+
+r=0.98//armstrom
+R=1.81//armstrom
+APFNaCl=((4*4*%pi*r^3/3)+(4*4*%pi*R^3/3))/((4/3)*(2*r+2*R)^3)
+printf('APF for NaCl is %f \n',APFNaCl)//correction
+
diff --git a/3622/CH8/EX8.4/Ex8_4.sce b/3622/CH8/EX8.4/Ex8_4.sce new file mode 100644 index 000000000..96246de01 --- /dev/null +++ b/3622/CH8/EX8.4/Ex8_4.sce @@ -0,0 +1,9 @@ +//Initialisation of variables
+clc
+n=2//number of atoms in plane
+r=3.5e-8/2//armstrom
+//interatomic distance=2*r
+a=4*r/sqrt(2)
+Area=a^2
+AtomsperArea=n/Area
+printf('atoms per cm cube is %e\n',AtomsperArea)//correction
diff --git a/3622/CH9/EX9.1/Ex9_1.sce b/3622/CH9/EX9.1/Ex9_1.sce new file mode 100644 index 000000000..5194ae2fd --- /dev/null +++ b/3622/CH9/EX9.1/Ex9_1.sce @@ -0,0 +1,7 @@ +//Initialisation of variables
+clc
+V=20e3//volts
+m=9e-31//mass of electron
+e=1.6e-19//charge of electron
+v=sqrt(2*V*e/m)
+printf('maximum speed of electron is %e metre per second \n',v)
diff --git a/3622/CH9/EX9.2/Ex9_2.sce b/3622/CH9/EX9.2/Ex9_2.sce new file mode 100644 index 000000000..72d87f868 --- /dev/null +++ b/3622/CH9/EX9.2/Ex9_2.sce @@ -0,0 +1,7 @@ +//Initialisation of variables
+clc
+m=9e-31//mass of electron
+e=1.6e-19//charge of electron
+V=5000//volts
+v=sqrt(2*V*e/m)
+printf('maximum speed of electron is %e metre per second \n',v)
diff --git a/3622/CH9/EX9.3/Ex9_3.sce b/3622/CH9/EX9.3/Ex9_3.sce new file mode 100644 index 000000000..648a81031 --- /dev/null +++ b/3622/CH9/EX9.3/Ex9_3.sce @@ -0,0 +1,12 @@ +//Initialisation of variables
+clc
+energy=0.1/100//energy converted
+amp_watt=5/1000
+m=9e-31//mass of electron
+e=1.6e-19//charge of electron
+V=100000//volts
+v=sqrt(2*V*e/m)
+EnConv=V*energy*amp_watt
+EnConvinJ=4.18*EnConv
+printf('maximum speed of electron is %e metre per second \n',v)
+printf('Rate of production of heat is %f calories per second \n',EnConvinJ)
diff --git a/3622/CH9/EX9.4/Ex9_4.sce b/3622/CH9/EX9.4/Ex9_4.sce new file mode 100644 index 000000000..5d985378d --- /dev/null +++ b/3622/CH9/EX9.4/Ex9_4.sce @@ -0,0 +1,8 @@ +//Initialisation of variables
+clc
+h=1
+k=1
+l=1
+dhkl=1.75e-8//
+a=dhkl*sqrt(h^2+k^2+l^2)
+printf('inter atomic spacing is %e cms \n',a)
|