gistfile1.txt

    def p9[T](list: Seq[T]): Seq[Seq[T]] =   {
      @tailrec
      def p9acc[T](list: Seq[T],acc:Seq[Seq[T]]): Seq[Seq[T]] = {
          list match {
            case Nil => acc
            case x::xs =>
              val (pref, suf) = list.span(_ == list.head)
              p9acc(suf,pref+:acc)
          }
      }
      p9acc(list,Nil).reverse