Some of my scribblings in Mathematica - wouldn't be very impressive...