********************************************************************
* NOTE: This file is generated automatically from the event * definition file Hull.evt. ********************************************************************INTERFACEHullAlgClass ; <*NOWARN*> IMPORT HullFmt, IntList, SiteList, Algorithm; <*NOWARN*> IMPORT AlgorithmClass; <* PRAGMA LL *> TYPE EventDataRec = RECORD stopAtSetup: BOOLEAN := TRUE; waitAtSetup: CARDINAL := 1; ctOfSetup: CARDINAL := 0; stopAtSetHalfPlane: BOOLEAN := TRUE; waitAtSetHalfPlane: CARDINAL := 1; ctOfSetHalfPlane: CARDINAL := 0; stopAtClearHead: BOOLEAN := TRUE; waitAtClearHead: CARDINAL := 1; ctOfClearHead: CARDINAL := 0; stopAtTestSite: BOOLEAN := TRUE; waitAtTestSite: CARDINAL := 1; ctOfTestSite: CARDINAL := 0; stopAtClearTest: BOOLEAN := TRUE; waitAtClearTest: CARDINAL := 1; ctOfClearTest: CARDINAL := 0; stopAtSetTail: BOOLEAN := TRUE; waitAtSetTail: CARDINAL := 1; ctOfSetTail: CARDINAL := 0; stopAtClearTail: BOOLEAN := TRUE; waitAtClearTail: CARDINAL := 1; ctOfClearTail: CARDINAL := 0; stopAtMoveHalfPlane: BOOLEAN := TRUE; waitAtMoveHalfPlane: CARDINAL := 1; ctOfMoveHalfPlane: CARDINAL := 0; stopAtConfirm: BOOLEAN := TRUE; waitAtConfirm: CARDINAL := 1; ctOfConfirm: CARDINAL := 0; stopAtDeny: BOOLEAN := TRUE; waitAtDeny: CARDINAL := 1; ctOfDeny: CARDINAL := 0; stopAtSwap: BOOLEAN := TRUE; waitAtSwap: CARDINAL := 1; ctOfSwap: CARDINAL := 0; stopAtSentinel: BOOLEAN := TRUE; waitAtSentinel: CARDINAL := 1; ctOfSentinel: CARDINAL := 0; stopAtReOrder: BOOLEAN := TRUE; waitAtReOrder: CARDINAL := 1; ctOfReOrder: CARDINAL := 0; stopAtStretch: BOOLEAN := TRUE; waitAtStretch: CARDINAL := 1; ctOfStretch: CARDINAL := 0; stopAtSnap: BOOLEAN := TRUE; waitAtSnap: CARDINAL := 1; ctOfSnap: CARDINAL := 0; stopAtShuffle: BOOLEAN := TRUE; waitAtShuffle: CARDINAL := 1; ctOfShuffle: CARDINAL := 0; END; T <: Public; Public = Algorithm.T OBJECT eventDataRec: EventDataRec; METHODS END; REVEAL Algorithm.T <: AlgorithmClass.T; END HullAlgClass.