Appendix A
Tab 1e of Fermi integrals 11
F)) 11)
F3/ 2 (1l)
-4.0 -3.5 -3.0 -2.5 -2.0 -1.5 -1.0 -0.5 0.0 0.5 l.0 1.5
0.0182 0.0299 0.0489 0.0798 0.129 0.207 0.328 0.507 0.765 1.12 1.58 2.14
0.0183 0.030 0.0493 0.0809 0.132 0.215 0.347 0.553 0.867 l. 33 2.00 2.93
2
11
2.0 2.5 3.0 3.5 4.0 5.0 6.0 7.0 8.0 9.0 10.0
F)) 11)
F3/ 2 (1l)
2.82 3.61 4.49 5.46 6.51 8.84 11.45 14.29 17.35 20.62 24.09
4.16 5.77 7.79 10.27 13.26 20.91 31.04 43.89 59.69 78.67 10l.0
2
AppendixB Computer Program for the Evaluation of the Transport Coefficients by the Iteration ~lethod
EPS - EO x 1012[Fm-1]; TOP-6R,[K]; El - E1 [eV]; PV - up x 10
HL -
x 1034 [Js];
EMO-m*x10 31 [kg]; E14 - h
pz
-3 [m s-1 ];
*
CNE - n[m -3];
k6R,;
DCS - K·
s'
4
WWS - B x 10 [T];
BK - kB x 10 23 [J K- 1]
BG - E [eV]·
g'
AV -s x 1O-3 [m s-l]; TTL - T[ K]
NNYT-Subintervals of integration;
CNI - Ni x 1O- 20 [m -3];
2 -1 s-1 ]; RM-/).p/p;
HMB-J.lH[mV
DCI - K· a'
EMT - dm /dT; x
EC -lei x 10 19 [C];
RO -p x 1O-3 [kg m- 3 ];
[C m- 2];
LLL-Integration up to LLL EFF - EF[eV];
~
GAI-~;
GRM - Geometrical magnetoresistance
RHNE - RH;
411
Program (Appropriate for IBM 1130 in Fortran)
II FOR *10CS(CARD,DISK,1403PRINTER) * LIST SOURCE PROGRAM *ONE WORD INTEGERS *EXTENDED PRECISION DIMENSION A(16),B(16),XX(15),SX(15),CX(15),TO(15),SP(15),SM(15), lTOR(15), TOI (15) ,SPR(15) ,SMR(15) ,SPI (15) ,Sfl1 (15) ,FAR(15) ,FAI (15), 2FBR(15),FBI(15),GA(15),GI(15),GB(15),HA(15),PA(15),EA(15),EB(15), 3CB(15),AB(15),F1(16),F2(16),F3(16),F4(16),F5(16),F6(16),F7(16), 4F8(16),F9(16),F10(16),F11(16),F12(16),AALE(15),WWS(10),HM(10), 5DM (10) ,RHNE (10) ,HMB (10) ,RM( 10) ,GAl (10) ,GRI~( 10) , TTL (6) ,NNYT (6) DIMENSION LLL (6),FO(15},EFF{5),AD{15) A(1 )=0.095012510 A(2)=0.281603551 A(3)=0.458016778 A(4)=0.617876244 A(5)=0.755404408 A(6)=0.865631202 A(7)=0.944575023 A(8)=0.989400935 B(1)=0.189450610 B(2)=0.182603415 B(3)=0.169156519 B(4)=0.149595989 B(5)=0.124628971 B(6)=0.095158512 B(7)=0.062253524 B(8)=0.027152459 DO 10 11=1,8 A( II+8)=-A(1I) B( II+8)=B( II) 10 CONTINUE EPS=8.8542 HL=1.05444 EC=1.602 BK=1.3805 PAI=3.14159 READ(2,86) (WWS(I),I=1,5) READ(2,87) (TTL(I), 1=1,5) READ(2,87) (EFF(I),I=1,5) READ(2,88) (LLL(I), 1=1,5) READ(2,88) (NNYT(I),I=1,5) READ(2,89)MM1,MM2,MM3,MM4,IP1,IP2 READ(2,85)C~E ,HIT
85 86 87 88 89 90
READ(2,90) TOP,EMO,DCI,DCS,BG READ(2,90) E1,E14,RO,AV,PV FORMAT(2E8.1) FORMAT(5E8.1) FORMAT(5F8.1) FORMAT(518) FORMAT(614) FORMAT(5F10.5) WRITE(5,76) (WWS(K),K=1,5)
412 76
FORMAT(5X,'WWS='5E16.1) WRITE(5,77)(TTL(K),K=l,5) 77 FORMAT(5X,'TTL='5F16.1) WRITE(5,177)(EFF(K),K=l,5) 177 FORMAT(5X,'EFF='5F16.1) WRITE(5,78)(LLL(K),K=l,5) 78 FORMAT(5X,'LLL='518) WRITE(5,178)(NNYT(K),K=l,5) 178 FORMAT(5X,'NNYT='518) WRITE(5,79)CNE,EMT 79 FORMAT (5X,'CNE,EMT='2E16.1) WRITE(5,179)MM1,MM2,MM3,MM4,IP1,IP2 179 FORMAT(5X,'MM1,MM2,MM3,MM4,IP1,IP2='614) WRITE(5,80)TOP,EMO,DCI,DCS,BG 80 FORMAT(5X,'TOP,EMO,DCI,DCS,BG='5F16.5) WRITE(5,180)E1,E14,RO,AV,PV 180 FORMAT(5X,'E1,E14,RO,AV,PV='5F16.5) AL= 1.E-04*TOP*BK/(BG*EC) DO 301ITL=MM1,MM2 TL = TTL(ITL) NYT = NNYT(ITL) LL=LLL ( ITL) I1=LL+9 12=LL+8 I3=LL+7 14 = LL+6 EM=EMO+EMT*TL Y=TOP/TL DO 302 ICN=MM3,MM4 EF=EFF (ICN) B1NT=0 ECIT=O DO 1207 IJK=l,NYT DO 1207 IJ=l,16 X=O. 5* (1. +A ( IJ) ) X= (X+( IJK-1)) /NYT BC=0.5*B(IJ)/NYT DO 1207 IK=l,I1 XX(IK)=X+(I
