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.
The information on this web page is distributed under the MIT license.
toms707 is available in a Fortran77 version.