summaryrefslogtreecommitdiff
path: root/3840/CH9/EX9.3/Ex9_3.sce
blob: 412d23afeefca45a6be2ae4f3b5b9fbc97d11474 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
clear
//
//
//

//Variable declaration
T=2         //temperature(K)
Tc=3.7      //critical temperature(K)
H0=0.0306   //critical magnetic field(A/m)

//Calculation
Hc=H0*(1-(T/Tc)**2)    //critical field(Tesla)

//Result
printf("\n critical field is %0.5f  Tesla",Hc)