umeshmotion子程序计算轮胎磨耗

我想知道怎么把Archard公式中计算轮胎磨损厚度的公式编入到（ABAQUS帮助文档计算轮胎磨耗的例子中）的.for文档，使其既能输出节点磨损速率也能输出磨损厚度呢