module Sharc.Instruments.ViolaMarteleBowing.Note21 (note21) where

import Sharc.Types

note21 :: Note
note21 = Note
    (Pitch 466.164 58 "a#4")
    22
    (Range
        (NoteRange
            (NoteRangeAmplitude 9323.27 20 23.75)
            (NoteRangeHarmonicFreq 1 466.16))
        (NoteRange
            (NoteRangeAmplitude 932.32 2 9241.0)
            (NoteRangeHarmonicFreq 21 9789.44)))
    [Harmonic 1 2.151 1534.03
    ,Harmonic 2 0.502 9241.0
    ,Harmonic 3 2.061 7184.75
    ,Harmonic 4 0.458 1424.48
    ,Harmonic 5 (-3.047) 241.41
    ,Harmonic 6 2.324 2495.24
    ,Harmonic 7 0.415 558.7
    ,Harmonic 8 2.933 357.12
    ,Harmonic 9 (-1.08) 846.25
    ,Harmonic 10 2.658 374.78
    ,Harmonic 11 2.523 284.16
    ,Harmonic 12 1.434 84.72
    ,Harmonic 13 1.258 172.76
    ,Harmonic 14 7.9e-2 133.88
    ,Harmonic 15 (-0.854) 176.44
    ,Harmonic 16 (-1.891) 229.93
    ,Harmonic 17 (-2.556) 35.37
    ,Harmonic 18 2.373 63.49
    ,Harmonic 19 1.748 62.38
    ,Harmonic 20 (-2.348) 23.75
    ,Harmonic 21 (-1.042) 31.27]