nscat-3.tar

ABAQUS扩展子程序应用，实例学习，仅供参考(ABAQUS extended subroutine application)

此代码属于地球物理领域，是用有限差分开发的直流电法三维正演，基于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)

说明：  集成了梯度下降法、牛顿法、拟牛顿法、共轭梯度法等多个最优化算法(It integrates gradient descent method, Newton method, quasi Newton method, conjugate gradient method and other optimization algorithms)

用matlab的算法，实现MUSIC时间反演，主要用于信号处理中的相关问题(MUSIC time reversal matlab algorithm, mainly used for signal processing issues related to)

sod 激波管问题的简单实现，包括weno3和weno5，makefile可正常运行，方便使用(Sod shock tube simple implementation of the problem, including weno3 and weno5, makefile can be normal operation, easy to use)

vc++实现编译原理中的LL(1)文法的编译过程,非常好用.(vc realization of the principle of compiler LL (1) grammar compiler course, very handy.)

说明：  工程中微分方程数值积分经常需要使用的Newmark法(Differential equations numerical integration project often requires the use of the Newmark method)

★问题描述: 给出平面上的N 个二维点，求出距离最小的2 个点对。本题中距离定义为他们的直 线距离。例如(0,0) (3,4)的距离为5. ★数据输入： 有多组数据，对于每组数据，第一行是一个数字N 表示点的个数。N=0 的时候说明 输入结束。之后N 行，每行有2 个浮点数x_i,y_i 表示第i 个点的坐标。(1<=N<=10000 0,0<=|x_i|,|y_i|<=10^9) ★结果输出: 输出一个浮点数，表示最近点对的距离除以2，保留2 位小数(四舍五入)。

fsolve函数求非线性方程组数值解，已经验证其正确性。(fsolve function for the numerical solution of nonlinear equations)

粒子群算法在解决非线性方程上的应用，给出了详细程序(Particle swarm algorithm for solving nonlinear equations, gives detailed procedures)