Update random-cooperation.lisp