theorem obindeq2 (a: nat) (_F1 _F2: set): $ _F1 == _F2 -> obind a _F1 = obind a _F2 $;
_F1 == _F2 -> _F1 == _F2
_F1 == _F2 -> obind a _F1 = obind a _F2