Wouldn't it perhaps be better to make "default-random-source"
a procedure? This would provide some error-checking in case
one assigns a new value. It could behave just like a "parameter"
returns the default random source and
sets it to a new value.