<> <> <> <<>> DIRECTORY Rope USING [ROPE], Trc; TrcStandardClasses: CEDAR DEFINITIONS ~ BEGIN Class: TYPE ~ Trc.Class; ROPE: TYPE ~ Rope.ROPE; TRC: TYPE ~ Trc.TRC; Parm: TYPE ~ RECORD [name: ROPE, initialValue: REAL _ 0.5]; ParmInstance: TYPE ~ REF ParmInstanceRep; ParmInstanceRep: TYPE ~ RECORD [ SEQUENCE n: NAT OF REAL ]; NewIdentityTrc: PUBLIC PROC RETURNS [trc: TRC]; <> NewChainTrc: PUBLIC PROC [dependents: LIST OF TRC] RETURNS [trc: TRC]; ReplaceNthTrcInChain: PUBLIC PROC [chain, new: TRC, n: NAT, notify: BOOL _ TRUE]; <> ChainInfo: PROC [chain: TRC] RETURNS [n: NAT]; GetNthTrcInChain: PROC [chain: TRC, n: NAT] RETURNS [trc: TRC]; ExtendChain: PROC [chain: TRC, newLinks: NAT _ 1, atPosition: NAT _ NAT.LAST]; <> DeleteNthTrcInChain: PROC [chain: TRC, n: NAT, notify: BOOL _ TRUE]; CreateParametricSubclass: PUBLIC PROC [flavor: ATOM, fcn: Trc.Fcn, blockFcn: Trc.BlockFcn, parms: LIST OF Parm, register: BOOL _ TRUE] RETURNS [class: Trc.Class]; NewParametricTrc: PUBLIC PROC [class: Class] RETURNS [trc: TRC]; EnumerateRegisteredParametricClasses: PROC [proc: Trc.ClassEnumProc]; <> END.