这是一款介绍三体动力学系统的源代码，不仅给出了轨道的求解程序，而且详细的说明了每个步骤，简洁易懂

参数退化复合材料三维渐进损伤VUMAT子程序，纤维损伤起始采用三维Hashin准则，基体采用早期改进版的二维Puck准则(Fortran VUAMT for three dimensional progressvie failure analysis of composite materials or structures)