function [V,D]=eigv(X)
% E=eigv(X)
% [V,D]=eigv(X)
% Räknar ut vänsteregenvektorer (V) och tillhörande egenvärden (E)
% D är en diagonalmatris med egenvärdena.

% Finn Lindgren 1998-11-11, 1998-12-01

[V,D]=eig(X');
V=V';
D=D';

if nargout<2
  V=diag(D);
end