LAPACK [1] is written in Fortran. It is still heavily used in scientific computing. And to be honest, I don't know if there are good alternatives for it in other languages (except for CLAPACK, which is just a transpiled version of LAPACK in C).

[1] http://www.netlib.org/lapack/