{-# htermination minusFM :: FiniteMap Bool b1 -> FiniteMap Bool b2 -> FiniteMap Bool b1 #-}
import FiniteMap