Indexed KeyValueMap

Question

I have been trying to figure it out and I am probably very close, but I have spent 2 hours without sucess. I have the expression below

MapIndexed[
 geg[First[#2], 
   Total[KeyValueMap[fef[#1, #2, mem] &, #1]]] &, {<|a -> b, 
   c -> d|>, <|e -> f|>}]

which produces

{geg[1, fef[a, b, mem] + fef[c, d, mem]], geg[2, fef[e, f, mem]]}

I want to have the position of the association in the list {<|a -> b, c -> d|>, <|e -> f|>} passed both to geg and fef

That is, I want the result to be

{geg[1, fef[a, b, 1, mem] + fef[c, d, 1, mem]], geg[2, fef[e, f, 2, mem]]}

Answer 1

MapIndexed[Function[{v, k}, 
  geg[First[k], Total[KeyValueMap[fef[#1, #2, First[k], mem] &, v]]]],
 {<|a -> b, c -> d|>, <|e -> f|>}]

{geg[1, fef[a, b, 1, mem] + fef[c, d, 1, mem]],
geg[2, fef[e, f, 2, mem]]}

Or, slightly more readable version:

MapIndexed[Function[{v, k}, 
  geg[First[k], 
     Total[KeyValueMap[Function[{key, val}, fef[key, val, First[k], mem]], v]]]],
  {<| a -> b, c -> d|>, <|e -> f|>}]

same result

With a minimal change in OP's code:

MapIndexed[geg[i = First[#2], Total[KeyValueMap[fef[#1, #2, i, mem] &, #1]]] &,
   {<|a -> b, c -> d|>, <|e -> f|>}]

same result

and, without KeyValueMap:

MapIndexed[geg[i = First[#2], Total[fef[##, i, mem] & @@@ Normal[#]]] &, 
 {<|a -> b, c -> d|>, <|e -> f|>}]

same result