Chord.mesa
Copyright (C) 1981, 1984 Xerox Corporation. All rights reserved.
Author: John Maxwell
last modified: November 28, 1981 8: 43 AM
Edited by Doug Wyatt, June 14, 1984 5:14:14 pm PDT
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.