哪位大佬有hashin失效准则的USDFLD子程序

<a href="http://forum.simwe.com/forum.php?mod=viewthread&tid=1058279&page=1#pid2902190" target="_self">http://forum.simwe.com/forum.php?mod=viewthread&tid=1058279&page=1#pid2902190</a>