testplan: added collide.floor, began detailing collide.blocks
picolisp: implemented test: collide.floor