module Model.IncomeResource ( IncomeResource(..) ) where import Common.Model (Income (..)) import Resource (Resource, resourceCreatedAt, resourceDeletedAt, resourceEditedAt) newtype IncomeResource = IncomeResource Income instance Resource IncomeResource where resourceCreatedAt (IncomeResource i) = _income_createdAt i resourceEditedAt (IncomeResource i) = _income_editedAt i resourceDeletedAt (IncomeResource i) = _income_deletedAt i