1 files changed, 17 insertions, 0 deletions
diff --git a/3768/CH10/EX10.6/Ex10_6.sce b/3768/CH10/EX10.6/Ex10_6.sce
new file mode 100644
index 000000000..b382321b6
--- /dev/null
+++ b/3768/CH10/EX10.6/Ex10_6.sce
@@ -0,0 +1,17 @@
+//Example number 10.6, Page number 226
+
+clc;clear;
+close;
+
+//Variable declaration
+T=5;     //temperature(K)
+Tc=8;   //critical temperature(K)
+H0=5*10**4;   //critical magnetic field(A/m)
+r=1.5*10**-3;    //radius(m)
+//Calculation
+Hc=H0*(1-(T/Tc)**2);    //critical field(A/m)
+Ic=2*%pi*r*Hc;     //critical current(amp)
+//Result
+printf("critical field is %.4e A/m",Hc)
+printf("\n critical current is %.3f A",Ic)
+//answer in the book varies due to rounding off errors