<div dir="ltr"><span style="font-family:arial,sans-serif;font-size:14px">Dear W2k users,</span><div><font face="arial, sans-serif"><span style="font-size:14px">Sorry for previous mail. plz ignore it.</span></font></div><div>
<font face="arial, sans-serif"><span style="font-size:14px"><br></span></font><div><div style="font-family:arial,sans-serif;font-size:14px">for hexagonal case, the crystal field splitting is grouped as a1g,eg_pi,eg_sigma</div>
<div style="font-family:arial,sans-serif;font-size:14px">but qtl splitting with L=2, qsplit=4 cannot split DOS well.</div><div style="font-family:arial,sans-serif;font-size:14px"><br></div><div style="font-family:arial,sans-serif;font-size:14px">
I put a new lines in transf.f</div><div style="font-family:arial,sans-serif;font-size:14px">------------------------------------------------------------------------------------</div><div style="font-family:arial,sans-serif;font-size:14px">
if(L.eq.3) then</div><div style="font-family:arial,sans-serif;font-size:14px">   if (nm.eq.5)then</div><div style="font-family:arial,sans-serif;font-size:14px">.....</div><div style="font-family:arial,sans-serif;font-size:14px">
   endif</div><div style="font-family:arial,sans-serif;font-size:14px">endif</div><div style="font-family:arial,sans-serif;font-size:14px"><br></div><div style="font-family:arial,sans-serif;font-size:14px">!!KK</div><div style="font-family:arial,sans-serif;font-size:14px">
if ((L.eq.2).and(nm.eq.4))then</div><div style="font-family:arial,sans-serif;font-size:14px">   T=0</div><div style="font-family:arial,sans-serif;font-size:14px">   a=s2/s3/2.;b=1./s3</div><div style="font-family:arial,sans-serif;font-size:14px">
   T(-2,-2)=-a ; T(-2,-1)=-b ; T(-2, 1)=-b;  T(-2, 2)=a</div><div style="font-family:arial,sans-serif;font-size:14px">   T(-1,-2)= a ; T(-1,-1)=-b ; T(-1, 1)= b;  T(-1, 2)=a<br></div><div style="font-family:arial,sans-serif;font-size:14px">
   T( 0,-2)=-b ; T( 0,-1)= a ; T( 0, 1)= a;  T( 0, 2)=b<br></div><div style="font-family:arial,sans-serif;font-size:14px">   T( 1,-2)= b ; T( 1,-1)= a ; T( 1, 1)=-a;  T( 1, 2)=b<br></div><div style="font-family:arial,sans-serif;font-size:14px">
   T(2,0)=1.</div><div style="font-family:arial,sans-serif;font-size:14px">endif</div><div style="font-family:arial,sans-serif;font-size:14px">!=========================================</div></div><div style="font-family:arial,sans-serif;font-size:14px">
<br></div><div style="font-family:arial,sans-serif;font-size:14px">one can edit qtltext.f accordingly, something like a1g,eg,eg&#39;</div>-- <br><div dir="ltr"><div style="font-family:arial;font-size:small">Kyoo Kim,</div>
<div style="font-family:arial;font-size:small">dept of Physics,</div><div style="font-family:arial;font-size:small">POSTECH, Pohang ,</div><div style="font-family:arial;font-size:small">Korea</div></div>
</div></div>