BishBosh.State.TurnsByLogicalColour

AUTHOR

Dr. Alistair Ward

DESCRIPTION

The ordered sequence of turns made by the players of each logical colour.

Types

Type-synonyms

Data-types

data TurnsByLogicalColour turn

The type used to hold a record of each player's turns.

Instances

Eq turn => Eq (TurnsByLogicalColour turn)

Methods

(==) :: TurnsByLogicalColour turn -> TurnsByLogicalColour turn -> Bool

(/=) :: TurnsByLogicalColour turn -> TurnsByLogicalColour turn -> Bool

(Read turn, Show turn) => Read (TurnsByLogicalColour turn)

Methods

readsPrec :: Int -> ReadS (TurnsByLogicalColour turn)

readList :: ReadS [TurnsByLogicalColour turn]

readPrec :: ReadPrec (TurnsByLogicalColour turn)

readListPrec :: ReadPrec [TurnsByLogicalColour turn]

Show turn => Show (TurnsByLogicalColour turn)

Methods

showsPrec :: Int -> TurnsByLogicalColour turn -> ShowS

show :: TurnsByLogicalColour turn -> String

showList :: [TurnsByLogicalColour turn] -> ShowS

NFData turn => NFData (TurnsByLogicalColour turn)

Methods

rnf :: TurnsByLogicalColour turn -> ()

Default (TurnsByLogicalColour turn)

Methods

def :: TurnsByLogicalColour turn

Empty (TurnsByLogicalColour turn)

Methods

empty :: TurnsByLogicalColour turn

Null (TurnsByLogicalColour turn)

Methods

isNull :: TurnsByLogicalColour turn -> Bool

ReflectableOnX turn => ReflectableOnX (TurnsByLogicalColour turn)

Methods

reflectOnX :: TurnsByLogicalColour turn -> TurnsByLogicalColour turn

Functions

inferNextLogicalColour :: TurnsByLogicalColour turn -> LogicalColour

• Derive the logical colour of the next player to move.
• CAVEAT: the result can't be guaranteed if reflectOnX has been called.

countPlies :: TurnsByLogicalColour turn -> NPlies

• Count the number of plies.
• N.B.: getNPlies is more efficient.

dereference :: LogicalColour -> TurnsByLogicalColour turn -> [turn]

Dereference.

Constructors

fromAssocs :: Show turn => [(LogicalColour, [turn])] -> TurnsByLogicalColour turn

Smart constructor.

Mutators

update :: TurnsByLogicalColour turn -> [(LogicalColour, [turn])] -> TurnsByLogicalColour turn

Update.

prepend :: LogicalColour -> turn -> Transformation turn

Prepend the specified turn.