I'm currently working on a friction and wear model and I need the Fortran code for Archard's model. Does anyone know how I can obtain it?

Edu ABAQUS