OUTFLOWS:
STOCK_3_OUT ¼ IF ALL_DICE ¼ 21 THEN STOCK_3 ELSE 0
STOCK_4(t) ¼ STOCK_4(t À dt) + (RAND_4 À STOCK_4_OUT) * dt
INIT STOCK_4 ¼ 0
INFLOWS:
RAND_4 ¼ IF (STOCK_4 ¼ 0 AND DIE_4 <> STOCK_1 AND DIE_4
<>STOCK_2 AND DIE_4<>STOCK_3 AND DIE_4<>STOCK_5 AND
DIE_4<>STOCK_6 AND DIE_4<>DIE_6 AND DIE_4<>DIE_5 AND
DIE_4<>DIE_3 AND DIE_4<>DIE_2) THEN DIE_4 ELSE 0
OUTFLOWS:
STOCK_4_OUT ¼ IF ALL_DICE ¼ 21 THEN STOCK_4 ELSE 0
STOCK_5(t) ¼ STOCK_5(t À dt) + (RAND_5 À STOCK_5_OUT) * dt
INIT STOCK_5 ¼ 0
INFLOWS:
RAND_5 ¼ IF (STOCK_5 ¼ 0 AND DIE_5 <> STOCK_1 AND DIE_5
<>STOCK_2 AND DIE_5<>STOCK_3 AND DIE_5<>STOCK_4 AND
DIE_5<>STOCK_6 AND DIE_5<>DIE_6 AND DIE_5<>DIE_4 AND
DIE_5<>DIE_3 AND DIE_5<>DIE_2) THEN DIE_5 ELSE 0
OUTFLOWS:
STOCK_5_OUT ¼ IF ALL_DICE ¼ 21 THEN STOCK_5 ELSE 0
STOCK_6(t) ¼ STOCK_6(t À dt) + (RAND_6 À STOCK_6_OUT) * dt
INIT STOCK_6 ¼ 0
INFLOWS:
RAND_6 ¼ IF (STOCK_6 ¼ 0 AND DIE_6 <> STOCK_1 AND DIE_6
<>STOCK_2 AND DIE_6<>STOCK_3 AND DIE_6<>STOCK_4 AND
DIE_6<>STOCK_5 AND DIE_6<>DIE_5 AND DIE_6<>DIE_4 AND
DIE_6<>DIE_3 AND DIE_6<>DIE_2) THEN DIE_6 ELSE 0
OUTFLOWS:
STOCK_6_OUT ¼ IF ALL_DICE ¼ 21 THEN STOCK_6 ELSE 0
WORM_1(t) ¼ WORM_1(t À dt) + (NEW_WORM_1 À WORM_1_OUT) * dt
INIT WORM_1 ¼ 1
INFLOWS:
NEW_WORM_1 ¼ IF (LIFE_1>0 AND COIN_1<.5) THEN LIFE_1À1
ELSE IF (LIFE_1>0 AND COIN_1>.5) THEN LIFE_1+1
ELSE 0
OUTFLOWS:
WORM_1_OUT ¼ IF ALL_DICE ¼ 21 THEN WORM_1 ELSE 0
WORM_2(t) ¼ WORM_2(t À dt) + (NEW_WORM_2 À WORM_2_OUT) * dt
INIT WORM_2 ¼ 2
116
13 Artificial Worms