summaryrefslogtreecommitdiff
path: root/3753/CH3/EX3.6/Ex3_6.sce
diff options
context:
space:
mode:
Diffstat (limited to '3753/CH3/EX3.6/Ex3_6.sce')
-rw-r--r--3753/CH3/EX3.6/Ex3_6.sce15
1 files changed, 15 insertions, 0 deletions
diff --git a/3753/CH3/EX3.6/Ex3_6.sce b/3753/CH3/EX3.6/Ex3_6.sce
new file mode 100644
index 000000000..3b8d82ce9
--- /dev/null
+++ b/3753/CH3/EX3.6/Ex3_6.sce
@@ -0,0 +1,15 @@
+//Example number 3.6, Page number 3.34
+
+
+clc;clear;close
+
+// Variable declaration
+H0=64*10**3; // initial field(ampere/m)
+T=5; // temperature(K)
+Tc=7.26; // transition temperature(K)
+
+// Calculation
+H=H0*(1-(T/Tc)**2); // critical field(ampere/m)
+
+// Result
+printf("critical field is : %0.3e ampere/m",H)