summaryrefslogtreecommitdiff
path: root/3768/CH10/EX10.3/Ex10_3.sce
diff options
context:
space:
mode:
Diffstat (limited to '3768/CH10/EX10.3/Ex10_3.sce')
-rw-r--r--3768/CH10/EX10.3/Ex10_3.sce14
1 files changed, 14 insertions, 0 deletions
diff --git a/3768/CH10/EX10.3/Ex10_3.sce b/3768/CH10/EX10.3/Ex10_3.sce
new file mode 100644
index 000000000..ff8458ab5
--- /dev/null
+++ b/3768/CH10/EX10.3/Ex10_3.sce
@@ -0,0 +1,14 @@
+//Example number 10.3, Page number 225
+
+clc;clear;
+close;
+
+//Variable declaration
+Hc=5*10**3; //critical magnetic field(A/m)
+T=6; //temperature(K)
+H0=2*10**4; //critical magnetic field(A/m)
+//Calculation
+Tc=T/sqrt(1-(Hc/H0)); //critical temperature(K)
+//Result
+printf("critical temperature is %.3f K",Tc)
+//answer given in the book is wrong