Some "arrow-prims.rkt" cleanup
Separated arrow into primitive and random parts; changed sampling
from an Omega-Rect to use refinement function