fomus-devel July 2005

fomus-devel@common-lisp.net

4 participants
13 discussions

[fomus-devel] :beat-division ?
by ml13＠onlinehome.de 29 Jul '05

29 Jul '05

Hi, I just have another question. I dont understand the meaning of :beat-division. For example, when I specify: :beat-division 2, I am expecting the grid for rounding offsets and durations to be: 0 0.5 1 1.5 ... So, if I have something like: (fomus-newnote 1 :off 0 :dur 0.3 :note 61) (fomus-newnote 1 :off 0.3 :dur 0.7 :note 40) it should become: (fomus-newnote 1 :off 0 :dur 0.5 :note 61) (fomus-newnote 1 :off 0.5 :dur 0.5 :note 40) Well, I can see that :beat-division really has a different meaning, could you give me a hint? Thanks, Kilian

1 0

[fomus-devel] (no subject)
by David Psenicka 28 Jul '05

28 Jul '05

Sorry for the lack of response, I didn't have the mailing list set up quite right so I didn't see the postings. :( I think most of these issues are already resolved--the quantizer should be able to handle anything as long as constraints are reasonable (maximum tuplet allowed, divisions per beat, etc.) Also, tiny notes that quantize to 0 duration will turn into grace notes.

2 2

[fomus-devel] FOMUS
by David Psenicka 27 Jul '05

27 Jul '05

I'd like to announce a new project, "Fomus." Fomus is a music notation tool in Lisp for computer music composers that converts "raw" musical data into an output file or files suitable for loading into several different notation programs. The purpose is to provide a better alternative to current options for importing data and formatting it into a score. The program tries to automate a variety of tasks including note spellings, distribution of notes across voices and staves, clef signatures, ottava brackets, combining notes and rests in multiple-voice parts, and (maybe one of the more useful functions) quantizing note offsets and durations by finding combinations of tuplets/beat divisions that minimize the amount of error. Support also exists for articulation markings including slurs, other markings like text and dynamics, and some special types of notation like tremolos, harmonics (some of these aren't implemented yet). It can also be used as a Common Music backend, and will use some of CM's functionality if present. Fomus is still in its initial testing/development stage so many bugs exist, some minor things aren't implemented yet (including backends--it only outputs LilyPond files at the moment), the documentation needs to be finished, the interface needs to be simplified, etc.. This project grew out of a smaller collection of Lisp functions I've been using over the past few years to notate my own pieces. The main website is at http://common-lisp.net/project/fomus/doc/ and contains instructions for CVS download. At the moment the program should compile in the latest versions of CMUCL and SBCL on Linux and CMUCL and OpenMCL in Darwin (it won't compile in Darwin SBCL at the moment). Any comments, feature requests and bug reports are welcome from anyone interested in using it and seeing it develop--there is a mailing list link on the website. (I apologize for the cross-posting.) -David Psenicka

1 0

[fomus-devel] interface 2
by ml13＠onlinehome.de 25 Jul '05

25 Jul '05

Hi, first of all congratulations to setting up this project!! I am quite amazed about what is already working and l like very much the general setup (the backends, the settings + init file, and the quantization seems to be quite strong, too :), e.g. I enjoyed quite a lot seeing proper quarter triplets, instead of tied over stuff). This is really great!! In fact, I have really started trying out things only this morning (so I cannot tell that much). For the moment, I stumbled over a little problem: (in-package :fm) (fomus-init :ensemble-type :orchestra) (fomus-newpart 1 :name "Piano" :instr :piano) (fomus-newnote 1 :off 0 :dur 2 :note 61) (fomus-exec) What am I missing here? I get an error inside the quant algorithm. I suppose, this is just my problem.... Cheers, Kilian Sprotte

1 0

[fomus-devel] anonymous login
by Rick Taube 23 Jul '05

23 Jul '05

The "problem" with anon cvs at common-lisp.net was the copy/past example: > # For reasonably modern clients: > cvs -z3 -d > :pserver:anonymous:anonymous@common-lisp.net:/project/<project-name>/ > cvsroot co <module> apparently :pserver:anonymous:anonymous... only works for some cvs clients. Anyway this works for downloading Fomus: cvs -z3 -d :pserver:anonymous@common-lisp.net:/project/fomus/cvsroot login cvs -z3 -d :pserver:anonymous@common-lisp.net:/project/fomus/cvsroot co fomus -rick

1 0

[fomus-devel] :composer and :title settings?
by Rick Taube 22 Jul '05

22 Jul '05

