AA= [ - 70*0.0036/2 , 40 *0.0036/2, 30*0.0036/2 ;
    40 *0.036/2 , - 70  *0.036/2, 30 *0.036/2; 0 , 0 ,0 ] 
[PP,DD] = eig(AA)
kk= PP\[20;25;5]

t= 0.5;  %enheter timer 3600 sekunder

for i=1:3
kk(i) = kk(i) *exp( DD(i,i) *(t ));
end
%kk
TT= PP * kk

% Her kan vi endre på tiden t som det passer.  For eks. sette inn 
%verdiene 6,12,18 og 24. 