diff options
Diffstat (limited to '3763/CH8/EX8.2')
| -rw-r--r-- | 3763/CH8/EX8.2/Ex8_2.sce | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/3763/CH8/EX8.2/Ex8_2.sce b/3763/CH8/EX8.2/Ex8_2.sce new file mode 100644 index 000000000..49be8e171 --- /dev/null +++ b/3763/CH8/EX8.2/Ex8_2.sce @@ -0,0 +1,15 @@ +clear +// +// +// + +//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("\n critical field is %0.2f *10**3 ampere/m",H/10**3) |