Yes. In the latest edition it is the file oo.f90 in the zip file available, free, on the ‘codes’ button at https://global.oup.com/booksites/content/9780198876571/ . Its description is in Appendix C of the book itself.
Mike Metcalf
1 Like