' *** PERIOD.LST *** 2nd GFA-Manual, page 16-14 ' *** Return SOUND-period of note&,octave& DEFFN period(note,octave)=DIV(125000,(55*2^(octave+SUB(note,10)/12))) ' *** '