mkmod.m

我写的一个地震单台定位的程序

function mkmod
H = get(gcf,'UserData');
inlon = str2num(get(H(10),'String'));
inlat = str2num(get(H(11),'String'));
epicenter = str2num(get(H(5),'String'));
azimath = str2num(get(H(7),'String'));
[latout,lonout] = reckon(inlat,inlon,epicenter/111.11,azimath);
set(H(8),'String',lonout);
set(H(9),'String',latout);