merge fmap with (=>>)
Refactor some CircList.hs

- use record syntax and export accessors
- change mkCircList to take 3 parameters
- remove isWrap
- add dual (unused so far)
Add list of randoms to Car.
Let cars delay with a probability of 1/5th