theorem shreq2 (a _n1 _n2: nat): $ _n1 = _n2 -> shr a _n1 = shr a _n2 $;
_n1 = _n2 -> _n1 = _n2
_n1 = _n2 -> shr a _n1 = shr a _n2