module NetSpider.Snapshot
(
SnapshotNode,
nodeId,
isOnBoundary,
nodeTimestamp,
nodeAttributes,
SnapshotLink,
sourceNode,
destinationNode,
linkNodeTuple,
linkNodePair,
isDirected,
linkTimestamp,
linkAttributes
) where
import NetSpider.Snapshot.Internal
( SnapshotNode(..),
SnapshotLink(..),
linkNodeTuple,
linkNodePair
)
import NetSpider.Timestamp (Timestamp)
nodeId :: SnapshotNode n na -> n
nodeId = _nodeId
isOnBoundary :: SnapshotNode n na -> Bool
isOnBoundary = _isOnBoundary
nodeTimestamp :: SnapshotNode n na -> Maybe Timestamp
nodeTimestamp = _nodeTimestamp
nodeAttributes :: SnapshotNode n na -> Maybe na
nodeAttributes = _nodeAttributes
sourceNode :: SnapshotLink n la -> n
sourceNode = _sourceNode
destinationNode :: SnapshotLink n la -> n
destinationNode = _destinationNode
isDirected :: SnapshotLink n la -> Bool
isDirected = _isDirected
linkTimestamp :: SnapshotLink n la -> Timestamp
linkTimestamp = _linkTimestamp
linkAttributes :: SnapshotLink n la -> la
linkAttributes = _linkAttributes