(if (equalp (clnl-nvm:agent-value :pcolor) (clnl-nvm:lookup-color :green))
(setf (clnl-nvm:agent-value :countdown) grass-regrowth-time)
(setf (clnl-nvm:agent-value :countdown) (clnl-nvm:random grass-regrowth-time))))))
(if (equalp (clnl-nvm:agent-value :pcolor) (clnl-nvm:lookup-color :green))
(setf (clnl-nvm:agent-value :countdown) grass-regrowth-time)
(setf (clnl-nvm:agent-value :countdown) (clnl-nvm:random grass-regrowth-time))))))