{
    { { "foo" "a0oe89ugao0" } 1 }
    { { "bar" "eua90oe8ae" } 1 }
} 
{ "[ 3drop 1 ]" "[ drop nip [ + ] reduce ]" }
[ unzip swap keys ] dip [ eval( -- quot ) call( k v r -- red ) ] 3map