initial commit / add all books

10 files changed, 90 insertions, 0 deletions

diff --git a/24/CH34/EX34.1/Example34_1.sce b/24/CH34/EX34.1/Example34_1.sce
new file mode 100755
index 000000000..05c290024
--- /dev/null
+++ b/24/CH34/EX34.1/Example34_1.sce
@@ -0,0 +1,12 @@
+//Given that

+d = 1.8  //in meter

+P = 250  //in W

+c = 3*10^8  //in m/s

+mu = 4*%pi*10^-7  //in SI unit

+

+//Sample Problem 34-1

+printf("**Sample Problem 34-1**\n")

+Erms = sqrt(P*c*mu/(4*%pi*d^2))

+Brms = Erms/c

+printf("The rms value of electric field is equal to %1.2eV/m\n", Erms)

+Brms = printf("The rms value of magnetic field is equal to %1.2eT", Brms)
\ No newline at end of file
diff --git a/24/CH34/EX34.1/Example34_1_result.txt b/24/CH34/EX34.1/Example34_1_result.txt
new file mode 100755
index 000000000..b855236dd
--- /dev/null
+++ b/24/CH34/EX34.1/Example34_1_result.txt
@@ -0,0 +1,3 @@
+**Sample Problem 34-1**

+The rms value of electric field is equal to 4.81e+001V/m

+The rms value of magnetic field is equal to 1.60e-007T 
\ No newline at end of file
diff --git a/24/CH34/EX34.2/Example34_2.sce b/24/CH34/EX34.2/Example34_2.sce
new file mode 100755
index 000000000..1be862743
--- /dev/null
+++ b/24/CH34/EX34.2/Example34_2.sce
@@ -0,0 +1,20 @@
+exec('Gravitation.sci', -1)

+

+//Given that

+density = 3.5*10^3  //in kg/m^3

+c = 3*10^8  //in m/s

+d = 1  //(say)

+Ps = 3.9*10^26  //in W

+

+//Sample Problem 34-2

+printf("**Sample Problem 34-2**\n")

+R = poly(0, 'R')

+A = %pi*R^2

+Ad = 4*%pi*d^2

+I = Ps/Ad

+Fr = I*A/c

+V = 4/3*%pi*R^3

+m = density*V

+Fg = GForce(m, Ms, d)

+R = roots(Fr-Fg)

+printf("The radius of the dust particle is %1.3em", R(1))
\ No newline at end of file
diff --git a/24/CH34/EX34.2/Example34_2_result.txt b/24/CH34/EX34.2/Example34_2_result.txt
new file mode 100755
index 000000000..19ee27c18
--- /dev/null
+++ b/24/CH34/EX34.2/Example34_2_result.txt
@@ -0,0 +1,2 @@
+**Sample Problem 34-2**

+The radius of the dust particle is 1.670e-007m 
\ No newline at end of file
diff --git a/24/CH34/EX34.3/Example34_3.sce b/24/CH34/EX34.3/Example34_3.sce
new file mode 100755
index 000000000..5a6b47826
--- /dev/null
+++ b/24/CH34/EX34.3/Example34_3.sce
@@ -0,0 +1,14 @@
+exec('degree_rad.sci', -1)

+

+//Given that

+theta1 = dtor(60)

+theta2 = dtor(90-60)

+I = 1  //(say)

+

+//Sample Problem 34-3

+printf("**Sample Problem 34-3**\n")

+//half of the original intensity, from the one-half rule

+I1 = I/2  

+I2 = I1*cos(theta1)^2

+I3 = I2*cos(theta2)^2

+printf("The ratio of the initial inensity to the final intensity of the light is %.4f", I3)
\ No newline at end of file
diff --git a/24/CH34/EX34.3/Example34_3_result.txt b/24/CH34/EX34.3/Example34_3_result.txt
new file mode 100755
index 000000000..a1fd4f26a
--- /dev/null
+++ b/24/CH34/EX34.3/Example34_3_result.txt
@@ -0,0 +1,2 @@
+**Sample Problem 34-3**

+The ratio of the initial inensity to the final intensity of the light is 0.0938 
\ No newline at end of file
diff --git a/24/CH34/EX34.4/Example34_4.sce b/24/CH34/EX34.4/Example34_4.sce
new file mode 100755
index 000000000..9ec433e1d
--- /dev/null
+++ b/24/CH34/EX34.4/Example34_4.sce
@@ -0,0 +1,19 @@
+exec('degree_rad.sci', -1)

+

+//Given that

+n1 = 1.33

+n2 = 1.77

+n3 = 1.00

+theta1 = 50  //in degrees

+

+//Sample Problem 34-4a

+printf("**Sample Problem 34-4a**\n")

+AORl = 90 - theta1

+AORr = rtod(asin(n1/n2*sin(dtor(AORl))))

+printf("The angle of reflection is %1.2fdegrees\n", AORl)

+printf("The angle of refraction is %1.2fdegrees\n", AORr)

+

+//Sample Problem 34-4b

+printf("\n**Sample Problem 34-4b**\n")

+Af = rtod(asin(n2/n3*sin(dtor(AORr))))

+printf("The final angle of refraction is %1.2fdegrees", Af)
\ No newline at end of file
diff --git a/24/CH34/EX34.4/Example34_4_result.txt b/24/CH34/EX34.4/Example34_4_result.txt
new file mode 100755
index 000000000..c76c07998
--- /dev/null
+++ b/24/CH34/EX34.4/Example34_4_result.txt
@@ -0,0 +1,6 @@
+**Sample Problem 34-4a**

+The angle of reflection is 40.00degrees

+The angle of refraction is 28.88degrees

+

+**Sample Problem 34-4b**

+The final angle of refraction is 58.75degrees 
\ No newline at end of file
diff --git a/24/CH34/EX34.5/Example34_5.sce b/24/CH34/EX34.5/Example34_5.sce
new file mode 100755
index 000000000..bcdb94d0c
--- /dev/null
+++ b/24/CH34/EX34.5/Example34_5.sce
@@ -0,0 +1,10 @@
+exec('degree_rad.sci', -1)

+

+//Given that

+e = 45  //in degrees

+

+//Sample Problem 34-5

+printf("**Sample Problem 34-5**\n")

+//For extrem case

+n = 1/sin(dtor(e))

+printf("The index of refraction should be at least %1.1f", n)
\ No newline at end of file
diff --git a/24/CH34/EX34.5/Example34_5_result.txt b/24/CH34/EX34.5/Example34_5_result.txt
new file mode 100755
index 000000000..b3fc70769
--- /dev/null
+++ b/24/CH34/EX34.5/Example34_5_result.txt
@@ -0,0 +1,2 @@
+**Sample Problem 34-5**

+The index of refraction should be at least 1.4 
\ No newline at end of file