set znorm=1 in write_eigenvectors.f90. now testing.