wip

Author: DedSec256

ReSharper.FSharp/src/FSharp.Psi/src/Resolve/FSharpParameterUtil.cs

@@ -145,5 +145,19 @@ public static IEnumerable<IEnumerable<string>> GetParameterNames(this ITypeUsage
         ITupleTypeUsage tuplePat => tuplePat.Items.SelectMany(GetParameterNames),
         _ => EmptyList<IEnumerable<string>>.Enumerable
       };
+
+    public static IReadOnlyList<IReadOnlyList<string>> GetParametersGroups(this IBinding binding)
+    {
+      var parameters = binding.ParameterPatterns.Select(GetParameterNames);
+      var bodyExpr = binding.Expression;
+
+      while (bodyExpr.IgnoreInnerParens() is ILambdaExpr lambdaExpr)
+      {
+        parameters = parameters.Union(lambdaExpr.Patterns.Select(GetParameterNames));
+        bodyExpr = lambdaExpr.Expression;
+      }
+
+      return parameters.Select(t => t.ToIReadOnlyList()).ToIReadOnlyList();
+    }
   }
 }