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

import Sharc.Types

note28 :: Note
note28 = Note
    (Pitch 659.255 64 "e5")
    29
    (Range
        (NoteRange
            (NoteRangeAmplitude 7911.06 12 0.93)
            (NoteRangeHarmonicFreq 1 659.25))
        (NoteRange
            (NoteRangeAmplitude 1318.51 2 1325.62)
            (NoteRangeHarmonicFreq 13 8570.31)))
    [Harmonic 1 (-1.578) 1060.09
    ,Harmonic 2 1.835 1325.62
    ,Harmonic 3 0.37 54.26
    ,Harmonic 4 0.56 11.09
    ,Harmonic 5 (-0.188) 23.44
    ,Harmonic 6 (-0.157) 151.41
    ,Harmonic 7 2.194 42.98
    ,Harmonic 8 (-2.485) 5.94
    ,Harmonic 9 2.716 16.92
    ,Harmonic 10 0.461 33.76
    ,Harmonic 11 (-0.521) 3.8
    ,Harmonic 12 (-1.428) 0.93
    ,Harmonic 13 (-0.961) 2.66]