module Model.PaymentResource ( PaymentResource(..) ) where import Common.Model (Payment (..)) import Resource (Resource, resourceCreatedAt, resourceDeletedAt, resourceEditedAt) newtype PaymentResource = PaymentResource Payment instance Resource PaymentResource where resourceCreatedAt (PaymentResource p) = _payment_createdAt p resourceEditedAt (PaymentResource p) = _payment_editedAt p resourceDeletedAt (PaymentResource p) = _payment_deletedAt p