SR-simulation

计算器编程代码，便于需要编程计算器的学员查询相关代码(Calculator programming code, to facilitate students in need of programming calculator related code)

说明：  复合材料单向板损伤模拟的Umat子程序，配合ABAQUS进行损伤模拟。(A umat subroutine for the simulation of composite meterials damage.)

三维矢量有限元-矩量法电磁场分析程序。 EMAP5 is a full-wave electromagnetic field solver that combines the method of moments (MOM) with a vector finite element method (VFEM). It employs the finite element method (FEM) to analyze a dielectric volume, and employs the method of moments (MoM) to solve for currents on the surface of (or external to) this volume. The two methods are coupled through the fields on the dielectric surface.(Three-dimensional vector finite element- MoM electromagnetic field analysis program. EMAP5 is a full-wave electromagnetic field solver that combines the method of moments (MOM) with a vector finite element method (VFEM). It employs the finite element method (FEM) to analyze a dielectric volume, and employs the method of moments ( MoM) to solve for currents on the surface of (or external to) this volume. The two methods are coupled through the fields on the dielectric surface.)

说明：  本模拟是采用分步傅里叶的解，求光孤子在光线内传输过程数值求解薛定谔方程。方程是激光器在光纤中传输的过程。(In this simulation, the fractional Fourier solution is used to solve the Schrodinger equation. The equation is the process of laser transmission in fiber.)

本程序实现了基于最佳维纳滤波器的盲解卷积算法。维纳滤波将地震子波转换为任意所需要的形态。例如，像反滤波一样，可以设计维纳滤波器将地震子波转换为尖脉冲。但维纳滤波不同于反滤波，它是在最小平方的意义上为最 佳。基于最佳纳滤波理论的滤波器算法是人们熟知的维纳一莱文逊(Wiener—Levinson)算法。本程序提供了五种期望输出：零延迟尖脉冲；任一延迟尖脉冲；时间提前了的输入序列；零相位子波；任意期望波形。(Wiener—Levinson algorithm used in wiener filter. matlab with detailed note in Chinese.)

滤波程序，从同事那里要的，大家一起交流学习(BADNELL & BURGESS D.A.M.T.P. CAMBRIDGE C C DIAGONALIZATION OF REAL SYMMETRIC N-BY-N MATRIX Z. C C METHOD: HOUSEHOLDER REDUCTION TO TRI-DIAGONAL FORM AND SHIFTED C QL ALGORITHM TO DETERMINE THE E-VALUES AND E-VECTORS. C C BASED ON MARTIN, REINSCH & WILKINSON: NUM. MATH. 11, 181-95 (1968). C C INPUT REQUIRED. N, IUP AND Z. ONLY LOWER TRIANGLE OF Z NEED BE SUPPLIED. C MATRIX Z OVERWRITTEN BY EIGENVECTORS OF Z. C IUP=1/-1 ASC/DESCENDING SORT, 0 NO SORT. C MXMAT, IS THE ROW DIMENSION OF Z IN THE CALLING ROUTINE. C C OUTPUT. Z AND D, WHERE Z CONSISTS OF COLUMN EIGENVECTORS C AND D CONSISTS OF CORRESPONDING EIGENVALUES. C C NOTE: E IS A WORKING ARRAY. C)

用计算机编程的方法建立试卷的合理分配问题的优化模型(Optimization model to establish the papers a reasonable allocation problem with computer programming methods)

说明：  用于非线性常微分方程的解的重要的一类隐式或显式迭代法，使用龙格库塔计算激光器的速率方程。(An important class of implicit or explicit iterative methods for solving nonlinear ordinary differential equations is to use Runge Kutta to calculate the rate equations of lasers.)

hankel矩阵生成函数介绍及函数代码。(Hankel matrix generating function introduction and function code.)

实现了声波波动方程有限差分正演模拟，交错网格下，时间2阶空间10阶(Achieve the acoustic wave equation finite difference forward modeling, staggered under the grid, the time second-order space 10 order)