▍1. PFC
晶体相场计算原子密度场分布和缺陷形成,基本程序,用于科学计算。基于Fortran 6.5编写,在其他应用程序中可能需要略微修改(Phase-field crystal modeling of atomic density field distribution)
本例是研究断裂问题的ABAQUS 子程序代码,使用Fortran语言编辑,研究扩展有限元的同志们可以借鉴一下。(This example is the study of fracture problems ABAQUS subroutine code, Fortran language editing, extended finite element study comrades can learn it.)
间断有限元方法( Runge–Kutta discontinuous Galerkin )求解N-S方程 算例为一维sod问题 流通量为BR1(Discontinuous Finite Element Method (Runge-Kutta discontinuous Galerkin) N-S equation solving a one-dimensional example problem sod Liquidity is BR1)
本程序可用于线性插值,Fortran源码用于插值计算。(Program for linear interpolation.)
拉格朗日插值函数,自己编的,供大家参考学习(Lagrange interpolation function, own, and for reference study)
s-波分裂参数计算,应用时间延迟方式,用于计算各向异性参数(shear-wave splitting time-delay calculation)
在fortran环境下编写ductile_fracture子程序,可以通过MARC来调用,实现板材成形中破裂过程的可视化(Written in fortran environment ductile_fracture subroutines can be invoked by MARC, realized in sheet metal forming rupture process visualization)
求解一元三次方程的Fortran源代码,自己试了试,可以用(Fortran source code for the three equation of a dollar, you can try, you can use)
二维泊松方程的定解问题:用5点菱形异步迭代格式求解泊松方程,h=5/4 ,误差s=1e-6 (Differential method for Poisson equation)
二维TM波的FDTD(2D TM wave under two-dimensional TM wave of FDTD)
压缩包中包含五个CFD基础程序,其中MacCormack1DSolveRiemann.for是一维欧拉方程求解(黎曼问题),UpwindTVD_1D.for是一维可压粘性N-S方程求解,MAC-Chorin2D.for是利用MAC算法和Chorin压力迭代解法求解 二维不可压缩黏性平板间Poisuille流动问题,Lax-Webdroff2D.for是利用Lax-Webdroff差分格式求解二维平面激波反射问题,fvm_upwind_MAC_couette.for是以一阶迎风型离散格式和Chorin压力迭代求解couette二维流动问题。(CFD compression package contains five basic program, which is an Euler equation solving MacCormack1DSolveRiemann.for (Riemann problem), UpwindTVD_1D.for is one-dimensional compressible viscous NS equation solving, MAC-Chorin2D.for is the use of algorithms and MAC Chorin pressure iterative solution for solving the two-dimensional incompressible flow problems between viscous flat Poisuille, Lax-Webdroff2D.for using Lax-Webdroff difference scheme for solving the two-dimensional plane shock wave reflection problem, fvm_upwind_MAC_couette.for based on first order upwind scheme and Discrete Chorin pressure couette iterative solution of two-dimensional flows.)
是ABAQUS有限元模拟软件的子程序,主要研究损伤断裂(a subroutine of ABAQUS for damage and fracture )
采用Fortran编写的二维非线性有限元计算程序,内有程序变量说明,可用于计算弯曲梁的大变形(Fortran prepared using a two-dimensional nonlinear finite element program variables within a program description can be used to calculate the bending beam of the large deformation)