module Sharc.Instruments.ViolaMuted.Note31 (note31) where

import Sharc.Types

note31 :: Note
note31 = Note
    (Pitch 783.991 67 "g5")
    32
    (Range
        (NoteRange
            (NoteRangeAmplitude 6271.92 8 86.8)
            (NoteRangeHarmonicFreq 1 783.99))
        (NoteRange
            (NoteRangeAmplitude 2351.97 3 2272.0)
            (NoteRangeHarmonicFreq 12 9407.89)))
    [Harmonic 1 1.787 2194.1
    ,Harmonic 2 0.646 469.69
    ,Harmonic 3 (-7.1e-2) 2272.0
    ,Harmonic 4 2.803 1176.48
    ,Harmonic 5 1.209 1819.44
    ,Harmonic 6 2.278 887.87
    ,Harmonic 7 (-1.628) 574.63
    ,Harmonic 8 2.261 86.8
    ,Harmonic 9 2.255 194.82
    ,Harmonic 10 0.841 290.28
    ,Harmonic 11 (-0.687) 90.75
    ,Harmonic 12 1.661 128.19]