module Sharc.Instruments.TrumpetMutedC.Note22 (note22) where

import Sharc.Types

note22 :: Note
note22 = Note
    (Pitch 659.255 64 "e5")
    23
    (Range
        (NoteRange
            (NoteRangeAmplitude 1318.51 2 162.55)
            (NoteRangeHarmonicFreq 1 659.25))
        (NoteRange
            (NoteRangeAmplitude 7251.8 11 1572.0)
            (NoteRangeHarmonicFreq 15 9888.82)))
    [Harmonic 1 1.113 854.88
    ,Harmonic 2 (-1.663) 162.55
    ,Harmonic 3 0.985 425.4
    ,Harmonic 4 (-0.896) 296.0
    ,Harmonic 5 0.66 846.26
    ,Harmonic 6 2.426 424.65
    ,Harmonic 7 1.285 279.1
    ,Harmonic 8 0.743 1530.96
    ,Harmonic 9 (-0.773) 681.59
    ,Harmonic 10 0.978 1372.38
    ,Harmonic 11 (-2.728) 1572.0
    ,Harmonic 12 (-2.035) 702.94
    ,Harmonic 13 0.663 258.47
    ,Harmonic 14 1.063 689.42
    ,Harmonic 15 2.017 256.89]