haskellで連結判定って面倒そう