toms707_test, a FORTRAN77 code which calls toms707(), which evaluates the confluent hypergeometric function for complex arguments of large magnitude, by Warren Perger, Atul Bhalla, and Mark Nardin.
toms707,