Example Code Error

Hello All,

Actually when I called for below mentioned subroutine. The simulation got aborted with an error saying that;

"Abaqus Error: Problem during compilation - exa_fracture1.for"

I think there is problem with the code. Attached is the code file. Please suggest?

Thanks,

Aditya Nikam