uecal

function uecal
h1=findobj(0,'tag','ue');
m=findobj(h1,'tag','EditText1');
kK=get(m,'string');
k=str2num(kK)
ml=findobj(h1,'tag','EditText2');
lK=get(ml,'string');
l=str2num(lK)
mp=findobj(h1,'tag','EditText3');
acK=get(mp,'string');
ac=str2num(acK)
mpp=findobj(h1,'tag','EditText4');
aeK=get(mpp,'string');
ae=str2num(aeK);
ue=((k/l)*ae)/ac
msgbox(num2str(ue),'edge loss coefficient')