adjust-acres ( game n -- game )


Vocabulary
hamurabi.private

Inputs
gamean object
nan object


Outputs
gamean object


Definition
USING: accessors kernel math ;

IN: hamurabi.private

: adjust-acres ( game n -- game )
[ [ + ] curry change-acres ]
[ over cost>> * [ - ] curry change-stores ] bi ;