diff options
Diffstat (limited to '3020/CH19')
| -rwxr-xr-x | 3020/CH19/EX19.2/ex19_2.sce | 7 | ||||
| -rwxr-xr-x | 3020/CH19/EX19.3/ex19_3.sce | 12 | ||||
| -rwxr-xr-x | 3020/CH19/EX19.4/ex19_4.sce | 10 |
3 files changed, 29 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:')
diff --git a/3020/CH19/EX19.3/ex19_3.sce b/3020/CH19/EX19.3/ex19_3.sce new file mode 100755 index 000000000..926f0ecbe --- /dev/null +++ b/3020/CH19/EX19.3/ex19_3.sce @@ -0,0 +1,12 @@ +clc;
+clear all;
+Tc=7.18;//temperature in Kelvin
+H0=6.4*1e4;//critical field in A/m
+d=1e-3;//diameter of wire
+r=d/2;//radius of wire
+T=4.2;//given temperature
+Hc=H0*(1-(T/Tc)^2);//critical field at T=4.2K
+disp('A/m',Hc,'critical field at 4.2K is:')
+Ic=2*%pi*r*Hc;//critical current through wire of lead
+disp('Amp',Ic,'critical current through wire of lead is:')
+//there is slight variation in the answer.. checked in calculator also.. there is mistake of book..
diff --git a/3020/CH19/EX19.4/ex19_4.sce b/3020/CH19/EX19.4/ex19_4.sce new file mode 100755 index 000000000..de8df2bb3 --- /dev/null +++ b/3020/CH19/EX19.4/ex19_4.sce @@ -0,0 +1,10 @@ +clc;
+clear all;
+Tc1=4.185;//critical temperature of metal
+Tc2=4.133;//decreased critical temperature
+M1=199.5;//isotropic mass of metal
+//Tc2=Tc1*(M1/M2)^0.5 so..
+M2=M1*(Tc1/Tc2)^2;//isotropic mass when Tc2=4.133K
+disp('',M2,'isotropic mass when Tc2=4.133K is');
+//in the book the question is different and solution is somewhat different.. so.. slight variation in the answer.. checked in calculator also..
+
|