<> <> <> <> <> <> DIRECTORY AlpineEnvironment, AlpineImport USING [Handle]; ConversationTable: DEFINITIONS = BEGIN Conversation: TYPE = AlpineEnvironment.Conversation; Initialize: PROC [nSlots: NAT]; <> Fetch: PROC [s: AlpineImport.Handle] RETURNS [Conversation]; <> <> <> Erase: PROC [s: AlpineImport.Handle, c: Conversation]; <> <> END.--ConversationTable <> <> <<>>