[求助]求空间梁单元几何非线性静力或者动力分析的Fortran源代码

cobalt

各位，我最近要用到空间梁的几何非线性静力或者动力分析的Fortran源代码，想要使用Newton-Raphson求解，UL列式或者是CR列式的，希望可以得到大家的帮助。另外，我手上有一个实体单元的Fortran源程序，去年自己编制的，愿意进行交换。

我的Solid2014程序采用20结点空间等参元单元，高斯积分点数目为14个。计算结果均与ANSYS的Solid95单元计算结果极其符合。
可以进行静力分析和模态分析（Block Lanczos算法）。
可以考虑固定约束、结点弹性约束、文克尔弹性地基、弹性半空间地基、结点荷载、表面均布荷载、重力荷载。

sucisuci

adina81或adina84的源程序中有，能够考虑大位移，大转角和材料非线性，用UL法

cobalt

sucisuci 兄弟，有没有比较精练一点的版本啊？

sucisuci

对不起，我没有。其实我也想编一个大变形梁单元。

cobalt

OK，如果我得到了我会给你的。