Planets
type planet = {
name : string;
orbit : Kepler.elements;
radius : float;
}
val planets : planet list
val au : float
val sun_radius : float
val moon_distance : float
val moon_period : float
val moon_radius : float