Mercurial > repos > public > sbplib
view rickerWavelet.m @ 1317:34997aced843 feature/poroelastic
Add some interface forcing penalties in ElasticCurvilinearAnisotropic
author | Martin Almquist <malmquist@stanford.edu> |
---|---|
date | Sun, 26 Jul 2020 20:06:06 -0700 |
parents | 905612b7f3d4 |
children |
line wrap: on
line source
function y = rickerWavelet(x, x0, A) y = (1-2*pi^2*A^2*(x-x0).^2).*exp(-pi^2*A^2*(x-x0).^2); end