Haskell family cut 1209

Haskell family cut 1209