#births ( game -- n )

Vocabulary

hamurabi.private

Inputs

game

an object

Outputs

n

an object

Definition

USING: accessors combinators math ;

IN: hamurabi.private

: #births ( game -- n )
    {
        [ acres>> 20 * ]
        [ stores>> + ]
        [ birth-factor>> * ]
        [ population>> / ]
    } cleave 100 /i 1 + ;