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