Update TriangularNumber.hs