function xh=glimh(y) % %usage: xh=glimh(y) % xh=3; endfunction