increase-balance ( node amount -- node )

Vocabulary

trees.avl.private

Inputs

node	an object
amount	an object

Outputs

node

an object

Definition

USING: accessors math ;

IN: trees.avl.private

: increase-balance ( node amount -- node )
    '[ _ + ] change-balance ;