kepler equation script