are the :composer and :title supposed to be working? they do appear in the generated .ly file but not in the resulting pdf. ;; -*-lisp-*- ;; FOMUS v0.1.1 ;; OpenMCL Version (Beta: Darwin) 0.14.3 (FOMUS :DEBUG-FILENAME "/tmp/fomus.dbg" :VERBOSE 2 :USE-CM T :CM-SCALE NIL :LOADXMLS-FUN :ASDF :BACKEND '(:LILYPOND :FILENAME "test.ly" :VIEW T) :BASE-FILENAME "/tmp/fomus" :GLOBAL NIL :PARTS '(#I(FOMUS:PART :ID NIL :PARTID 1 :NAME NIL :ABBREV NIL :INSTR :VIOLA :EVENTS (#I(FOMUS:NOTE :ID NIL :PARTID 1 :VOICE 1 :OFF 85/4 :DUR 1/4 :NOTE 51.343636 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID 1 :VOICE 1 :OFF 83/4 :DUR 1/2 :NOTE 73.70424 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID 1 :VOICE 1 :OFF 79/4 :DUR 1 :NOTE 72.46571 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID 1 :VOICE 1 :OFF 75/4 :DUR 1 :NOTE 67.59837 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID 1 :VOICE 1 :OFF 37/2 :DUR 1/4 :NOTE 83.012184 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID 1 :VOICE 1 :OFF 73/4 :DUR 1/4 :NOTE 88.936745 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID 1 :VOICE 1 :OFF 69/4 :DUR 1 :NOTE 85.05147 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID 1 :VOICE 1 :OFF 65/4 :DUR 1 :NOTE 84.17426 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID 1 :VOICE 1 :OFF 61/4 :DUR 1 :NOTE 57.55209 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID 1 :VOICE 1 :OFF 59/4 :DUR 1/2 :NOTE 72.09549 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID 1 :VOICE 1 :OFF 55/4 :DUR 1 :NOTE 59.53202 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID 1 :VOICE 1 :OFF 53/4 :DUR 1/2 :NOTE 85.77424 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID 1 :VOICE 1 :OFF 49/4 :DUR 1 :NOTE 70.00486 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID 1 :VOICE 1 :OFF 47/4 :DUR 1/2 :NOTE 71.040085 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID 1 :VOICE 1 :OFF 43/4 :DUR 1 :NOTE 63.979553 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID 1 :VOICE 1 :OFF 21/2 :DUR 1/4 :NOTE 79.26982 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID 1 :VOICE 1 :OFF 41/4 :DUR 1/4 :NOTE 56.663208 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID 1 :VOICE 1 :OFF 10 :DUR 1/4 :NOTE 64.85958 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID 1 :VOICE 1 :OFF 39/4 :DUR 1/4 :NOTE 91.22709 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID 1 :VOICE 1 :OFF 37/4 :DUR 1/2 :NOTE 78.9512 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID 1 :VOICE 1 :OFF 35/4 :DUR 1/2 :NOTE 67.674095 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID 1 :VOICE 1 :OFF 33/4 :DUR 1/2 :NOTE 84.08667 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID 1 :VOICE 1 :OFF 8 :DUR 1/4 :NOTE 65.932915 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID 1 :VOICE 1 :OFF 31/4 :DUR 1/4 :NOTE 84.203094 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID 1 :VOICE 1 :OFF 29/4 :DUR 1/2 :NOTE 77.43326 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID 1 :VOICE 1 :OFF 7 :DUR 1/4 :NOTE 61.944397 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID 1 :VOICE 1 :OFF 27/4 :DUR 1/4 :NOTE 64.957 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID 1 :VOICE 1 :OFF 25/4 :DUR 1/2 :NOTE 68.64221 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID 1 :VOICE 1 :OFF 23/4 :DUR 1/2 :NOTE 85.60951 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID 1 :VOICE 1 :OFF 11/2 :DUR 1/4 :NOTE 77.35074 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID 1 :VOICE 1 :OFF 5 :DUR 1/2 :NOTE 81.6767 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID 1 :VOICE 1 :OFF 4 :DUR 1 :NOTE 84.95224 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID 1 :VOICE 1 :OFF 7/2 :DUR 1/2 :NOTE 64.852776 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID 1 :VOICE 1 :OFF 5/2 :DUR 1 :NOTE 51.718925 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID 1 :VOICE 1 :OFF 9/4 :DUR 1/4 :NOTE 77.13191 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID 1 :VOICE 1 :OFF 7/4 :DUR 1/2 :NOTE 66.979935 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID 1 :VOICE 1 :OFF 3/2 :DUR 1/4 :NOTE 51.788128 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID 1 :VOICE 1 :OFF 5/4 :DUR 1/4 :NOTE 61.10151 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID 1 :VOICE 1 :OFF 1 :DUR 1/4 :NOTE 86.94888 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID 1 :VOICE 1 :OFF 0 :DUR 1 :NOTE 78.27983 :MARKS NIL)) :OPTS NIL)) :EVENTS NIL :CHECK-RANGES T :TRANSPOSE T :INSTRUMENTS NIL :INSTR-GROUPS NIL :ENSEMBLE-TYPE :ORCHESTRA :PERCUSSION NIL :TITLE "HiHo!" :SUBTITLE NIL :COMPOSER "Anon." :TIMESIG-STYLE NIL :TUPLET-STYLE NIL :QUANTIZE-ADJUST-GRACE-DURS T :DEFAULT-GRACE-DUR 1/2 :DEFAULT-GRACE-NUM 0 :EFFECTIVE-GRACE-DUR-MUL 1/2 :MIN-AUTO-TIMESIG-DUR 2 :DEFAULT-TIMESIG #I(FOMUS:TIMESIG-REPL :ID NIL :TIME (4 4) :COMP NIL :BEAT 1/4 :DIV NIL :PROPS NIL) :QUARTERTONES NIL :AUTO-ACCIDENTALS T :AUTO-CAUTIONARY-ACCS T :AUTO-STAFF/CLEF-CHANGES T :AUTO-OTTAVAS T :AUTO-GRACE-SLURS T :AUTO-VOICING T :AUTO-BEAMS T :AUTO-QUANTIZE T :AUTO-MULTIVOICE-RESTS T :AUTO-MULTIVOICE-NOTES T :AUTO-OVERRIDE-TIMESIGS T :SPLIT-FUN :DEFAULT :AUTO-ACCS-FUN :DEFAULT :AUTO-VOICES-FUN :DEFAULT :AUTO-DISTR-RESTS-FUN :DEFAULT :AUTO-MULTIVOICE-COMB-FUN :DEFAULT :AUTO-OTTAVAS-FUN :DEFAULT :AUTO-BEAM-FUN :DEFAULT :AUTO-QUANTIZE-FUN :DEFAULT :AUTO-STAFF/CLEFS-FUN :DEFAULT :USE-DEFAULT-MEAS-DIVS T :DEFAULT-MEAS-DIVS NIL :USE-DEFAULT-TUPLET-DIVS T :DEFAULT-TUPLET-DIVS NIL :BEAT-DIVISION 16 :MIN-TUPLET-DUR 1/2 :MAX-TUPLET-DUR 4 :MIN-SIMPLE-TUPLET-DUR 2 :MAX-TUPLET 7 :TUPLET-DOTTED-RESTS T :DOUBLE-DOTTED-NOTES T :DOTTED-NOTE-LEVEL T :SHORTLONGSHORT-NOTES-LEVEL T :SYNCOPATED-NOTES-LEVEL :TOP :ACC-ENGINE-HEAP 300 :ACC-IMPORTANCE-SCORE 15/16 :ACC-IMPORTANCE-STEPS 10 :VOICE-ENGINE-HEAP 300 :VOICE-IMPORTANCE-SCORE 15/16 :VOICE-IMPORTANCE-STEPS 10 :STAFF-ENGINE-HEAP 300 :STAFF-IMPORTANCE-SCORE 15/16 :STAFF-IMPORTANCE-STEPS 10 :ACC-DIATONIC-INT-SCORE 7/8 :ACC-AUG-DIM-INT-SCORE 1/2 :ACC-SPELLING-PENALTY 1/4 :ACC-GOOD-UNISON-SCORE 1 :ACC-BAD-UNISON-SCORE 3/8 :ACC-SIMILAR-QTONE-SCORE 1/3 :ACC-DIST-SCORE 1/3 :ACC-BEAT-DIST 2 :ACC-OCTAVE-DIST 1 :MAX-CAUT-ACC-DIST 2 :MAX-ACC-BEAT-DIST-MUL 3 :ACC-USE-DOUBLE NIL :ACC-THROUGHOUT-MEAS T :CAUT-ACC-OTTAVAS T :CAUT-ACC-OCTAVES 1 :CAUT-ACC-AFTER-ONE-MEAS NIL :VOICE-HIGH/LOW-PENALTY 1/3 :VOICE-SIMULT-PENALTY 1 :VOICE-CHORD-SCORE 1/12 :VOICE-LEADING-PENALTY 1/4 :VOICE-BALANCE-PENALTY 1/24 :VOICE-DIST-SCORE 1/3 :VOICE-OCTAVE-DIST 1 :VOICE-HIGH/LOW-BEAT-DIST 1/2 :VOICE-LEADING-BEAT-DIST 4 :VOICE-BALANCE-BEAT-DIST 12 :MAX-VOICE-BEAT-DIST-MUL 3 :CLEF-CHANGE-CLEF-PENALTY 1 :CLEF-CHANGE-STAFF-PENALTY 1/2 :CLEF-POLYPHONY-PERBEAT-PENALTY 1/8 :CLEF-ORDER-PERBEAT-PENALTY 1/8 :CLEF-FORCE-CLEF-CHANGE-DIST 2 :MAX-OTTAVA-REST-DIST 3 :BEAM-LARGE-EIGHTH-BEAM T :BEAM-LARGE-COMP-EIGHTH-BEAM T :BEAM-LARGE-EIGHTH-COUNT 3 :BEAM-LARGE-COMP-EIGHTH-COUNT 5 :MIN-MULTIVOICE-CHORDS-DUR 1 :GRANDSTAFF-HIDE-RESTS T :MIN-GRANDSTAFF-HIDE-RESTS-DUR 1 )

1 0

[fomus-devel] :quartertones t
by Rick Taube 22 Jul '05

22 Jul '05

well i like the new ":quartertone t" a lot more than the old ":auto-accs-fun :nokey1" ! but unfortunately im getting the same error i think: ? ;; Common Music package detected ;; FOMUS v0.1.1 ;; Lisp music notation formatter ;; Copyright (c) 2005 David Psenicka, All Rights Reserved ;; See file "COPYING" for terms of use and distribution. (load "/Lisp/fomus/load") (define *tempo* 60) (define *beat* 1/4) (define (ranpiano len lb ub ) (process repeat len for r = (pick 1/4 1/8 1/16) output (new fms:note :off (now) :partid ':piano :note (between lb ub) :dur (rhythm r)) wait (rhythm r))) (define piano (new fms:part :instr ':piano :partid ':piano )) (cd ) (events (ranpiano 20 40.0 80.0) "test.ly" :parts (list piano) :quartertones t :view t ) ;; Formatting music... ; Saving debug file "/tmp/fomus.dbg"... ; Checking types... ; Quantizing... ; Ranges... ; Transpositions... ; Accidentals... > Error in process listener(1): value T is not of the expected type REAL. > While executing: CCL::>-2 > Type :POP to abort. Type :? for other options. 1 > (:B ) (F0135B00) : 0 "CCL::>-2" 1792 (F0135B10) : 1 "CCL::<=-2" 32 (F0135B20) : 2 "<=" 224 (F0135B30) : 3 NIL NIL (F0135B40) : 4 "FOMUS::NOKEY-INTSCORE" 948 (F0135B50) : 5 "FOMUS::NOKEYQ-INTSCORE" 180 (F0135B60) : 6 "FOMUS::EXPANDFUN" 2752 (F0135B70) : 7 "FOMUS::A*-ENGINE" 1008 (F0135B80) : 8 "FOMUS::ACC-NOKEY" 544 (F0135B90) : 9 "FOMUS::ACCIDENTALS" 496 (F0135BA0) : 10 "FOMUS::FOMUS-PROC" 2744 (F0135BB0) : 11 "FOMUS::FOMUS-MAIN" 24 (F0135BC0) : 12 NIL NIL (F0135BD0) : 13 "FOMUS" 18156 (F0135BF0) : 14 "EVENTS" 464 (F0135C00) : 15 NIL NIL (F0135C10) : 16 "EVENTS" 864 (F0135C20) : 17 NIL NIL (F0135C30) : 18 "CCL::CALL-CHECK-REGS" 72 (F0135C40) : 19 NIL NIL (F0135C50) : 20 "CCL::TOPLEVEL-EVAL" 152 (F0135C60) : 21 "CCL::READ-LOOP" 844 (F0135CA0) : 22 "CCL:TOPLEVEL-LOOP" 44 (F0135CC0) : 23 "Anonymous Function #x6112C86" 68 (F0135CD0) : 24 NIL NIL (F0135CE0) : 25 "Anonymous Function #x6152356" 592 (F0135D00) : 26 "CCL::RUN-PROCESS-INITIAL-FORM" 400 (F0135D30) : 27 NIL NIL (F0135D40) : 28 "Anonymous Function #x610E7CE" 152 (F0135D60) : 29 "Anonymous Function #x61025AE" 172 1 > here is fomus.dbg ;; -*-lisp-*- ;; FOMUS v0.1.1 ;; OpenMCL Version (Beta: Darwin) 0.14.3 (FOMUS :DEBUG-FILENAME "/tmp/fomus.dbg" :VERBOSE 2 :USE-CM T :CM-SCALE NIL :LOADXMLS-FUN :ASDF :BACKEND '(:LILYPOND :FILENAME "test.ly" :VIEW T) :BASE-FILENAME "/tmp/fomus" :GLOBAL NIL :PARTS '(#I(FOMUS:PART :ID NIL :PARTID :PIANO :NAME NIL :ABBREV NIL :INSTR :PIANO :EVENTS (#I(FOMUS:NOTE :ID NIL :PARTID :PIANO :VOICE 1 :OFF 10 :DUR 1/2 :NOTE 74.23258 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID :PIANO :VOICE 1 :OFF 39/4 :DUR 1/4 :NOTE 61.876236 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID :PIANO :VOICE 1 :OFF 19/2 :DUR 1/4 :NOTE 73.499344 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID :PIANO :VOICE 1 :OFF 9 :DUR 1/2 :NOTE 61.546974 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID :PIANO :VOICE 1 :OFF 17/2 :DUR 1/2 :NOTE 52.72618 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID :PIANO :VOICE 1 :OFF 8 :DUR 1/2 :NOTE 53.756363 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID :PIANO :VOICE 1 :OFF 31/4 :DUR 1/4 :NOTE 56.069782 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID :PIANO :VOICE 1 :OFF 15/2 :DUR 1/4 :NOTE 41.573856 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID :PIANO :VOICE 1 :OFF 13/2 :DUR 1 :NOTE 42.31521 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID :PIANO :VOICE 1 :OFF 11/2 :DUR 1 :NOTE 43.41865 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID :PIANO :VOICE 1 :OFF 5 :DUR 1/2 :NOTE 78.99568 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID :PIANO :VOICE 1 :OFF 19/4 :DUR 1/4 :NOTE 44.70688 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID :PIANO :VOICE 1 :OFF 9/2 :DUR 1/4 :NOTE 76.27559 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID :PIANO :VOICE 1 :OFF 4 :DUR 1/2 :NOTE 64.238815 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID :PIANO :VOICE 1 :OFF 3 :DUR 1 :NOTE 53.841625 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID :PIANO :VOICE 1 :OFF 11/4 :DUR 1/4 :NOTE 64.45273 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID :PIANO :VOICE 1 :OFF 7/4 :DUR 1 :NOTE 65.44075 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID :PIANO :VOICE 1 :OFF 5/4 :DUR 1/2 :NOTE 68.1021 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID :PIANO :VOICE 1 :OFF 1 :DUR 1/4 :NOTE 78.36841 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID :PIANO :VOICE 1 :OFF 0 :DUR 1 :NOTE 44.015144 :MARKS NIL)) :OPTS NIL)) :EVENTS NIL :CHECK-RANGES T :TRANSPOSE T :INSTRUMENTS NIL :INSTR-GROUPS NIL :ENSEMBLE-TYPE :ORCHESTRA :PERCUSSION NIL :TITLE NIL :SUBTITLE NIL :COMPOSER NIL :TIMESIG-STYLE NIL :TUPLET-STYLE NIL :QUANTIZE-ADJUST-GRACE-DURS T :DEFAULT-GRACE-DUR 1/2 :DEFAULT-GRACE-NUM 0 :EFFECTIVE-GRACE-DUR-MUL 1/2 :MIN-AUTO-TIMESIG-DUR 2 :DEFAULT-TIMESIG #I(FOMUS:TIMESIG-REPL :ID NIL :TIME (4 4) :COMP NIL :BEAT 1/4 :DIV NIL :PROPS NIL) :QUARTERTONES T :AUTO-ACCIDENTALS T :AUTO-CAUTIONARY-ACCS T :AUTO-STAFF/CLEF-CHANGES T :AUTO-OTTAVAS T :AUTO-GRACE-SLURS T :AUTO-VOICING T :AUTO-BEAMS T :AUTO-QUANTIZE T :AUTO-MULTIVOICE-RESTS T :AUTO-MULTIVOICE-NOTES T :AUTO-OVERRIDE-TIMESIGS T :SPLIT-FUN :DEFAULT :AUTO-ACCS-FUN :DEFAULT :AUTO-VOICES-FUN :DEFAULT :AUTO-DISTR-RESTS-FUN :DEFAULT :AUTO-MULTIVOICE-COMB-FUN :DEFAULT :AUTO-OTTAVAS-FUN :DEFAULT :AUTO-BEAM-FUN :DEFAULT :AUTO-QUANTIZE-FUN :DEFAULT :AUTO-STAFF/CLEFS-FUN :DEFAULT :USE-DEFAULT-MEAS-DIVS T :DEFAULT-MEAS-DIVS NIL :USE-DEFAULT-TUPLET-DIVS T :DEFAULT-TUPLET-DIVS NIL :BEAT-DIVISION 16 :MIN-TUPLET-DUR 1/2 :MAX-TUPLET-DUR 4 :MIN-SIMPLE-TUPLET-DUR 2 :MAX-TUPLET 7 :TUPLET-DOTTED-RESTS T :DOUBLE-DOTTED-NOTES T :DOTTED-NOTE-LEVEL T :SHORTLONGSHORT-NOTES-LEVEL T :SYNCOPATED-NOTES-LEVEL :TOP :ACC-ENGINE-HEAP 300 :ACC-IMPORTANCE-SCORE 15/16 :ACC-IMPORTANCE-STEPS 10 :VOICE-ENGINE-HEAP 300 :VOICE-IMPORTANCE-SCORE 15/16 :VOICE-IMPORTANCE-STEPS 10 :STAFF-ENGINE-HEAP 300 :STAFF-IMPORTANCE-SCORE 15/16 :STAFF-IMPORTANCE-STEPS 10 :ACC-DIATONIC-INT-SCORE 7/8 :ACC-AUG-DIM-INT-SCORE 1/2 :ACC-SPELLING-PENALTY 1/4 :ACC-GOOD-UNISON-SCORE 1 :ACC-BAD-UNISON-SCORE 3/8 :ACC-SIMILAR-QTONE-SCORE 1/3 :ACC-DIST-SCORE 1/3 :ACC-BEAT-DIST 2 :ACC-OCTAVE-DIST 1 :MAX-CAUT-ACC-DIST 2 :MAX-ACC-BEAT-DIST-MUL 3 :ACC-USE-DOUBLE NIL :ACC-THROUGHOUT-MEAS T :CAUT-ACC-OTTAVAS T :CAUT-ACC-OCTAVES 1 :CAUT-ACC-AFTER-ONE-MEAS NIL :VOICE-HIGH/LOW-PENALTY 1/3 :VOICE-SIMULT-PENALTY 1 :VOICE-CHORD-SCORE 1/12 :VOICE-LEADING-PENALTY 1/4 :VOICE-BALANCE-PENALTY 1/24 :VOICE-DIST-SCORE 1/3 :VOICE-OCTAVE-DIST 1 :VOICE-HIGH/LOW-BEAT-DIST 1/2 :VOICE-LEADING-BEAT-DIST 4 :VOICE-BALANCE-BEAT-DIST 12 :MAX-VOICE-BEAT-DIST-MUL 3 :CLEF-CHANGE-CLEF-PENALTY 1 :CLEF-CHANGE-STAFF-PENALTY 1/2 :CLEF-POLYPHONY-PERBEAT-PENALTY 1/8 :CLEF-ORDER-PERBEAT-PENALTY 1/8 :CLEF-FORCE-CLEF-CHANGE-DIST 2 :MAX-OTTAVA-REST-DIST 3 :BEAM-LARGE-EIGHTH-BEAM T :BEAM-LARGE-COMP-EIGHTH-BEAM T :BEAM-LARGE-EIGHTH-COUNT 3 :BEAM-LARGE-COMP-EIGHTH-COUNT 5 :MIN-MULTIVOICE-CHORDS-DUR 1 :GRANDSTAFF-HIDE-RESTS T :MIN-GRANDSTAFF-HIDE-RESTS-DUR 1 )

1 0

[fomus-devel] CVS checkout?
by Han-Wen Nienhuys 21 Jul '05

21 Jul '05

Hi, As you might imagine, I'm a more than curious about fomus, how it performs and how it works, so I've been trying to check it out from CVS; I have little success though. AFAICT, the following command should work cvs -z3 -d :pserver:anonymous@common-lisp.net:/project/fomus/cvsroot co fomus but I'm failing. Could you include the CVS incantation on the webpage that I could readily cut & paste? Thanks! -- Han-Wen Nienhuys - hanwen(a)xs4all.nl - http://www.xs4all.nl/~hanwen

2 2

[fomus-devel] quarter tones
by Rick Taube 21 Jul '05

21 Jul '05

when i try to generate qtones doing: :auto-accs-fun :nokey-qtones1 then fomus breaks during the accidental phase. ive put the dbg file at the end (load "/Lisp/fomus/load") (define *tempo* 60) (define *beat* 1/4) (define (ranpiano len lb ub ) (process repeat len for r = (pick 1/4 1/8 1/16) output (new fms:note :off (now) :partid ':piano :note (between lb ub) :dur (rhythm r)) wait (rhythm r))) (define piano (new fms:part :instr ':piano :partid ':piano )) (cd ) ;;; quarter tones (events (ranpiano 20 40.0 80.0) "test.ly" :parts (list piano) :auto-accs-fun :nokey-qtones1 ;:view t ) #P"/Lisp/fomus/load.lisp" ? ? ? ? ? #P"/Users/hkt/" ? ;; Formatting music... ; Saving debug file "/tmp/fomus.dbg"... ; Checking types... ; Quantizing... ; Ranges... ; Transpositions... ; Accidentals... > Error in process listener(1): value T is not of the expected type REAL. > While executing: CCL::>-2 > Type :POP to abort. Type :? for other options. 1 > -------------------------ffomus.dbg ;; -*-lisp-*- ;; FOMUS v0.1.0 (FOMUS :DEBUG-FILENAME "/tmp/fomus.dbg" :VERBOSE 2 :USE-CM T :CM-SCALE NIL :LOADXMLS-FUN :ASDF :BACKEND '(:LILYPOND :FILENAME "test.ly" :VIEW NIL) :BASE-FILENAME "/tmp/fomus" :GLOBAL NIL :PARTS '(#I(FOMUS:PART :ID NIL :PARTID :PIANO :NAME NIL :ABBREV NIL :INSTR :PIANO :EVENTS (#I(FOMUS:NOTE :ID NIL :PARTID :PIANO :VOICE 1 :OFF 10 :DUR 1/2 :NOTE 74.23258 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID :PIANO :VOICE 1 :OFF 39/4 :DUR 1/4 :NOTE 61.876236 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID :PIANO :VOICE 1 :OFF 19/2 :DUR 1/4 :NOTE 73.499344 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID :PIANO :VOICE 1 :OFF 9 :DUR 1/2 :NOTE 61.546974 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID :PIANO :VOICE 1 :OFF 17/2 :DUR 1/2 :NOTE 52.72618 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID :PIANO :VOICE 1 :OFF 8 :DUR 1/2 :NOTE 53.756363 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID :PIANO :VOICE 1 :OFF 31/4 :DUR 1/4 :NOTE 56.069782 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID :PIANO :VOICE 1 :OFF 15/2 :DUR 1/4 :NOTE 41.573856 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID :PIANO :VOICE 1 :OFF 13/2 :DUR 1 :NOTE 42.31521 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID :PIANO :VOICE 1 :OFF 11/2 :DUR 1 :NOTE 43.41865 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID :PIANO :VOICE 1 :OFF 5 :DUR 1/2 :NOTE 78.99568 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID :PIANO :VOICE 1 :OFF 19/4 :DUR 1/4 :NOTE 44.70688 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID :PIANO :VOICE 1 :OFF 9/2 :DUR 1/4 :NOTE 76.27559 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID :PIANO :VOICE 1 :OFF 4 :DUR 1/2 :NOTE 64.238815 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID :PIANO :VOICE 1 :OFF 3 :DUR 1 :NOTE 53.841625 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID :PIANO :VOICE 1 :OFF 11/4 :DUR 1/4 :NOTE 64.45273 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID :PIANO :VOICE 1 :OFF 7/4 :DUR 1 :NOTE 65.44075 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID :PIANO :VOICE 1 :OFF 5/4 :DUR 1/2 :NOTE 68.1021 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID :PIANO :VOICE 1 :OFF 1 :DUR 1/4 :NOTE 78.36841 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID :PIANO :VOICE 1 :OFF 0 :DUR 1 :NOTE 44.015144 :MARKS NIL)) :OPTS NIL)) :EVENTS NIL :CHECK-RANGES T :TRANSPOSE T :INSTRUMENTS NIL :INSTR-GROUPS NIL :ENSEMBLE-TYPE :ORCHESTRA :PERCUSSION NIL :TITLE NIL :SUBTITLE NIL :COMPOSER NIL :TIMESIG-STYLE NIL :TUPLET-STYLE NIL :QUANTIZE-ADJUST-GRACE-DURS T :DEFAULT-GRACE-DUR 1/2 :DEFAULT-GRACE-NUM 0 :EFFECTIVE-GRACE-DUR-MUL 1/2 :MIN-AUTO-TIMESIG-DUR 2 :DEFAULT-TIMESIG #I(FOMUS:TIMESIG-REPL :ID NIL :TIME (4 4) :COMP NIL :BEAT 1/4 :DIV NIL :PROPS NIL) :AUTO-ACCIDENTALS T :AUTO-CAUTIONARY-ACCS T :AUTO-STAFF/CLEF-CHANGES T :AUTO-OTTAVAS T :AUTO-GRACE-SLURS T :AUTO-VOICING T :AUTO-BEAMS T :AUTO-QUANTIZE T :AUTO-MULTIVOICE-RESTS T :AUTO-MULTIVOICE-NOTES T :AUTO-OVERRIDE-TIMESIGS T :SPLIT-FUN :DEFAULT :AUTO-ACCS-FUN :NOKEY-QTONES1 :AUTO-VOICES-FUN :DEFAULT :AUTO-DISTR-RESTS-FUN :DEFAULT :AUTO-MULTIVOICE-COMB-FUN :DEFAULT :AUTO-OTTAVAS-FUN :DEFAULT :AUTO-BEAM-FUN :DEFAULT :AUTO-QUANTIZE-FUN :DEFAULT :AUTO-STAFF/CLEFS-FUN :DEFAULT :USE-DEFAULT-MEAS-DIVS T :DEFAULT-MEAS-DIVS NIL :USE-DEFAULT-TUPLET-DIVS T :DEFAULT-TUPLET-DIVS NIL :BEAT-DIVISION 16 :MIN-TUPLET-DUR 1/2 :MAX-TUPLET-DUR 4 :MIN-SIMPLE-TUPLET-DUR 2 :MAX-TUPLET 7 :TUPLET-DOTTED-RESTS T :DOUBLE-DOTTED-NOTES T :DOTTED-NOTE-LEVEL T :SHORTLONGSHORT-NOTES-LEVEL T :SYNCOPATED-NOTES-LEVEL :TOP :ACC-ENGINE-HEAP 300 :ACC-IMPORTANCE-SCORE 15/16 :ACC-IMPORTANCE-STEPS 10 :VOICE-ENGINE-HEAP 300 :VOICE-IMPORTANCE-SCORE 15/16 :VOICE-IMPORTANCE-STEPS 10 :STAFF-ENGINE-HEAP 300 :STAFF-IMPORTANCE-SCORE 15/16 :STAFF-IMPORTANCE-STEPS 10 :ACC-DIATONIC-INT-SCORE 7/8 :ACC-AUG-DIM-INT-SCORE 1/2 :ACC-SPELLING-PENALTY 1/4 :ACC-GOOD-UNISON-SCORE 1 :ACC-BAD-UNISON-SCORE 3/8 :ACC-SIMILAR-QTONE-SCORE 1/3 :ACC-DIST-SCORE 1/3 :ACC-BEAT-DIST 2 :ACC-OCTAVE-DIST 1 :MAX-CAUT-ACC-DIST 2 :MAX-ACC-BEAT-DIST-MUL 3 :ACC-USE-DOUBLE NIL :ACC-THROUGHOUT-MEAS T :CAUT-ACC-OTTAVAS T :CAUT-ACC-OCTAVES 1 :CAUT-ACC-AFTER-ONE-MEAS NIL :VOICE-HIGH/LOW-PENALTY 1/3 :VOICE-SIMULT-PENALTY 1 :VOICE-CHORD-SCORE 1/12 :VOICE-LEADING-PENALTY 1/4 :VOICE-BALANCE-PENALTY 1/24 :VOICE-DIST-SCORE 1/3 :VOICE-OCTAVE-DIST 1 :VOICE-HIGH/LOW-BEAT-DIST 1/2 :VOICE-LEADING-BEAT-DIST 4 :VOICE-BALANCE-BEAT-DIST 12 :MAX-VOICE-BEAT-DIST-MUL 3 :CLEF-CHANGE-CLEF-PENALTY 1 :CLEF-CHANGE-STAFF-PENALTY 1/2 :CLEF-POLYPHONY-PERBEAT-PENALTY 1/8 :CLEF-ORDER-PERBEAT-PENALTY 1/8 :CLEF-FORCE-CLEF-CHANGE-DIST 2 :MAX-OTTAVA-REST-DIST 3 :BEAM-LARGE-EIGHTH-BEAM T :BEAM-LARGE-COMP-EIGHTH-BEAM T :BEAM-LARGE-EIGHTH-COUNT 3 :BEAM-LARGE-COMP-EIGHTH-COUNT 5 :MIN-MULTIVOICE-CHORDS-DUR 1 :GRANDSTAFF-HIDE-RESTS T :MIN-GRANDSTAFF-HIDE-RESTS-DUR 1 )

1 0

[fomus-devel] FOMUS::CHECK-TYPE*
by Rick Taube 20 Jul '05

20 Jul '05

I still cant get this to work: (define *tempo* 60) (define *beat* 1/4) (define (ranpiano len lb ub ) (process repeat len for r = (pick 1/4 1/8 1/16) output (new fms:note :off (now) :partid ':piano :note (between lb ub) :dur (rhythm r)) wait (rhythm r))) (define piano (new fms:part :instr '(:grandstaff :piano) :partid ':piano )) (cd ) (events (ranpiano 20 40 80) "test.ly" :parts (list piano)) ? ;; Formatting music... ; Saving debug file "/tmp/fomus.dbg"... ; Checking types... > Error in process listener(1): Unknown type specifier: (FOMUS::KEY-ARG-PAIRS* :SYM :CLEFS :STAVES :MINP :MAXP :VOICELIM :TPOSE :CLEFLEGLS :8UPLEGLS :8DNLEGLS :PERCS) > While executing: CCL::%%TYPEP > Type :POP to abort. has something changed that I need to track? here is fomus.dbg: --------------------------- ;; -*-lisp-*- ;; FOMUS v0.1.0 (FOMUS :DEBUG-FILENAME "/tmp/fomus.dbg" :VERBOSE 2 :USE-CM T :CM-SCALE NIL :LOADXMLS-FUN :ASDF :BACKEND '(:LILYPOND :FILENAME "test.ly") :BASE-FILENAME "/tmp/fomus" :GLOBAL NIL :PARTS '(#I(FOMUS:PART :ID NIL :PARTID :PIANO :NAME NIL :ABBREV NIL :INSTR (:GRANDSTAFF :PIANO) :EVENTS (#I(FOMUS:NOTE :ID NIL :PARTID :PIANO :VOICE 1 :OFF 39/4 :DUR 1/2 :NOTE 73 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID :PIANO :VOICE 1 :OFF 37/4 :DUR 1/2 :NOTE 55 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID :PIANO :VOICE 1 :OFF 9 :DUR 1/4 :NOTE 54 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID :PIANO :VOICE 1 :OFF 35/4 :DUR 1/4 :NOTE 67 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID :PIANO :VOICE 1 :OFF 33/4 :DUR 1/2 :NOTE 58 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID :PIANO :VOICE 1 :OFF 8 :DUR 1/4 :NOTE 71 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID :PIANO :VOICE 1 :OFF 31/4 :DUR 1/4 :NOTE 60 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID :PIANO :VOICE 1 :OFF 29/4 :DUR 1/2 :NOTE 47 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID :PIANO :VOICE 1 :OFF 25/4 :DUR 1 :NOTE 64 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID :PIANO :VOICE 1 :OFF 23/4 :DUR 1/2 :NOTE 52 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID :PIANO :VOICE 1 :OFF 19/4 :DUR 1 :NOTE 41 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID :PIANO :VOICE 1 :OFF 17/4 :DUR 1/2 :NOTE 42 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID :PIANO :VOICE 1 :OFF 15/4 :DUR 1/2 :NOTE 74 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID :PIANO :VOICE 1 :OFF 7/2 :DUR 1/4 :NOTE 78 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID :PIANO :VOICE 1 :OFF 3 :DUR 1/2 :NOTE 52 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID :PIANO :VOICE 1 :OFF 11/4 :DUR 1/4 :NOTE 69 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID :PIANO :VOICE 1 :OFF 5/2 :DUR 1/4 :NOTE 43 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID :PIANO :VOICE 1 :OFF 3/2 :DUR 1 :NOTE 51 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID :PIANO :VOICE 1 :OFF 1 :DUR 1/2 :NOTE 78 :MARKS NIL) #I(FOMUS:NOTE :ID NIL :PARTID :PIANO :VOICE 1 :OFF 0 :DUR 1 :NOTE 50 :MARKS NIL)) :OPTS NIL)) :EVENTS NIL :CHECK-RANGES T :TRANSPOSE T :INSTRUMENTS NIL :INSTR-GROUPS NIL :ENSEMBLE-TYPE :ORCHESTRA :PERCUSSION NIL :TITLE NIL :SUBTITLE NIL :COMPOSER NIL :TIMESIG-STYLE NIL :TUPLET-STYLE NIL :QUANTIZE-ADJUST-GRACE-DURS T :DEFAULT-GRACE-DUR 1/2 :DEFAULT-GRACE-NUM 0 :EFFECTIVE-GRACE-DUR-MUL 1/2 :MIN-AUTO-TIMESIG-DUR 2 :DEFAULT-TIMESIG #I(FOMUS:TIMESIG-REPL :ID NIL :TIME (4 4) :COMP NIL :BEAT 1/4 :DIV NIL :PROPS NIL) :AUTO-ACCIDENTALS T :AUTO-CAUTIONARY-ACCS T :AUTO-STAFF/CLEF-CHANGES T :AUTO-OTTAVAS T :AUTO-GRACE-SLURS T :AUTO-VOICING T :AUTO-BEAMS T :AUTO-QUANTIZE T :AUTO-MULTIVOICE-RESTS T :AUTO-MULTIVOICE-NOTES T :AUTO-OVERRIDE-TIMESIGS T :SPLIT-FUN :DEFAULT :AUTO-ACCS-FUN :DEFAULT :AUTO-VOICES-FUN :DEFAULT :AUTO-DISTR-RESTS-FUN :DEFAULT :AUTO-MULTIVOICE-COMB-FUN :DEFAULT :AUTO-OTTAVAS-FUN :DEFAULT :AUTO-BEAM-FUN :DEFAULT :AUTO-QUANTIZE-FUN :DEFAULT :AUTO-STAFF/CLEFS-FUN :DEFAULT :USE-DEFAULT-MEAS-DIVS T :DEFAULT-MEAS-DIVS NIL :USE-DEFAULT-TUPLET-DIVS T :DEFAULT-TUPLET-DIVS NIL :BEAT-DIVISION 16 :MIN-TUPLET-DUR 1/2 :MAX-TUPLET-DUR 4 :MIN-SIMPLE-TUPLET-DUR 2 :MAX-TUPLET 7 :TUPLET-DOTTED-RESTS T :DOUBLE-DOTTED-NOTES T :DOTTED-NOTE-LEVEL T :SHORTLONGSHORT-NOTES-LEVEL T :SYNCOPATED-NOTES-LEVEL :TOP :ACC-ENGINE-HEAP 300 :ACC-IMPORTANCE-SCORE 15/16 :ACC-IMPORTANCE-STEPS 10 :VOICE-ENGINE-HEAP 300 :VOICE-IMPORTANCE-SCORE 15/16 :VOICE-IMPORTANCE-STEPS 10 :STAFF-ENGINE-HEAP 300 :STAFF-IMPORTANCE-SCORE 15/16 :STAFF-IMPORTANCE-STEPS 10 :ACC-DIATONIC-INT-SCORE 7/8 :ACC-AUG-DIM-INT-SCORE 1/2 :ACC-SPELLING-PENALTY 1/4 :ACC-GOOD-UNISON-SCORE 1 :ACC-BAD-UNISON-SCORE 3/8 :ACC-SIMILAR-QTONE-SCORE 1/3 :ACC-DIST-SCORE 1/3 :ACC-BEAT-DIST 2 :ACC-OCTAVE-DIST 1 :MAX-CAUT-ACC-DIST 2 :MAX-ACC-BEAT-DIST-MUL 3 :ACC-USE-DOUBLE NIL :ACC-THROUGHOUT-MEAS T :CAUT-ACC-OTTAVAS T :CAUT-ACC-OCTAVES 1 :CAUT-ACC-AFTER-ONE-MEAS NIL :VOICE-HIGH/LOW-PENALTY 1/3 :VOICE-SIMULT-PENALTY 1 :VOICE-CHORD-SCORE 1/12 :VOICE-LEADING-PENALTY 1/4 :VOICE-BALANCE-PENALTY 1/24 :VOICE-DIST-SCORE 1/3 :VOICE-OCTAVE-DIST 1 :VOICE-HIGH/LOW-BEAT-DIST 1/2 :VOICE-LEADING-BEAT-DIST 4 :VOICE-BALANCE-BEAT-DIST 12 :MAX-VOICE-BEAT-DIST-MUL 3 :CLEF-CHANGE-CLEF-PENALTY 1 :CLEF-CHANGE-STAFF-PENALTY 1/2 :CLEF-POLYPHONY-PERBEAT-PENALTY 1/8 :CLEF-ORDER-PERBEAT-PENALTY 1/8 :CLEF-FORCE-CLEF-CHANGE-DIST 2 :MAX-OTTAVA-REST-DIST 3 :BEAM-LARGE-EIGHTH-BEAM T :BEAM-LARGE-COMP-EIGHTH-BEAM T :BEAM-LARGE-EIGHTH-COUNT 3 :BEAM-LARGE-COMP-EIGHTH-COUNT 5 :MIN-MULTIVOICE-CHORDS-DUR 1 :GRANDSTAFF-HIDE-RESTS T :MIN-GRANDSTAFF-HIDE-RESTS-DUR 1 )

1 0

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

2009

2008

2007

2006

2005

fomus-devel July 2005