Happy Numbers (Long) in Haskell in Bytes Play Hole

1^st in Haskell and 100^th overall.

Last tested 10 days ago.