Removed 238 (was work for 438)
Some early work on 438 (finished in Mathematica).