(load "load4")
(setf *game-length* 10000)
(experiment 1 5 wftt afe5)
(quit)
