diff options
Diffstat (limited to '3020/CH19/EX19.2')
-rwxr-xr-x | 3020/CH19/EX19.2/ex19_2.sce | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/3020/CH19/EX19.2/ex19_2.sce b/3020/CH19/EX19.2/ex19_2.sce new file mode 100755 index 000000000..095325f65 --- /dev/null +++ b/3020/CH19/EX19.2/ex19_2.sce @@ -0,0 +1,7 @@ +clc;
+clear all;
+Tc=3.7;//temperature in Kelvin
+H0=0.0306;//critical field at Tc
+T=2;//given temperature
+Hc=H0*(1-(T/Tc)^2);//critical field at T=2K
+disp('T',Hc,'critical field at 2K is:')
|