Relatively short -- the Fortran version is 500 lines.