new file:   sketches/Peels.hs