%lisebergbanan
clear all
g=9.82;
load lisebergbanan_wdss -ascii;
% indata : tid(s), höjd(m), ay, ax, az 
%t	h	g_lat	g_vert	g_long (g)
% x - fram/bak, z=vertikal, y=sidled
am_short=lisebergbanan_wdss;   %(1:1401,:);

tid=am_short(:,1)-am_short(501,1);
hojd =am_short(:,2);
alat =am_short(:,3)/g;
along =am_short(:,4)/g;
avert =am_short(:,5)/g;
atot=(alat.^2+along.^2+avert.^2).^0.5;

figure(1)
subplot (3,1,1)
plot(tid,atot) 
%ylabel ('a_{vert}/g')
axis([0 150 0 4])
grid on




