sum-keys ( assoc -- n )


Vocabulary
assocs

Inputs
assocan object


Outputs
nan object


Definition
USING: math ;

IN: assocs

: sum-keys ( assoc -- n ) 0 [ + ] reduce-keys ; inline