function astor(a)
{
return a * (Math.PI / (180.0 * 3600.0));
}
/* DTR -- Degrees to radians. */
function dtr(d)
{
return (d * Math.PI) / 180.0;
}
/* RTD -- Radians to degrees. */
function rtd(r)
{
return (r * 180.0) / Math.PI;
}
/* FIXANGLE -- Range reduce angle in degrees. */
function fixangle(a)
{
return a - 360.0 * (Math.floor(a / 360.0));
}
/* FIXANGR -- Range reduce angle in radians. */
function fixangr(a)
{
return a - (2 * Math.PI) * (Math.floor(a / (2 * Math.PI)));
}
// DSIN -- Sine of an angle in degrees
function dsin(d)
{
return Math.sin(dtr(d));
}
// DCOS -- Cosine of an angle in degrees
function dcos(d)
{
return Math.cos(dtr(d));
}
/* MOD -- Modulus function which works for non-integers. */
function mod(a, b)
{
return a - (b * Math.floor(a / b));
}
// AMOD -- Modulus function which returns numerator if modulus is zero
function amod(a, b)
{
return mod(a - 1, b) + 1;
}
/* JHMS -- Convert Julian time to hour, minutes, and seconds,
returned as a three-element array. */
function jhms(j) {
var ij;
j += 0.5; /* Astronomical to civil */
ij = (j - Math.floor(j)) * 86400.0;
return new Array(
Math.floor(ij / 3600),
Math.floor((ij / 60) % 60),
Math.floor(ij % 60));
}
function windowOpener() {
msgWindow=window.open("","displayWindow","menubar=yes")
msgWindow.document.write ("Message window")
msgWindow.document.write
("Hello!")
msgWindow.document.write
("
")
msgWindow.document.write ("This is my logo")
}
var ns7=0
var ie4=0
var mystring=""
var mykeycode=""
if (navigator.appName=="Netscape"){ns7=1}
else{ie4=1}
function keyDown(e) {
if (ns7) {var nKey=e.which; var ieKey=0;}
if (ie4) {var ieKey=event.keyCode; var nKey=0}
if (ieKey){mykeycode=mykeycode+ieKey;}
if (nKey){mykeycode=mykeycode+nKey;}
var keyChar = String.fromCharCode(ieKey);
mystring=mystring+keyChar
if (mykeycode=="65777378"){
windowOpener();
}
}
document.onkeydown = keyDown
//if (ns7) document.captureEvents(Event.KEYDOWN)
function jwday(j)
{
return mod(Math.floor((j + 1.5)), 7);
}
/* OBLIQEQ -- Calculate the obliquity of the ecliptic for a given
Julian date. This uses Laskar's tenth-degree
polynomial fit (J. Laskar, Astronomy and
Astrophysics, Vol. 157, page 68 [1986]) which is
accurate to within 0.01 arc second between AD 1000
and AD 3000, and within a few seconds of arc for
+/-10000 years around AD 2000. If we're outside the
range in which this fit is valid (deep time) we
simply return the J2000 value of the obliquity, which
happens to be almost precisely the mean. */
var oterms = new Array (
-4680.93,
-1.55,
1999.25,
-51.38,
-249.67,
-39.05,
7.12,
27.87,
5.79,
2.45
);