sum-score ( n g -- score ? )

Vocabulary

rosetta-code.bulls-and-cows

Inputs

n	an object
g	an object

Outputs

score	an object
?	an object

Definition

USING: kernel sequences ;

IN: rosetta-code.bulls-and-cows

: sum-score ( n g -- score ? )
    [ cow-or-bull ] curry map sift add-to-score dup check-win ;