limext.m

来自「德国人开发的地震处理分析软件」· M 代码 · 共 15 行

function limext

global Limiteder;
global Limiteizq;
global grafaxes;
global grafArange;

axes(grafaxes);
hold on;
plot([Limiteizq Limiteizq], grafArange, 'k-');
plot([Limiteder Limiteder], grafArange, 'k-');

Limiteizq=[0.1];
Limiteder=[0.1];