summaryrefslogtreecommitdiff
path: root/1535/CH6/EX7.1
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /1535/CH6/EX7.1
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 '1535/CH6/EX7.1')
-rwxr-xr-x1535/CH6/EX7.1/Ch07Ex1.sci9
1 files changed, 9 insertions, 0 deletions
diff --git a/1535/CH6/EX7.1/Ch07Ex1.sci b/1535/CH6/EX7.1/Ch07Ex1.sci
new file mode 100755
index 000000000..037d2328b
--- /dev/null
+++ b/1535/CH6/EX7.1/Ch07Ex1.sci
@@ -0,0 +1,9 @@
+// Scilab Code Ex7.1 : Variation of critical magnetic field with temperature : Page-152 (2010)
+T_c = 3.722; // Critical temperature of superconducting transition, kelvin
+B_c0 = 0.0306; // Critical magnetic field to destroy superconductivity, tesla
+T = 2; // Temperature at which critical magnetic field is to be found out, kelvin
+B_cT = B_c0*(1-(T/T_c)^2);
+printf("\nThe critical magnetic field at %d K = %6.4f T", T, B_cT);
+
+// Result
+// The critical magnetic field at 2 K = 0.0218 T s \ No newline at end of file