Falling Diamonds solutions

Falling Diamonds was solved using Lisp by 2 contestants. Solution sizes: average 2191 bytes (shortest: 747; longest: 2948).