Extracted helper functions to asteroids_util.scm.