summaryrefslogtreecommitdiff
path: root/3665/CH11/EX11.12
diff options
context:
space:
mode:
Diffstat (limited to '3665/CH11/EX11.12')
-rw-r--r--3665/CH11/EX11.12/Ex11_12.sce17
1 files changed, 17 insertions, 0 deletions
diff --git a/3665/CH11/EX11.12/Ex11_12.sce b/3665/CH11/EX11.12/Ex11_12.sce
new file mode 100644
index 000000000..168488472
--- /dev/null
+++ b/3665/CH11/EX11.12/Ex11_12.sce
@@ -0,0 +1,17 @@
+clear//
+//
+//
+
+//Variable declaration
+Tc=7.18; //temperature(K)
+H0=6.5*10**4; //critical field(T)
+T=4.2; //temperature(K)
+d=1*10**-3; //diameter(m)
+
+//Calculation
+Hc=H0*(1-(T/Tc)**2); //critical field(T)
+ic=%pi*d*Hc; //critical current(A)
+
+//Result
+printf("\n critical current is %0.2f A",ic)
+printf("\n answer given in the book is wrong")