Incantations initiales

> restart:

> with(pldx): with(simul);

Warning, the name ever_loaded has been redefined

> macro(moy=stats[describe,mean], var= stats[describe,variance]);

> rand():

> ra:= proc () global _seed; _seed := irem(427419669081*_seed,999999999989);
evalf(_seed/999999999989);
end proc:

> interface(rtablesize=50);