<> <> <> <> <> DIRECTORY AlpineEnvironment USING[PageRun], AlpineInternal USING[LogRecordID, TransHandle]; LogMapPrivate: CEDAR DEFINITIONS = BEGIN Intention: TYPE = REF IntentionObject; IntentionObject: TYPE = RECORD[ trans: AlpineInternal.TransHandle, pageRun: AlpineEnvironment.PageRun, logRecordID: AlpineInternal.LogRecordID, checkedOut: BOOLEAN, rbColor: BOOLEAN, rbLLink, rbRLink: Intention]; END. <> <> <<>>