module Sharc.Instruments.ClarinetEflat.Note28 (note28) where

import Sharc.Types

note28 :: Note
note28 = Note
    (Pitch 987.767 71 "b5")
    29
    (Range
        (NoteRange
            (NoteRangeAmplitude 9877.67 10 11.1)
            (NoteRangeHarmonicFreq 1 987.76))
        (NoteRange
            (NoteRangeAmplitude 987.76 1 3440.0)
            (NoteRangeHarmonicFreq 10 9877.67)))
    [Harmonic 1 (-1.843) 3440.0
    ,Harmonic 2 (-0.219) 952.35
    ,Harmonic 3 2.102 748.2
    ,Harmonic 4 (-2.254) 67.26
    ,Harmonic 5 (-1.705) 21.03
    ,Harmonic 6 (-2.63) 93.53
    ,Harmonic 7 (-0.985) 84.86
    ,Harmonic 8 (-0.884) 17.7
    ,Harmonic 9 1.383 19.16
    ,Harmonic 10 (-3.031) 11.1]