Ajuste padrao Singleton, usando erlang:register/2