Adding peering1 and peering2 examples for Haskell.