minor changes in HOL[B