使用Fortran实现DIF-FFT

双线性插值FORTRAN计算程序,用于FORTRAN９０(Bilinear interpolation)

Using Runge-Kutta 10 inoder to solve

多次改进的seis系列传统正演源程序seis88，仅供参考。(for ray tracing use.)

此程序是用多重散射理论计算二维声子晶体的结构的Fortran代码。(This program is multi-dimensional phonon scattering calculated crystal structure Fortran code.)

hyperbolic model abaqus fric sub

2维平面应变+各项同性+J2流动+自定义屈服强度等效塑性应变关系+欧拉后推径向返回(ABAQUS UMAT)

PQ-Fiber 是清华大学土木工程系结构工程研究所基于大型通用有限元程序ABAQUS 开 发的一组材料单轴滞回本构模型的集合。主要用于在钢筋混凝土结构、钢结构等的弹塑性时 程分析中定义杆系结构的材料本构，同时可用于任何只需要定义材料单轴滞回本构模型的情 况。 作者以 FORTRAN 编译文件.obj 的形式在网上免费发布PQ-Fiber 的最新版本，以供广 大科研与工程设计人员使用，发布的版本没有功能限制。请使用者尊重知识产权，(PQ-Fiber is a Structural Engineering Research Institute of Civil Engineering Department of Tsinghua University. It is based on the large general finite element program ABAQUS. A set of uniaxial hysteretic constitutive models is set up. It is mainly used for elastic-plastic properties of reinforced concrete structures and steel structures. In the process analysis, the material constitutive equation of the bar structure is defined, and it can be used for any material requiring only a uniaxial hysteretic constitutive model. The situation. The author releases the latest version of PQ-Fiber on the Internet for free in the form of FORTRAN compiler.Obj. The use of large research and engineering designers has no functional limitations. Invites users to respect intellectual property rights,)

说明：  计算球体重力及重力梯度异常，已知地下球体的相关参数，即可正演该球体的重力及重力梯度(Calculation of gravity and gravity gradient anomaly of sphere)

用ABAQUS及其子程序解决热冲压热力耦合问题(Subroutine with ABAQUS and hot stamping coupled thermal problem solving)

一个关于FDTD的三维fortran90小程序.(A small program on the FDTD in fortran90)