summaryrefslogtreecommitdiff
path: root/1736/CH9/EX9.15/Ch09Ex15.sce
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /1736/CH9/EX9.15/Ch09Ex15.sce
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '1736/CH9/EX9.15/Ch09Ex15.sce')
-rwxr-xr-x1736/CH9/EX9.15/Ch09Ex15.sce10
1 files changed, 10 insertions, 0 deletions
diff --git a/1736/CH9/EX9.15/Ch09Ex15.sce b/1736/CH9/EX9.15/Ch09Ex15.sce
new file mode 100755
index 000000000..d07f9c63e
--- /dev/null
+++ b/1736/CH9/EX9.15/Ch09Ex15.sce
@@ -0,0 +1,10 @@
+// Scilab code Ex9.15 Page:314 (2006)
+clc; clear;
+Theta_D = 490; // Debye temperature, Kelvin
+Lambda = 0.8; // wavelength of a superconductor, angstorm
+mu_prime = 0.13; // Reduced mass of a superconductor, amu
+T_c = Theta_D/1.45*exp(-1.04*(1+Lambda)/(Lambda-mu_prime*(1+0.62*Lambda)));
+printf("\nThe superconducting transition temperature of a borocarbide superconductor = %4.1f K", T_c);
+
+// Result
+// The superconducting transition temperature of a borocarbide superconductor = 15.4 K