I have adapted the proof assistant Yarrow (programmed by Jan Zwanenburg) to Haskell 98:
( See also http://www.cs.kun.nl/~janz/yarrow. )