研究损伤断裂-a subroutine of ABAQUS for damage and fracture