Commit b04b7f6a authored by Simone Liuzzo's avatar Simone Liuzzo

use analytic response derivative also for correction (vertical dispersion)

parent 03a996e0
......@@ -9,7 +9,8 @@ a2=mcf(mach)*dispweight;
if isfield(semres,'skewresponse')
skewresponse=semres.skewresponse;
else
skewresponse=semskewresp(qemb,qemres,semres,varargin{:});
% skewresponse=semskewresp(qemb,qemres,semres,varargin{:});
skewresponse=semskewrespAnalytic(qemb,qemres,semres,varargin{:});
end
[resp1,resp2]=semrdtresp(mach,qemres.bpmidx,[qemres.qpidx qemres.skewidx]);
strength=[qemres.ql.*qemb.ks;cor0];
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment