FA

此代码属于地球物理领域，是用有限差分开发的直流电法三维正演，基于FORTRAN平台，此代码具有很高的运算效率，对于从事地球物理领域的人来说是不可多得的(This code belongs to the field of geophysics, is developed using finite difference method of three-dimensional forward modeling of DC, FORTRAN-based platform, this code has high computing efficiency, people engaged in geophysical field is rare)

早期的圆柱绕流程序，用fortran语言编写，用来了解早期绕流流动的发展(flow around the cylinder)

一维欧拉方程计算，集合了Lax-Friedrichs，Richtmyer，MacCormack，Steger-Warming，Van Leer，AUSM，Zha-Bilgen，Godunov，Osher，Roe，Rusanov，HLL(HLLE)，HLLL，AUFS方法(One dimensional Euler equation, including Lax-Friedrichs, Richtmyer, MacCormack, Steger-Warming, Van Leer, AUSM, Zha-Bilgen, Godunov, Osher, Ro, Rusanov, HLL(HLLE), HLLL, AUFS)

可以用于科学计算的库，数值计算库，只要将头文件包含即可。(Can be used for scientific computing libraries, numerical libraries, header files will be included as long as you can.)

实对称矩阵的schur分解，编译即可运行，需要文件输入(schur decomposition for real symmetric matrix,the program can run successfully, you need a file for input)

根据物理学的毕奥-萨法尔定理，计算环形线圈周围电磁场的强度。。(According to physics, Biot- Safar theorem, calculate the intensity of electromagnetic field around the circular coil. .)

一个自己写的，生成BA无标度网络并计算其度分布的程序，fortran77格式，并附图一张，数据一份。(A program written myself, which can generate the BA scale-free networks and calculate the degree distribution , fortran77 format attachment is a drawing and data.)

这是求多柔体转子纽马克法的程序。以拉格朗日方程为基础，结合有限元发计算(is seeking more flexible rotor Newmark Act procedures. To Lagrange equation, the FEM calculation)

求解二阶变系数常微分方程,主要用于涡激振动中频率响应的计算(Solving second-order ordinary differential equations with variable coefficients)

牛顿迭代法，用于求解非线性方程，具体使用方法见程序内部说明。(Newton iteration for solving nonlinear equations, the specific use of the procedure see the internal note.)