Data.TTask.Types.Types

Documentation

type Point = Int

type Id = Int

type StatusLogRec = (TTaskContents, TStatusRecord)

newtype WorkTime

Constructors

WorkTime Double

Instances

Eq WorkTime

Methods

(==) :: WorkTime -> WorkTime -> Bool

(/=) :: WorkTime -> WorkTime -> Bool

Read WorkTime

Methods

readsPrec :: Int -> ReadS WorkTime

readList :: ReadS [WorkTime]

readPrec :: ReadPrec WorkTime

readListPrec :: ReadPrec [WorkTime]

Show WorkTime

Methods

showsPrec :: Int -> WorkTime -> ShowS

show :: WorkTime -> String

showList :: [WorkTime] -> ShowS

data TStatusRecord

Constructors

StatusWait LocalTime

StatusRunning LocalTime

StatusFinished LocalTime

StatusNotAchieved LocalTime

StatusReject LocalTime

Instances

Eq TStatusRecord

Methods

(==) :: TStatusRecord -> TStatusRecord -> Bool

(/=) :: TStatusRecord -> TStatusRecord -> Bool

Read TStatusRecord

Methods

readsPrec :: Int -> ReadS TStatusRecord

readList :: ReadS [TStatusRecord]

readPrec :: ReadPrec TStatusRecord

readListPrec :: ReadPrec [TStatusRecord]

Show TStatusRecord

Methods

showsPrec :: Int -> TStatusRecord -> ShowS

show :: TStatusRecord -> String

showList :: [TStatusRecord] -> ShowS

IsStatus TStatusRecord

Methods

status2Wait :: TStatusRecord -> Bool

status2Running :: TStatusRecord -> Bool

status2Finished :: TStatusRecord -> Bool

status2NotAchieved :: TStatusRecord -> Bool

status2Rejected :: TStatusRecord -> Bool

data TStatus

Constructors

TStatusCons TStatusRecord TStatus

TStatusOne TStatusRecord

Instances

Eq TStatus

Methods

(==) :: TStatus -> TStatus -> Bool

(/=) :: TStatus -> TStatus -> Bool

Read TStatus

Methods

readsPrec :: Int -> ReadS TStatus

readList :: ReadS [TStatus]

readPrec :: ReadPrec TStatus

readListPrec :: ReadPrec [TStatus]

Show TStatus

Methods

showsPrec :: Int -> TStatus -> ShowS

show :: TStatus -> String

showList :: [TStatus] -> ShowS

IsStatus TStatus

Methods

status2Wait :: TStatus -> Bool

status2Running :: TStatus -> Bool

status2Finished :: TStatus -> Bool

status2NotAchieved :: TStatus -> Bool

status2Rejected :: TStatus -> Bool

data Task

Constructors

Task

Fields

• _taskId :: Id
• _taskDescription :: String
• _taskPoint :: Int
• _taskStatus :: TStatus
• _taskWorkTimes :: [WorkTime]

Instances

Eq Task

Methods

(==) :: Task -> Task -> Bool

(/=) :: Task -> Task -> Bool

Read Task

Methods

readsPrec :: Int -> ReadS Task

readList :: ReadS [Task]

readPrec :: ReadPrec Task

readListPrec :: ReadPrec [Task]

Show Task

Methods

showsPrec :: Int -> Task -> ShowS

show :: Task -> String

showList :: [Task] -> ShowS

HasStatuses Task

Methods

getStatuses :: Task -> [StatusLogRec]

getLastStatuses :: Task -> [StatusLogRec]

HasPoint Task

Methods

calcPoint :: Task -> Point

data UserStory

Constructors

UserStory

Fields

• _storyId :: Id
• _storyDescription :: String
• _storyTasks :: [Task]
• _storyStatus :: TStatus

Instances

Eq UserStory

Methods

(==) :: UserStory -> UserStory -> Bool

(/=) :: UserStory -> UserStory -> Bool

Read UserStory

Methods

readsPrec :: Int -> ReadS UserStory

readList :: ReadS [UserStory]

readPrec :: ReadPrec UserStory

readListPrec :: ReadPrec [UserStory]

Show UserStory

Methods

showsPrec :: Int -> UserStory -> ShowS

show :: UserStory -> String

showList :: [UserStory] -> ShowS

HasStatuses UserStory

Methods

getStatuses :: UserStory -> [StatusLogRec]

getLastStatuses :: UserStory -> [StatusLogRec]

HasTask UserStory

Methods

getTask :: UserStory -> [Task]

HasPoint UserStory

Methods

calcPoint :: UserStory -> Point

data Sprint

Constructors

Sprint

Fields

• _sprintId :: Id
• _sprintDescription :: String
• _sprintStorys :: [UserStory]
• _sprintStatus :: TStatus

Instances

Eq Sprint

Methods

(==) :: Sprint -> Sprint -> Bool

(/=) :: Sprint -> Sprint -> Bool

Read Sprint

Methods

readsPrec :: Int -> ReadS Sprint

readList :: ReadS [Sprint]

readPrec :: ReadPrec Sprint

readListPrec :: ReadPrec [Sprint]

Show Sprint

Methods

showsPrec :: Int -> Sprint -> ShowS

show :: Sprint -> String

showList :: [Sprint] -> ShowS

HasStatuses Sprint

Methods

getStatuses :: Sprint -> [StatusLogRec]

getLastStatuses :: Sprint -> [StatusLogRec]

HasTask Sprint

Methods

getTask :: Sprint -> [Task]

HasPoint Sprint

Methods

calcPoint :: Sprint -> Point

data Project

Constructors

Project

Fields

• _projectName :: String
• _projectBacklog :: [UserStory]
• _projectSprints :: [Sprint]
• _projectStatus :: TStatus

Instances

Eq Project

Methods

(==) :: Project -> Project -> Bool

(/=) :: Project -> Project -> Bool

Read Project

Methods

readsPrec :: Int -> ReadS Project

readList :: ReadS [Project]

readPrec :: ReadPrec Project

readListPrec :: ReadPrec [Project]

Show Project

Methods

showsPrec :: Int -> Project -> ShowS

show :: Project -> String

showList :: [Project] -> ShowS

HasTask Project

Methods

getTask :: Project -> [Task]

HasPoint Project

Methods

calcPoint :: Project -> Point

data TTaskContents

Constructors

TTaskProject Project

TTaskSprint Sprint

TTaskStory UserStory

TTaskTask Task

Instances

HasPoint TTaskContents

Methods

calcPoint :: TTaskContents -> Point

taskId :: Lens' Task Id

taskDescription :: Lens' Task String

taskPoint :: Lens' Task Int

taskStatus :: Lens' Task TStatus

taskWorkTimes :: Lens' Task [WorkTime]

storyId :: Lens' UserStory Id

storyDescription :: Lens' UserStory String

storyTasks :: Lens' UserStory [Task]

storyStatus :: Lens' UserStory TStatus

sprintId :: Lens' Sprint Id

sprintDescription :: Lens' Sprint String

sprintStorys :: Lens' Sprint [UserStory]

sprintStatus :: Lens' Sprint TStatus

projectName :: Lens' Project String

projectBacklog :: Lens' Project [UserStory]

projectSprints :: Lens' Project [Sprint]

projectStatus :: Lens' Project TStatus