function mittlereEkliptik(T) {
return (23.439291-0.013004*T)*GradinRAD;
}


function Aequatorkoordinaten(L,B,EKL)  {
// alpha=k[0], delta=k[1]
with (Math) {
var k=new Array();
var x = cos(B)*cos(L);
var y = cos(EKL)*cos(B)*sin(L)-sin(EKL)*sin(B);
k[0] = atan(y/x); if (x<0) k[0] = k[0] +PI
k[1] = sin(EKL)*cos(B)*sin(L)+cos(EKL)*sin(B);
k[1] = asin(k[1]);
}
return k;
}


function Horizont(RA,DE,Sternzeit,geoBreite) {
// alles in RAD
// Hoehe=hh[0], Azimuth[1]
var h = new Array();
with (Math) {
x = sin(geoBreite)*sin(DE)+cos(geoBreite)*cos(DE)*cos(Sternzeit-RA);
h[0] = asin(x); // Hoehe
h[1] = 0; // Azimut
}
return h;
}
