<> <> <> <> <> DIRECTORY MusicDefs; Chord: CEDAR DEFINITIONS = BEGIN OPEN MusicDefs; default: INTEGER = 1000; AddNote: PROC[c: ChordPTR, n: NotePTR]; RemoveNote: PROC[c: ChordPTR, n: NotePTR]; Sort: PROC[c: ChordPTR, up: BOOL] RETURNS[n: CARDINAL]; Adjust: PROC[c: ChordPTR]; Draw: PROC[c: ChordPTR, stem: INTEGER _ default]; SetDefaultStem: PROC[c: ChordPTR]; <<(formerly) INLINE Procedures>> Beam: PROC[c: ChordPTR] RETURNS[BeamPTR]; GetHeapIndex: PROC[c: ChordPTR] RETURNS[NAT]; Grace: PROC[c: ChordPTR] RETURNS[BOOL]; InVoice: PROC[c: ChordPTR, voice: NAT] RETURNS[BOOL]; Length: PROC[c: ChordPTR] RETURNS[NAT]; Width: PROC[c: ChordPTR] RETURNS[INTEGER]; END.