Lists the field names where the values are different

different field values.scala

  object filterPoly extends Poly1 {
    implicit def filterNotEqualValues[A <: Symbol, B]: Case.Aux[(A, (B, B)), List[String]] =
      at[(A, (B, B))] { case (k, (v1, v2)) => if (v1 == v2) List.empty[String] else List(k.name) }
  }

  object foldListPoly extends Poly2 {
    implicit def foldToList[T](implicit st: filterPoly.Case.Aux[T, List[String]]): Case.Aux[T, List[String], List[String]] =
      at[T, List[String]] { (t, acc) => st(t) ::: acc }
  }
  
  def diffFields[T, LHL <: HList, K <: HList, KOut <: HList, ZOut <: HList, ZKOut <: HList](a: T, b: T)(
    implicit
    gen: LabelledGeneric.Aux[T,LHL]
    keys: Keys.Aux[LHL, K],
    zipWith: Zip.Aux[LHL :: LHL :: HNil, ZOut],
    zipWithKeys: Zip.Aux[K ::ZOut :: HNil, ZKOut],
    rightFolder: RightFolder.Aux[ZKOut, List[String], foldListPoly.type, List[String]]
  ): Seq[String] = {
    keys().zip(gen.to(a).zip(gen.to(b))).foldRight(Nil: List[String])(foldListPoly)
  }