文件列表:

FDProgs\CProp.m (3866, 2012-04-20)
FDProgs\EarthParam.m (2441, 2008-07-01)
FDProgs\FDWave.m (74386, 2012-04-20)
FDProgs\Gauss.m (267, 2008-09-26)
FDProgs\Par.m (5131, 2008-12-11)
FDProgs\Prem.txt (3960, 2008-07-01)
FDProgs\Shift.m (322, 2008-09-26)
FDProgs\TenRot.m (3554, 2008-07-01)
FDProgs\ThermoParam.txt (1287, 2008-07-01)
FDProgs (0, 2012-09-21)

These matlab routiness are distributed as part of the article Oliver S. Boyd, An Efficient Matlab Script to Calculate Heterogeneous Anisotropically Elastic Wave Propagation in Three Dimensions, Computers and Geosciences, 2005 08-26-08 - Update to include Anelasticity and 1D problems The programs include FDWave.m - Program that calculates finite-difference wavefield Par.m - Program to generate sample structure for FDWaveAni.m TenRot.m - Utility to rotate stiffness tensor Shift.m - Utility used by Par.m to shift a waveform Gauss.m - Utility used by Par.m to create a gaussian pulse. CProp.m - Called by Par.m to construct stiffness tensor for various materials. EarthParam.m - Given option to CProp.m, CProp.m will call EarthParam.m to populate model domain with PREM. To get started, at the Matlab prompt, run > Par This will return a structure called P. next, solve for the wavefield >[u,f] = FDWave(P); FDWave returns a structure u containing ux, uy, and uz which are the displacements at the surface or where specified by P.ud To get additional help, type >help 'ProgramName' The help for FDWave will tell you about the structure of P. I recommend going through Par.m and using this script as a starting point for your model.

近期下载者：

相关文件：

评论：[我要评论] [举报此文件]

收藏者：