example.erl

generate_match_vars([{Key, Value, Expr} | T], ClauseVars, Left, Right) ->
  case maps:find(Key, ClauseVars) of
    {ok, Value} ->
      generate_match_vars(T, ClauseVars, Left, Right);
    {ok, Clause} ->
      generate_match_vars(T, ClauseVars,
        [{var, 0, element(1, Value)} | Left],
        [{var, 0, element(1, Clause)} | Right]);
    error ->
      generate_match_vars(T, ClauseVars,
        [{var, 0, element(1, Value)} | Left], [Expr | Right])
  end;