summaryrefslogtreecommitdiff
path: root/2912/CH10/EX10.1/Ex10_1.sce
blob: 38c47526be642f757aea75afa4c2986d9d0d80b4 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
//chapter 10
//example 10.1
//Calculate magnitude of critical magnetic field
//page 313
clear;
clc;
//given
Tc=7.2; // in K (critical temperature)
T=5; // in K (given temperature)
H0=6.5E3; // in A/m (critical magnetic field at 0K)
//calculate
Hc=H0*(1-(T/Tc)^2); // calculation of magnitude of critical magnetic field
printf('\nThe magnitude of critical magnetic field is \tHc=%1.3E A/m',Hc);