An Algorithm for the Exact Evaluation of the Underground Lightning Electromagnetic Fields