Module Kepler

type elements = {
  1. a : float;
  2. e : float;
  3. inclination : float;
  4. mean_longitude : float;
  5. perihelion : float;
  6. node : float;
}
val period : float -> float
val eccentric_anomaly : e:float -> float -> float
val in_plane : elements -> days:float -> Vec2.t
val position : elements -> days:float -> float * float * float