A demonstration for Johannes Kepler's laws of planetary motion by Tobias Kramer (1999)