Lines Matching refs:Saux
13 . Haux, Saux, psi, Dk, Ek, caux,
120 complex(dp), dimension(2,nuotot,2,nuo) :: Haux, Saux, Dk, Ek
185 Saux = dcmplx(0.0_dp,0.0_dp)
205 Saux(1,juo,1,iuo) = Saux(1,juo,1,iuo) + S(ind) * kphs
206 Saux(2,juo,2,iuo) = Saux(2,juo,2,iuo) + S(ind) * kphs
218 call cdiag(Haux,Saux,2*nuotot,2*nuo,2*nuotot,eo(1,ik),psi,
270 Saux = dcmplx(0.0_dp,0.0_dp)
283 Saux(1,juo,1,iuo) = Saux(1,juo,1,iuo) + S(ind) * kphs
284 Saux(2,juo,2,iuo) = Saux(2,juo,2,iuo) + S(ind) * kphs
296 call cdiag(Haux,Saux,2*nuotot,2*nuo,2*nuotot,caux,psi,
304 Saux = dcmplx(0.0_dp,0.0_dp)
316 Saux(1,juo,1,iuo) = Saux(1,juo,1,iuo) + S(ind) * kphs
317 Saux(2,juo,2,iuo) = Saux(2,juo,2,iuo) + S(ind) * kphs
326 call cdiag(Haux,Saux,2*nuotot,2*nuo,2*nuotot,caux,psi,