err

代码说明：

源码公开－线弹性动力分析直接积分 声明： 贴出源程序只是为了给有这方面需要的弟兄提供参考，并 非用于和做这方面工作的弟兄讨论用。 本人不对程序的正确性提供任何保证，不对程序的可读性 承担任何义务，也不承担对使用者在使用过程中的任何问 题提供解答的义务。 同意本声明的弟兄可以以任何的方式修改、使用 和传播本程序。否则，请勿以任何方式使用本程序。 NEWMARK BETA源程序（FORTRAN）。程序是一个独立的文件（ F77格式），使用者可将其拷入一个文件并改名为.FOR即可。 如：NEWMARK.FOR。程序中的矩阵和向量均为满存储。 -err