gazagnaire.org / ocaml-kepler
Two-body Keplerian orbit propagation
0
fork

Configure Feed

Select the types of activity you want to include in your feed.

Linter fixes: auth refactor, github-oauth merge, respond cleanup

Thomas Gazagnaire d4572247 d06b82b8

+3 -1
+3 -1
lib/analytic.ml
··· 174 174 175 175 (** {1 Element queries} *) 176 176 177 - let period el = if el.a <= 0. then infinity (* hyperbolic *) else (2. *. Float.pi) /. el.n 177 + let period el = 178 + if el.a <= 0. then infinity (* hyperbolic *) else 2. *. Float.pi /. el.n 179 + 178 180 let eccentricity el = el.e 179 181 let semi_major_axis el = el.a 180 182 let inclination el = el.i