%cviceni3
GEAkonstanty
%drahove elementy Lageos1
a=12271150
e=0.0045
i=109.82
OMEGA=220.54
omega=231.28
tau=0
t=3600
elementy=[a,e,i,OMEGA,omega,0,0]
rv=rvzelementu(t,elementy,'Ea','m','s',8)
ele=elementyzrv(t,rv(:,1),rv(:,2),'Ea','m','s')
rozdil=elementy'-ele

