R/saturn.R

In moonsun: Basic astronomical calculations with R

`saturn` <-
function (jday=jd()) 
{
        planet(jday,
		name="Saturn",
		inner=FALSE,
		tp=29.471362,
		ep=287.690033,
		oo = 92.861407,
		e = 0.055581,
		a = 9.554747,
		i = 2.488980,
		om = 113.576139,
		th = 165.60,
		mag = -8.88);
}