function xh=glimh2(y) % %usage: xh=glimh2(y) % xh=y; endfunction