summaryrefslogtreecommitdiff
path: root/1646/CH1
diff options
context:
space:
mode:
Diffstat (limited to '1646/CH1')
-rwxr-xr-x1646/CH1/EX1.10/Ch01Ex10.sce15
-rwxr-xr-x1646/CH1/EX1.11/Ch01Ex11.sce12
-rwxr-xr-x1646/CH1/EX1.12/Ch01Ex12.sce15
-rwxr-xr-x1646/CH1/EX1.13/Ch01Ex13.sce11
-rwxr-xr-x1646/CH1/EX1.14/Ch01Ex14.sce20
-rwxr-xr-x1646/CH1/EX1.15/Ch01Ex15.sce11
-rwxr-xr-x1646/CH1/EX1.17/Ch01Ex17.sce14
-rwxr-xr-x1646/CH1/EX1.2/Ch01Ex2.sce14
-rwxr-xr-x1646/CH1/EX1.4/Ch01Ex4.sce15
-rwxr-xr-x1646/CH1/EX1.6/Ch01Ex6.sce13
-rwxr-xr-x1646/CH1/EX1.7/Ch01Ex7.sce12
-rwxr-xr-x1646/CH1/EX1.8/Ch01Ex8.sce10
-rwxr-xr-x1646/CH1/EX1.9/Ch01Ex9.sce11
13 files changed, 173 insertions, 0 deletions
diff --git a/1646/CH1/EX1.10/Ch01Ex10.sce b/1646/CH1/EX1.10/Ch01Ex10.sce
new file mode 100755
index 000000000..818b4ace0
--- /dev/null
+++ b/1646/CH1/EX1.10/Ch01Ex10.sce
@@ -0,0 +1,15 @@
+// Scilab Code Ex1.10: Page:30 (2011)
+clc;clear;
+c = 3e+008; // Speed of light in vacuum, m/s
+tau0 = 2.5e-008; // Mean lifetime of meson at rest, m/s
+v = 0.8*c; // Velocity of moving meason, m/s
+tau = tau0/sqrt(1-v^2/c^2); // Mean lifetime of meson in motion, m/s
+N0 = 1; // Assume initial flux of meson beam to be unity, watt/Sq.m
+N = N0*%e^(-2); // Meson flux after time t, watt/Sq.m
+// As N = N0*e^(-t/tau), which on comparing gives
+t = 2*tau; // Time during which the meson beam flux reduces, s
+d = 0.8*c*t; // The distance that the meson beam can travel before reduction in its flux, m
+printf("\nThe distance that the meson beam can travel before reduction in its flux = %2d m", d);
+
+// Result
+// The distance that the meson beam can travel before reduction in its flux = 20 m \ No newline at end of file
diff --git a/1646/CH1/EX1.11/Ch01Ex11.sce b/1646/CH1/EX1.11/Ch01Ex11.sce
new file mode 100755
index 000000000..e3379979e
--- /dev/null
+++ b/1646/CH1/EX1.11/Ch01Ex11.sce
@@ -0,0 +1,12 @@
+// Scilab Code Ex1.11: Page:31 (2011)
+clc;clear;
+c = 3e+008; // Speed of light in vacuum, m/s
+E0 = 1; // Rest energy of particle, unit
+E = 3*E0; // Energy of relativistically moving particle, unit
+// E = m*c^2 and E0 = m0*c^2
+// With m = m0/sqrt(1-v^2/c^2), we have
+v = c*sqrt(1-(E0/E)^2); // Velocity of the moving particle, m/s
+printf("\nThe velocity of the moving particle = %4.2e m/s", v);
+
+// Result
+// The velocity of the moving particle = 2.83e+008 m/s \ No newline at end of file
diff --git a/1646/CH1/EX1.12/Ch01Ex12.sce b/1646/CH1/EX1.12/Ch01Ex12.sce
new file mode 100755
index 000000000..c3c86a035
--- /dev/null
+++ b/1646/CH1/EX1.12/Ch01Ex12.sce
@@ -0,0 +1,15 @@
+// Scilab Code Ex1.12: Page:32 (2011)
+clc;clear;
+c = 3e+008; // Speed of light in vacuum, m/s
+m0 = 9.1e-031; // Rest mass of electron, kg
+m = 11*m0; // Mass of relativistically moving electron, kg
+E_k = (m-m0)*c^2/(1.6e-019*1e+06); // Kinetic energy of moving electron, MeV
+// As m = m0/sqrt(1-v^2/c^2), solving for v
+v = c*sqrt(1-(m0/m)^2); // The velocity of the moving electron, m/s
+p = m*v; // Momentum of moving electron, kg-m/s
+printf("\nThe kinetic energy of moving electron = %4.2f MeV", E_k);
+printf("\nThe momentum of moving electron = %4.2e kg-m/s", p);
+
+// Result
+// The kinetic energy of moving electron = 5.12 MeV
+// The momentum of moving electron = 2.99e-021 kg-m/s \ No newline at end of file
diff --git a/1646/CH1/EX1.13/Ch01Ex13.sce b/1646/CH1/EX1.13/Ch01Ex13.sce
new file mode 100755
index 000000000..86d751178
--- /dev/null
+++ b/1646/CH1/EX1.13/Ch01Ex13.sce
@@ -0,0 +1,11 @@
+// Scilab Code Ex1.13: Page:32 (2011)
+clc;clear;
+c = 3e+008; // Speed of light in vacuum, m/s
+E0 = 0.5; // Rest energy of the electron, MeV
+v1 = 0.6*c; // Initial velocity of the electron, m/s
+v2 = 0.8*c; // Final velocity of the electron, m/s
+W = (1/sqrt(1-v2^2/c^2)-1/sqrt(1-v1^2/c^2))*E0; // The amount of work to be done to increase the speed of the electron, MeV
+printf("\nThe amount of work to be done to increase the speed of an electron = %4.2e J", W*1e+06*1.6e-019);
+
+// Result
+// The amount of work to be done to increase the speed of an electron = 3.33e-014 J \ No newline at end of file
diff --git a/1646/CH1/EX1.14/Ch01Ex14.sce b/1646/CH1/EX1.14/Ch01Ex14.sce
new file mode 100755
index 000000000..2a10c051d
--- /dev/null
+++ b/1646/CH1/EX1.14/Ch01Ex14.sce
@@ -0,0 +1,20 @@
+// Scilab Code Ex1.14: Page:33 (2011)
+clc;clear;
+c = 1; // Assume speed of light in vacuum to be unity, unit
+m0 = 1; // For simplicity assume rest mass of the particle to be unity, unit
+v = c/sqrt(2); // Given speed of the particle, m/s
+gama = 1/sqrt(1-v^2/c^2); // Relativistic factor
+m = gama*m0; // The relativistic mass of the particle, unit
+p = m*v; // The relativistic momentum of the particle, unit
+E = m*c^2; // The relativistic total eneryg of the particle, unit
+E_k = (m-m0)*c^2; // The relativistic kinetic energy of the particle, unit
+printf("\nThe relativistic mass of the particle = %5.3fm0", m);
+printf("\nThe relativistic momentum of the particle = %1.0gm0c", p);
+printf("\nThe relativistic total energy of the particle = %5.3fm0c^2", E);
+printf("\nThe relativistic kinetic energy of the particle = %5.3fm0c^2", E_k);
+
+// Result
+// The relativistic mass of the particle = 1.414m0
+// The relativistic momentum of the particle = 1m0c
+// The relativistic total energy of the particle = 1.414m0c^2
+// The relativistic kinetic energy of the particle = 0.414m0c^2 \ No newline at end of file
diff --git a/1646/CH1/EX1.15/Ch01Ex15.sce b/1646/CH1/EX1.15/Ch01Ex15.sce
new file mode 100755
index 000000000..09f169f95
--- /dev/null
+++ b/1646/CH1/EX1.15/Ch01Ex15.sce
@@ -0,0 +1,11 @@
+// Scilab Code Ex1.15: Page:34 (2011)
+clc;clear;
+c = 3e+008; // Speed of light in vacuum, unit
+m0 = 9.1e-031; // Rest mass of the electron, kg
+m = 1.67e-027; // Rest mass of the proton, kg
+// As m = m0/sqrt(1-v^2/c^2), solving for v
+v = c*sqrt(1-(m0/m)^2); // Velocity of the electron, m/s
+printf("\nThe velocity of the electron to have its mass equal to mass of the proton = %5.3e m/s", v);
+
+// Result
+// The velocity of the electron to have its mass equal to mass of the proton = 3.000e+008 m/s \ No newline at end of file
diff --git a/1646/CH1/EX1.17/Ch01Ex17.sce b/1646/CH1/EX1.17/Ch01Ex17.sce
new file mode 100755
index 000000000..eb8357765
--- /dev/null
+++ b/1646/CH1/EX1.17/Ch01Ex17.sce
@@ -0,0 +1,14 @@
+// Scilab Code Ex1.17: Page:35 (2011)
+clc;clear;
+c = 3e+008; // Speed of light in vacuum, unit
+m0 = 9.1e-031; // Rest mass of the electron, kg
+E_k = 0.1*1e+006*1.6e-019; // Kinetic energy of the electron, J
+v = sqrt(2*E_k/m0); // Classical speed of the electron, m/s
+printf("\nThe classical speed of the electron = %5.3e m/s", v);
+// As E_k = (m-m0)*c^2 = (1/sqrt(1-v^2/c^2)-1)*m0*c^2, solving for v
+v = c*sqrt(1-(m0*c^2/(E_k+m0*c^2))^2); // Relativistic speed of the electron, m/s
+printf("\nThe relativistic speed of the electron = %5.3e m/s", v);
+
+// Result
+// The classical speed of the electron = 1.875e+008 m/s
+// The relativistic speed of the electron = 1.644e+008 m/s \ No newline at end of file
diff --git a/1646/CH1/EX1.2/Ch01Ex2.sce b/1646/CH1/EX1.2/Ch01Ex2.sce
new file mode 100755
index 000000000..1cba4831b
--- /dev/null
+++ b/1646/CH1/EX1.2/Ch01Ex2.sce
@@ -0,0 +1,14 @@
+// Scilab Code Ex1.2: Page:26 (2011)
+clc;clear;
+c = 3e+008; // Speed of light in vacuum, m/s
+delta_x = 2.45e+03; // Space difference, m
+delta_t = 5.35e-06; // Time difference, s
+v = 0.855*c; // Speed of frame S_prime, m/s
+delta_x_prime = 1/sqrt(1-v^2/c^2)*(delta_x - v*(delta_t))*1e-03; // Distance between two flashes as measured in S_prime frame, km
+delta_t_prime = 1/sqrt(1-v^2/c^2)*(delta_t - v/c^2*delta_x)*1e+006; // Time between two flashes as measured in S_prime
+printf("\nThe distance between two flashes as measured in S_prime frame = %4.2f km", delta_x_prime);
+printf("\nThe time between two flashes as measured in S_prime frame = %4.2f micro-second", delta_t_prime);
+
+// Result
+// The distance between two flashes as measured in S_prime frame = 2.08 km
+// The time between two flashes as measured in S_prime frame = -3.15 micro-second \ No newline at end of file
diff --git a/1646/CH1/EX1.4/Ch01Ex4.sce b/1646/CH1/EX1.4/Ch01Ex4.sce
new file mode 100755
index 000000000..f253475d7
--- /dev/null
+++ b/1646/CH1/EX1.4/Ch01Ex4.sce
@@ -0,0 +1,15 @@
+// Scilab Code Ex1.4: Page:27 (2011)
+clc;clear;
+c = 1;....// Speed of light in vacuum, m/s
+u_x_prime = c; // Velocity of photon as measured in S_prime frame, m/s
+v = c; // Velocity of frame S_prime relative to S frame, m/s
+u_x = (u_x_prime + v)/(1+v*u_x_prime/c^2);
+if u_x == 1 then
+ ux = 'c';
+else
+ ux = string(u_x)+'c';
+end
+printf("\nThe speed of one photon as observed by the other is %c", ux);
+
+// Result
+// The speed of one photon as observed by the other is c
diff --git a/1646/CH1/EX1.6/Ch01Ex6.sce b/1646/CH1/EX1.6/Ch01Ex6.sce
new file mode 100755
index 000000000..9c27a64c0
--- /dev/null
+++ b/1646/CH1/EX1.6/Ch01Ex6.sce
@@ -0,0 +1,13 @@
+// Scilab Code Ex1.6 : Page:28 (2011)
+clc;clear;
+a = 1; // For simplicity assume length of semi minor axis to be unity, m
+c = 3e+08; // Speed of light, m/s
+v = poly(0, 'v'); // Declare velocity variable, m/s
+// As b = a*sqrt(1-v^2/c^2), length of semi-major axis
+// Also A_c = %pi*a^2, area of the lamina in its own frame and
+// A_e = %pi*a*b, area of the lamina in stationary frame S, so with A_c = A_e
+v = roots(1-v^2/c^2 - 1/4); // Velocity at which surface area of lamina reduces to half in S-frame, m/s
+printf("\nThe velocity at which surface area of lamina reduces to half in S-frame = %4.2e", v(1));
+
+// Result
+// The velocity at which surface area of lamina reduces to half in S-frame = 2.60e+008
diff --git a/1646/CH1/EX1.7/Ch01Ex7.sce b/1646/CH1/EX1.7/Ch01Ex7.sce
new file mode 100755
index 000000000..0e6992b20
--- /dev/null
+++ b/1646/CH1/EX1.7/Ch01Ex7.sce
@@ -0,0 +1,12 @@
+// Scilab Code Ex1.7 : Page:29 (2011)
+clc;clear;
+m0 = 1; // For simplicity assume the rest mass of stick to be unity, kg
+m = 1.5*m0; // Mass of the moving stick, kg
+L0 = 1; // Assume resting length of the stick to be unity, m
+// As m = m0/sqrt(1-v^2/c^2) = m0*gama, solving for gama
+gama = m/m0; // Relativistic factor
+L = L0/gama; // Contracted length of the metre stick, m
+printf("\nThe contracted length of the metre stick = %4.2f m", L);
+
+// Result
+// The contracted length of the metre stick = 0.67 m \ No newline at end of file
diff --git a/1646/CH1/EX1.8/Ch01Ex8.sce b/1646/CH1/EX1.8/Ch01Ex8.sce
new file mode 100755
index 000000000..4bfc8a525
--- /dev/null
+++ b/1646/CH1/EX1.8/Ch01Ex8.sce
@@ -0,0 +1,10 @@
+// Scilab Code Ex1.8: Page:29 (2011)
+clc;clear;
+c = 3e+008; // Speed of light in vacuum, m/s
+tau0 = 2e-008; // Mean lifetime of meson at rest, m/s
+v = 0.8*c; // Velocity of moving meason, m/s
+tau = tau0/sqrt(1-v^2/c^2); // Mean lifetime of meson in motion, m/s
+printf("\nThe mean lifetime of meson in motion = %4.2e s", tau);
+
+// Result
+// The mean lifetime of meson in motion = 3.33e-008 s \ No newline at end of file
diff --git a/1646/CH1/EX1.9/Ch01Ex9.sce b/1646/CH1/EX1.9/Ch01Ex9.sce
new file mode 100755
index 000000000..9f1533d1e
--- /dev/null
+++ b/1646/CH1/EX1.9/Ch01Ex9.sce
@@ -0,0 +1,11 @@
+// Scilab Code Ex1.9: Page:30 (2011)
+clc;clear;
+c = 3e+008; // Speed of light in vacuum, m/s
+delta_t0 = 59; // Reading of the moving clock for each hour, min
+delta_t = 60; // Reading of the stationary clock for each hour, min
+// As from Time Dilation, delta_t = delta_t0/sqrt(1-v^2/c^2), solving for v
+v = c*sqrt(1-(delta_t0/delta_t)^2);
+printf("\nThe speed at which the moving clock ticks slow = %4.2e m/s", v);
+
+// Result
+// The speed at which the moving clock ticks slow = 5.45e+007 m/s \ No newline at end of file