module Sharc.Instruments.TrumpetBach.Note11 (note11) where

import Sharc.Types

note11 :: Note
note11 = Note
    (Pitch 466.164 58 "a#4")
    12
    (Range
        (NoteRange
            (NoteRangeAmplitude 7924.78 17 15.91)
            (NoteRangeHarmonicFreq 1 466.16))
        (NoteRange
            (NoteRangeAmplitude 1398.49 3 5667.0)
            (NoteRangeHarmonicFreq 20 9323.27)))
    [Harmonic 1 0.524 2403.24
    ,Harmonic 2 1.226 3584.47
    ,Harmonic 3 1.393 5667.0
    ,Harmonic 4 1.504 3016.97
    ,Harmonic 5 1.956 2434.04
    ,Harmonic 6 1.173 2968.28
    ,Harmonic 7 0.579 1545.94
    ,Harmonic 8 1.241 659.2
    ,Harmonic 9 1.477 473.34
    ,Harmonic 10 1.488 273.35
    ,Harmonic 11 1.625 183.78
    ,Harmonic 12 1.802 167.51
    ,Harmonic 13 1.78 115.71
    ,Harmonic 14 2.544 65.75
    ,Harmonic 15 2.673 50.36
    ,Harmonic 16 2.801 33.26
    ,Harmonic 17 2.723 15.91
    ,Harmonic 18 2.864 25.57
    ,Harmonic 19 2.864 20.88
    ,Harmonic 20 (-3.052) 18.59]