andersonlecture

# andersonlecture - Anderson model code Not tridiagonal! We...

This preview shows pages 1–3. Sign up to view the full content.

This preview has intentionally blurred sections. Sign up to view the full version.

View Full Document
This is the end of the preview. Sign up to access the rest of the document.

Unformatted text preview: Anderson model code Not tridiagonal! We will use periodic boundary conditions! Anderson model code, declarations implicit none INTEGER, PARAMETER :: nn=10,nn3=nn**3 ! size of square,number of site INTEGER, PARAMETER :: nbin=1000 ! for dos,part ratio REAL*8, PARAMETER :: ww=5.0d0 ! width of disorder, from -w/2 to w/2 REAL*8 , dimension(nn3) :: w,fv1,fv2 REAL*8 , dimension(nn3,nn3) :: hamil,z REAL*8 , dimension(nbin) :: dos,part,count REAL*8 :: rnd,en,ran2 REAL*8, PARAMETER :: wmin=-ww*2.0d0,wmax=ww*2.0d0 REAL*8, PARAMETER :: delw=4.0d0*ww/nbin INTEGER :: matz,ierr,m,n,nb,i,ii,j,jj,k,kk,l,ll,neigh Anderson model code, declarations implicit none INTEGER, PARAMETER :: nn=10,nn3=nn**3 ! size of square,number of site INTEGER, PARAMETER :: nbin=1000 ! for dos,part ratio REAL*8, PARAMETER :: ww=5.0d0 ! width of disorder, from -w/2 to w/2 REAL*8 , dimension(nn3) :: w,fv1,fv2 REAL*8 , dimension(nn3,nn3) :: hamil,z REAL*8 , dimension(nbin) :: dos,part,count REAL*8 :: rnd,en,ran2 REAL*8, PARAMETER :: wmin=-ww*2.0d0,wmax=ww*2.0d0 REAL*8, PARAMETER :: delw=4.0d0*ww/nbin INTEGER :: matz,ierr,m,n,nb,i,ii,j,jj,k,kk,l,ll,neigh INTEGER, PARAMETER :: mensb=50 Initialize diagonal elements from random distribution...
View Full Document

## This note was uploaded on 08/08/2011 for the course PHZ 5156 taught by Professor Johnson,m during the Fall '08 term at University of Central Florida.

### Page1 / 15

andersonlecture - Anderson model code Not tridiagonal! We...

This preview shows document pages 1 - 3. Sign up to view the full document.

View Full Document
Ask a homework question - tutors are online