lijisuan

说明：  使用fortran编写的无网格（光滑质点流体动力学）SPH算法(using FORTRAN prepared by the non-grid (smooth particle hydrodynamics) SPH algorithm)

遗传算法反演子程序，可用于地球物理非线性反演(The genetic algorithm inversion subroutine, can be used for nonlinear geophysical inversion)

素性检测的miller-rabin算法。。。。。(Primality testing)

用栈的思想实现的简易计算器，可直接输入表达式，然后自动计算结果(Ideology with a stack of simple calculator, you can directly enter an expression, then automatically calculated)

有限元计算软件Abaqus USDFLD子程序在复合材料中强度分析中的应用。(Finite element analysis software Abaqus USDFLD subroutine in the composite material strength analysis applications.)

自己写了一个二维Euler方程的间断有限元程序 上次发了一个三角形单元的程序 因为不是曲边单元 所以在圆柱后面容易形成涡 现在把程序改为曲边四边形单元了 没有涡出现 单元是8节点四边形单元 节点编号顺序是 1 5 2 6 3 7 4 8 也就是四个角点依次 是1 2 3 4 然后是边的中点编号 5 6 7 8. 时间推进采用 Runge-Kutta 方法 数值通量采用全局Lax-Friedrichs通量 仍然不能捕捉激波 因为没有做重构或者加人工粘性 等这个做出来了 再发一次。 程序没有进行优化 比如说内存的消耗没有优化 比如直边单元的边界积分仍然采 用了曲边的积分方法 增加了计算量 比如面积分、线积分都是采用的是Gauss- Legendre-Lobatto积分 积分精度会比一般的Gauss-Legendre积分精度低一阶 等 等问题。 二维的 纯属交流性质 就没有考虑这些问题 ^_^ 如果物面全部是直边 那么只要改变一个参数N 就可以获得不同的计算精度 且具 有谱精度 因为单元的节点是Gauss-Legendre-Lobatto积分点。 其实就是谱元法 （物面是曲边的情况我不清楚是不是也可以通过提高基函数的阶数 也就是增加N 来提高计算精度）(Wrote a two-dimensional Euler equations with discontinuous finite element program Last made ​ ​ a triangular element of the program, not curved edge unit is so easy to form a vortex in the cylinder behind the Program to curved edge quadrilateral element vortices appear Unit is the order of 8-node quadrilateral element node number is 15,263,748 which is the four corners of the points in turn Is 1234 and then the side of the midpoint of the number 5678. Time promote the use of Runge-Kutta method Numerical flux of the overall situation of Lax-Friedrichs, flux Still can not capture the shock wave did not do the reconstruction or artificial viscosity do it Zaifayici. The program is not optimized for example, memory consumption is not optimized such as straight-edge boundary integral of the unit is still mining Integral method to increase the amount of computation such as surface integral with a curved edge, the line integral using the Gauss- The Legendr)

J2000坐标系与WGS84坐标系之间的转换矩阵计算。(The matrix between J2000 and WGS84 coordinat system)

α-β-γ滤波函数，可实现对等间隔的观测数据进行滤波估计。(α-β-γ filter function design by C language. Complete the filter evaluation function for equidistant discrete data.)

三次B样条最小二乘拟合，附文献，Approximation of data using cubic B′ ezier curve least square fi tting，Author: M Khan(Cubic B-spline least squares fitting and literature. Approximation of data using cubic B ezier curve least square fitting, Author: M Khan,)

EDFA的掺铒光纤长度模拟计算，附3篇相关论文，330mw的980nm泵泵浦，3db的泵浦吸收，12m最佳长度已经的到验证，可作为EDFA设计参考 (EDFA erbium-doped fiber length simulation of three related papers, 330mw of 980nm pump pump pump 3db absorption 12m optimum length has been to verify, can be used as the EDFA design reference)