Add exOr in bool.hs