Random seed per worker

random:seed/1 uses the process dictionary. I know this is test code but someone might learn from it. Thanks. -- Andras