initial commit / add all books

5 files changed, 48 insertions, 0 deletions

diff --git a/1535/CH7/EX7.2/Ch07Ex2.sci b/1535/CH7/EX7.2/Ch07Ex2.sci
new file mode 100755
index 000000000..46cf2e488
--- /dev/null
+++ b/1535/CH7/EX7.2/Ch07Ex2.sci
@@ -0,0 +1,9 @@
+// Scilab Code Ex7.2 : Frequency of Josephson current : Page-152 (2010)

+V = 1e-06;    // DC voltage applied across the Josephson junction, volt

+e = 1.6e-019;    // Charge on an electron, C

+h = 6.626e-034;    // Planck's constant, Js

+f = 2*e*V/h;    // Frequency of Josephson current, Hz

+printf("\nThe frequency of Josephson current = %5.1f MHz", f/1e+06);

+

+// Result 

+// The frequency of Josephson current = 482.9 MHz 
\ No newline at end of file
diff --git a/1535/CH7/EX7.3/Ch07Ex3.sci b/1535/CH7/EX7.3/Ch07Ex3.sci
new file mode 100755
index 000000000..616e5149f
--- /dev/null
+++ b/1535/CH7/EX7.3/Ch07Ex3.sci
@@ -0,0 +1,9 @@
+// Scilab Code Ex7.3 : Superconducting energy gap at 0K : Page-152 (2010)

+T_c = 0.517;    // Critical temperature for cadmium, K

+k = 1.38e-023;    // Boltzmann constant, J/K

+e = 1.6e-019;    // Energy equivalent of 1 eV, J/eV

+E_g = 3.5*k*T_c/e;    // Superconducting energy gap at absolute zero, eV

+printf("\nThe superconducting energy gap for Cd at absolute zero = %4.2e eV",E_g);

+

+// Result 

+// The superconducting energy gap for Cd at absolute zero = 1.56e-004 eV
\ No newline at end of file
diff --git a/1535/CH7/EX7.4/Ch07Ex4.sci b/1535/CH7/EX7.4/Ch07Ex4.sci
new file mode 100755
index 000000000..6bbab5739
--- /dev/null
+++ b/1535/CH7/EX7.4/Ch07Ex4.sci
@@ -0,0 +1,11 @@
+// Scilab Code Ex7.4 : Wavelength of photon to break up a Cooper-pair: Page-152 (2010)

+e = 1.6e-019;    // Energy equivalent of 1 eV, J/eV

+c = 3e+08;    // Speed of light in free space, m/s

+h = 6.626e-034;    // Planck's constant, Js

+E_g = 1.5e-004;   // Superconducting energy gap for a material, eV

+// As E_g = h*f = h*c/lambda, solving for lambda

+lambda = h*c/(E_g*e);    // Wavelength of photon to break up a Cooper-pair, m

+printf("\nThe wavelength of photon to break up a Cooper-pair = %4.2e m", lambda);

+

+// Result 

+// The wavelength of photon to break up a Cooper-pair = 8.28e-003 m 
\ No newline at end of file
diff --git a/1535/CH7/EX7.5/Ch07Ex5.sci b/1535/CH7/EX7.5/Ch07Ex5.sci
new file mode 100755
index 000000000..14300f0c7
--- /dev/null
+++ b/1535/CH7/EX7.5/Ch07Ex5.sci
@@ -0,0 +1,9 @@
+// Scilab Code Ex7.5: Variation of London penetration depth with temperature: Page-153 (2010)

+lambda_0 = 37e-009;    // Penetration depth of lead at 0 kelvin, m

+T_c = 7.193;    // Critical temperature of superconducting transition for lead, kelvin

+T = 5.2;    // Temperature at which penetration depth for lead becomes lambda_T, kelvin   

+lambda_T = lambda_0*(1-(T/T_c)^4)^(-1/2);    // Penetration depth of lead at 5.2 kelvin, m

+printf("\nThe penetration depth of lead at %3.1f K = %4.1f nm",T, lambda_T/1e-009);

+

+// Result

+// The penetration depth of lead at 5.2 K = 43.4 nm 
\ No newline at end of file
diff --git a/1535/CH7/EX7.6/Ch07Ex6.sci b/1535/CH7/EX7.6/Ch07Ex6.sci
new file mode 100755
index 000000000..5988c8083
--- /dev/null
+++ b/1535/CH7/EX7.6/Ch07Ex6.sci
@@ -0,0 +1,10 @@
+// Scilab Code Ex7.6: Isotope Effect in mercury: Page-153 (2010)

+M1 = 199;    // Mass of an isotope of mercury, amu

+T_C1 = 4.185;    // Transition temperature of the isoptope of Hg, K

+T_C2 = 4.153;    // Transition temperature of another isoptope of Hg, K

+alpha = 0.5;    // Isotope coefficient

+M2 = M1*(T_C1/T_C2)^(1/alpha);    // Mass of another isotope of mercury, amu

+printf("\nThe mass of another isotope of mercury at %5.3f K = %6.2f amu",T_C2, M2);

+

+// Result

+// The mass of another isotope of mercury at 4.153 K = 202.08 amu 
\ No newline at end of file