diff options
author | priyanka | 2015-06-24 15:03:17 +0530 |
---|---|---|
committer | priyanka | 2015-06-24 15:03:17 +0530 |
commit | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch) | |
tree | ab291cffc65280e58ac82470ba63fbcca7805165 /2243/CH14 | |
download | Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2 Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip |
initial commit / add all books
Diffstat (limited to '2243/CH14')
-rwxr-xr-x | 2243/CH14/EX14.2/Ex14_2.sce | 15 | ||||
-rwxr-xr-x | 2243/CH14/EX14.2/Res14_2.txt | 2 | ||||
-rwxr-xr-x | 2243/CH14/EX14.3/Ex14_3.sce | 14 | ||||
-rwxr-xr-x | 2243/CH14/EX14.3/Res14_3.txt | 1 | ||||
-rwxr-xr-x | 2243/CH14/EX14.5/Ex14_5.sce | 16 | ||||
-rwxr-xr-x | 2243/CH14/EX14.5/Res14_5.txt | 4 | ||||
-rwxr-xr-x | 2243/CH14/EX14.6/Ex14_6.sce | 12 | ||||
-rwxr-xr-x | 2243/CH14/EX14.6/Res14_6.txt | 2 | ||||
-rwxr-xr-x | 2243/CH14/EX14.7/Ex14_7.sce | 19 | ||||
-rwxr-xr-x | 2243/CH14/EX14.7/Res14_7.txt | 2 |
10 files changed, 87 insertions, 0 deletions
diff --git a/2243/CH14/EX14.2/Ex14_2.sce b/2243/CH14/EX14.2/Ex14_2.sce new file mode 100755 index 000000000..99f5fe3e8 --- /dev/null +++ b/2243/CH14/EX14.2/Ex14_2.sce @@ -0,0 +1,15 @@ +clc();
+clear;
+//Given :
+lambda = 6000; //wavelength in A
+E2_E1 = 12422/lambda; // energy in eV
+k = 8.62*10^-5; // in eV/K
+T = 300; // Temperature in K
+//Equilibrium ratio = N2/N1 = exp[-(E2-E1)/k*T]
+//(a)
+Ratio = exp(-E2_E1/(k*T));
+//(b)
+T1 = (E2_E1)/(k*log(2)); // Temperature in K
+printf("Ratio = %.2f x 10^-35 \n",Ratio*10^35);
+printf("T = %d K",T1);
+//Resuts obtained differ from those in texbook, because approximate value of k*T was considered
diff --git a/2243/CH14/EX14.2/Res14_2.txt b/2243/CH14/EX14.2/Res14_2.txt new file mode 100755 index 000000000..6241cef1b --- /dev/null +++ b/2243/CH14/EX14.2/Res14_2.txt @@ -0,0 +1,2 @@ +Ratio = 1.70 x 10^-35
+T = 34650 K
\ No newline at end of file diff --git a/2243/CH14/EX14.3/Ex14_3.sce b/2243/CH14/EX14.3/Ex14_3.sce new file mode 100755 index 000000000..7651373bc --- /dev/null +++ b/2243/CH14/EX14.3/Ex14_3.sce @@ -0,0 +1,14 @@ +clc();
+clear;
+//Given :
+L =8;// in cm
+lambda = 5330; //wavelength in A
+// lambda = 2*L/n
+// 1 A = 1.0*10^-8 cm
+n= (2*L)/(lambda*10^-8); // allowed modes
+//adjacent mode
+n1 = round(n+1);
+// 1 cm = 1.0*10^8 A
+lambda1 = ((2*L)/n1)*10^8;// wavelength in A
+D = lambda-lambda1; // difference in wavelengths in A
+printf("Difference = %.3f A",D);
diff --git a/2243/CH14/EX14.3/Res14_3.txt b/2243/CH14/EX14.3/Res14_3.txt new file mode 100755 index 000000000..8e83ff23a --- /dev/null +++ b/2243/CH14/EX14.3/Res14_3.txt @@ -0,0 +1 @@ +Difference = 0.025 A
\ No newline at end of file diff --git a/2243/CH14/EX14.5/Ex14_5.sce b/2243/CH14/EX14.5/Ex14_5.sce new file mode 100755 index 000000000..6d18ac65d --- /dev/null +++ b/2243/CH14/EX14.5/Ex14_5.sce @@ -0,0 +1,16 @@ +clc();
+clear;
+//Given :
+tau_c = 10^-5; // lifetime of lasing energy in s
+tau_c1 = 10^-8; // coherence time in s
+lambda = 5000; // wavelength in A
+c = 3*10^8;// light speed in m/s
+// Ratio = delta_lambda/lambda = lambda/(c*tau_c)
+// 1 A = 1.0*10^-10 m
+//(a)Laser source
+Ratio = (lambda*10^-10)/(c*tau_c);
+//(b)Ordinary source
+Ratio1 = (lambda*10^-10)/(c*tau_c1);
+printf("Laser source = %.2f x 10^-10 \n",Ratio*10^10);
+printf("Ordinary source = %.2f x 10^-7 \n",Ratio1*10^7);
+//Results obtained differ from those in textbook, beacuse only order of 10 was considered in the result.
diff --git a/2243/CH14/EX14.5/Res14_5.txt b/2243/CH14/EX14.5/Res14_5.txt new file mode 100755 index 000000000..5cb0ff3a6 --- /dev/null +++ b/2243/CH14/EX14.5/Res14_5.txt @@ -0,0 +1,4 @@ + Laser source = 1.67 x 10^-10
+Ordinary source = 1.67 x 10^-7
+
+
\ No newline at end of file diff --git a/2243/CH14/EX14.6/Ex14_6.sce b/2243/CH14/EX14.6/Ex14_6.sce new file mode 100755 index 000000000..ba37d4af0 --- /dev/null +++ b/2243/CH14/EX14.6/Ex14_6.sce @@ -0,0 +1,12 @@ +clc();
+clear;
+//Given :
+P = 10; // Power in W
+lambda =5000; // wavelength in A
+SI = 7*10^3; // Sun's radiation intensity in W/cm^2
+// 1 A = 1.0*10^-8 cm
+I = P/(lambda*10^-8)^2; //Intensity in W/cm^2
+Ratio = (I)/SI;
+printf("Intensity = %.0f x 10^6 kW/cm^2 \n",I*10^-9);
+printf("Intensity of this laser source is %.1f x 10^6 times the intensity of Sun radiation",Ratio*10^-6);
+//Textbook : Only order of 10 is considered in the result
diff --git a/2243/CH14/EX14.6/Res14_6.txt b/2243/CH14/EX14.6/Res14_6.txt new file mode 100755 index 000000000..1bcc6c569 --- /dev/null +++ b/2243/CH14/EX14.6/Res14_6.txt @@ -0,0 +1,2 @@ + Intensity = 4 x 10^6 kW/cm^2
+Intensity of this laser source is 0.6 x 10^6 times the intensity of Sun radiation
\ No newline at end of file diff --git a/2243/CH14/EX14.7/Ex14_7.sce b/2243/CH14/EX14.7/Ex14_7.sce new file mode 100755 index 000000000..83779eaf2 --- /dev/null +++ b/2243/CH14/EX14.7/Ex14_7.sce @@ -0,0 +1,19 @@ +clc();
+clear;
+//Given :
+c = 3*10^8;// light speed in m/s
+//Visible range = 4000 A - 7000 A
+lambda1 = 4000; // wavelength in A
+lambda2 = 7000;// wavelength in A
+// 1 A = 1.0*10^-10 m
+nu1 = c/(lambda1*10^-10); // frequency in Hz
+nu2 = c/(lambda2*10^-10);// frequency in Hz
+deltanu = nu1-nu2; // in Hz
+//(a)Telephone conversations
+f1 = 10^3; // frequency in Hz
+n1 = deltanu/f1;
+//(b)Television programmes
+f2 = 10^7; // frequency in Hz
+n2 = deltanu/f2;
+printf(" Number of Telephone conversations = %.1f x 10^11 \n",n1*10^-11);
+printf(" Number of Television programmes = %.1f x 10^7 \n",n2*10^-7);
diff --git a/2243/CH14/EX14.7/Res14_7.txt b/2243/CH14/EX14.7/Res14_7.txt new file mode 100755 index 000000000..f2d5e84b3 --- /dev/null +++ b/2243/CH14/EX14.7/Res14_7.txt @@ -0,0 +1,2 @@ + Number of Telephone conversations = 3.2 x 10^11
+ Number of Television programmes = 3.2 x 10^7
\ No newline at end of file |