{-# OPTIONS_GHC -Wall #-}
{-# LANGUAGE TemplateHaskell #-}

module Data.Aviation.Casr.Logbook.Meta.ExamExpense(
  ExamExpense(ExamExpense)
, HasExamExpense(..)
) where

import Control.Lens(makeClassy)
import Data.Eq(Eq)
import Data.Int(Int)
import Data.Ord(Ord)
import Data.String(String)
import Prelude(Show)

data ExamExpense =
  ExamExpense {
    ExamExpense -> Int
_examexpenseamount :: Int
  , ExamExpense -> String
_examexpensename :: String
  } deriving (ExamExpense -> ExamExpense -> Bool
(ExamExpense -> ExamExpense -> Bool)
-> (ExamExpense -> ExamExpense -> Bool) -> Eq ExamExpense
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ExamExpense -> ExamExpense -> Bool
== :: ExamExpense -> ExamExpense -> Bool
$c/= :: ExamExpense -> ExamExpense -> Bool
/= :: ExamExpense -> ExamExpense -> Bool
Eq, Eq ExamExpense
Eq ExamExpense =>
(ExamExpense -> ExamExpense -> Ordering)
-> (ExamExpense -> ExamExpense -> Bool)
-> (ExamExpense -> ExamExpense -> Bool)
-> (ExamExpense -> ExamExpense -> Bool)
-> (ExamExpense -> ExamExpense -> Bool)
-> (ExamExpense -> ExamExpense -> ExamExpense)
-> (ExamExpense -> ExamExpense -> ExamExpense)
-> Ord ExamExpense
ExamExpense -> ExamExpense -> Bool
ExamExpense -> ExamExpense -> Ordering
ExamExpense -> ExamExpense -> ExamExpense
forall a.
Eq a =>
(a -> a -> Ordering)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> a)
-> (a -> a -> a)
-> Ord a
$ccompare :: ExamExpense -> ExamExpense -> Ordering
compare :: ExamExpense -> ExamExpense -> Ordering
$c< :: ExamExpense -> ExamExpense -> Bool
< :: ExamExpense -> ExamExpense -> Bool
$c<= :: ExamExpense -> ExamExpense -> Bool
<= :: ExamExpense -> ExamExpense -> Bool
$c> :: ExamExpense -> ExamExpense -> Bool
> :: ExamExpense -> ExamExpense -> Bool
$c>= :: ExamExpense -> ExamExpense -> Bool
>= :: ExamExpense -> ExamExpense -> Bool
$cmax :: ExamExpense -> ExamExpense -> ExamExpense
max :: ExamExpense -> ExamExpense -> ExamExpense
$cmin :: ExamExpense -> ExamExpense -> ExamExpense
min :: ExamExpense -> ExamExpense -> ExamExpense
Ord, Int -> ExamExpense -> ShowS
[ExamExpense] -> ShowS
ExamExpense -> String
(Int -> ExamExpense -> ShowS)
-> (ExamExpense -> String)
-> ([ExamExpense] -> ShowS)
-> Show ExamExpense
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> ExamExpense -> ShowS
showsPrec :: Int -> ExamExpense -> ShowS
$cshow :: ExamExpense -> String
show :: ExamExpense -> String
$cshowList :: [ExamExpense] -> ShowS
showList :: [ExamExpense] -> ShowS
Show)

makeClassy ''ExamExpense