module Sharc.Instruments.EnglishHorn.Note26 (note26) where

import Sharc.Types

note26 :: Note
note26 = Note
    (Pitch 739.989 66 "f#5")
    27
    (Range
        (NoteRange
            (NoteRangeAmplitude 8879.86 12 1.08)
            (NoteRangeHarmonicFreq 1 739.98))
        (NoteRange
            (NoteRangeAmplitude 739.98 1 4352.0)
            (NoteRangeHarmonicFreq 13 9619.85)))
    [Harmonic 1 (-1.6) 4352.0
    ,Harmonic 2 (-2.075) 1308.99
    ,Harmonic 3 1.511 148.5
    ,Harmonic 4 (-0.376) 242.9
    ,Harmonic 5 1.538 282.62
    ,Harmonic 6 3.048 163.08
    ,Harmonic 7 (-1.924) 45.89
    ,Harmonic 8 (-3.026) 16.73
    ,Harmonic 9 0.828 12.47
    ,Harmonic 10 2.674 9.31
    ,Harmonic 11 (-0.394) 3.29
    ,Harmonic 12 (-2.29) 1.08
    ,Harmonic 13 (-1.714) 3.04]