diff options
Diffstat (limited to '3665/CH11/EX11.12')
-rw-r--r-- | 3665/CH11/EX11.12/Ex11_12.sce | 17 |
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")
|