An interactove elevator simulation in erlang