An erlang experiment computing gravity of given points and mutual movement of these points