module View.Payments
  ( renderPayments
  ) where

import Html exposing (..)
import Html.Attributes exposing (..)

import Model.Payment exposing (Payments)
import Model.View.PaymentView exposing (PaymentView)

import View.Payments.Add exposing (addPayment)
import View.Payments.Table exposing (paymentsTable)

renderPayments : PaymentView -> Html
renderPayments paymentView =
  div
    [ class "payments" ]
    [ addPayment paymentView.add
    , paymentsTable paymentView.payments
    ]