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

import Sharc.Types

note28 :: Note
note28 = Note
    (Pitch 987.767 71 "b5")
    29
    (Range
        (NoteRange
            (NoteRangeAmplitude 8889.9 9 16.15)
            (NoteRangeHarmonicFreq 1 987.76))
        (NoteRange
            (NoteRangeAmplitude 987.76 1 1981.0)
            (NoteRangeHarmonicFreq 10 9877.67)))
    [Harmonic 1 1.689 1981.0
    ,Harmonic 2 0.675 832.22
    ,Harmonic 3 (-0.549) 215.74
    ,Harmonic 4 0.541 35.25
    ,Harmonic 5 (-1.217) 66.16
    ,Harmonic 6 2.434 42.05
    ,Harmonic 7 1.751 141.14
    ,Harmonic 8 (-2.409) 83.17
    ,Harmonic 9 (-2.165) 16.15
    ,Harmonic 10 (-0.279) 17.89]