Add consistency law for alignMergeWith

Author: joroKr21

laws/src/main/scala/cats/laws/AlignLaws.scala

@@ -22,8 +22,8 @@
 package cats
 package laws
 
-import cats.syntax.align._
-import cats.syntax.functor._
+import cats.syntax.align.*
+import cats.syntax.functor.*
 
 import cats.data.Ior
 import cats.data.Ior.{Both, Left, Right}
@@ -45,6 +45,9 @@ trait AlignLaws[F[_]] {
   def alignWithConsistent[A, B, C](fa: F[A], fb: F[B], f: A Ior B => C): IsEq[F[C]] =
     fa.alignWith(fb)(f) <-> fa.align(fb).map(f)
 
+  def alignMergeWithConsistent[A](fa1: F[A], fa2: F[A], f: (A, A) => A): IsEq[F[A]] =
+    fa1.alignMergeWith(fa2)(f) <-> fa1.align(fa2).map(_.mergeWith(f))
+
   private def assoc[A, B, C](x: Ior[A, Ior[B, C]]): Ior[Ior[A, B], C] =
     x match {
       case Left(a) => Left(Left(a))

laws/src/main/scala/cats/laws/discipline/AlignTests.scala

@@ -24,7 +24,7 @@ package laws
 package discipline
 
 import org.scalacheck.{Arbitrary, Cogen, Prop}
-import Prop._
+import Prop.*
 
 import cats.data.Ior
 import org.typelevel.discipline.Laws
@@ -53,13 +53,10 @@ trait AlignTests[F[_]] extends Laws {
     new DefaultRuleSet(
       name = "align",
       parent = None,
-      "align associativity" -> forAll(laws.alignAssociativity[A, B, C] _),
-      "align homomorphism" -> forAll { (fa: F[A], fb: F[B], f: A => C, g: B => D) =>
-        laws.alignHomomorphism[A, B, C, D](fa, fb, f, g)
-      },
-      "alignWith consistent" -> forAll { (fa: F[A], fb: F[B], f: A Ior B => C) =>
-        laws.alignWithConsistent[A, B, C](fa, fb, f)
-      }
+      "align associativity" -> forAll(laws.alignAssociativity[A, B, C]),
+      "align homomorphism" -> forAll(laws.alignHomomorphism[A, B, C, D]),
+      "alignWith consistent" -> forAll(laws.alignWithConsistent[A, B, C]),
+      "alignMergeWith consistent" -> forAll(laws.alignMergeWithConsistent[A])
     )
 }