An analytical model of the atmospheric entry of large meteors and its application to the Tunguska Event