function [eph]=alm2eph(ID,Health,Eccentricity,TimeOfApp,Inclination,RateOfRightAscen,sqrtA,RightAscen,ArgOfPerigee,MeanAnom,Af0,Af1,week)
if nargin<13
    error('Not enough input');
end;
eph.IODE_sf2=0;
eph.IODE_sf3=0;
eph.iDot=0;
eph.C_rs=0;
eph.deltan=0;
eph.M_0=MeanAnom;
eph.e=Eccentricity;
eph.sqrtA=sqrtA;
eph.omega_0=RightAscen;
eph.i_0=Inclination;
eph.omega=ArgOfPerigee;
eph.omegaDot=RateOfRightAscen;
eph.weekNumber=1636;
eph.accuracy=1;
eph.T_GD=0;
eph.IODC=512;
eph.t_oc=475200;
eph.a_f2=0;
eph.a_f1=Af1;
eph.a_f0=Af0;
eph.C_uc=0;
eph.C_us=0;
eph.C_ic=0;
eph.C_is=0;
eph.C_rc=0;
eph.C_rs=0;
eph.t_oe=eph.t_oc;