Mercurial > repos > public > sbplib
annotate rickerWavelet.m @ 1322:412b8ceafbc6 feature/poroelastic
Add Zt to output args for Elastic2dCurvilinearAnisotropic.interfaceNormalTangential
author | Martin Almquist <malmquist@stanford.edu> |
---|---|
date | Sat, 24 Oct 2020 20:58:26 -0700 |
parents | 905612b7f3d4 |
children |
rev | line source |
---|---|
661
905612b7f3d4
Add function for rickerWavelet
Jonatan Werpers <jonatan@werpers.com>
parents:
diff
changeset
|
1 function y = rickerWavelet(x, x0, A) |
905612b7f3d4
Add function for rickerWavelet
Jonatan Werpers <jonatan@werpers.com>
parents:
diff
changeset
|
2 y = (1-2*pi^2*A^2*(x-x0).^2).*exp(-pi^2*A^2*(x-x0).^2); |
905612b7f3d4
Add function for rickerWavelet
Jonatan Werpers <jonatan@werpers.com>
parents:
diff
changeset
|
3 end |