v0.001 Problems with global and local variables

Problems with global and local variables. Work correctly (?) on "day"
level, but doesn't give right result on "life" level. Tried to solve it
with assign (envir= parent.frame).