Better names for some functions
optmization wip2
reduce + mapcar -> mapcan
optimzation complete