module Sharc.Instruments.TrumpetC.Note12 (note12) where

import Sharc.Types

note12 :: Note
note12 = Note
    (Pitch 369.994 54 "f#4")
    13
    (Range
        (NoteRange
            (NoteRangeAmplitude 9619.84 26 2.19)
            (NoteRangeHarmonicFreq 1 369.99))
        (NoteRange
            (NoteRangeAmplitude 1109.98 3 3538.0)
            (NoteRangeHarmonicFreq 26 9619.84)))
    [Harmonic 1 0.731 1797.34
    ,Harmonic 2 0.937 2135.67
    ,Harmonic 3 1.269 3538.0
    ,Harmonic 4 1.683 2258.06
    ,Harmonic 5 2.12 1252.95
    ,Harmonic 6 1.786 1346.08
    ,Harmonic 7 1.591 921.35
    ,Harmonic 8 1.573 733.54
    ,Harmonic 9 1.521 405.86
    ,Harmonic 10 1.702 204.13
    ,Harmonic 11 1.876 120.36
    ,Harmonic 12 1.908 106.97
    ,Harmonic 13 2.316 80.66
    ,Harmonic 14 2.554 72.97
    ,Harmonic 15 2.809 54.41
    ,Harmonic 16 2.78 28.14
    ,Harmonic 17 2.688 27.13
    ,Harmonic 18 2.927 28.02
    ,Harmonic 19 (-2.89) 19.91
    ,Harmonic 20 (-2.375) 16.63
    ,Harmonic 21 (-2.084) 10.88
    ,Harmonic 22 (-1.914) 3.58
    ,Harmonic 23 (-2.782) 4.0
    ,Harmonic 24 (-3.046) 4.4
    ,Harmonic 25 (-2.751) 3.07
    ,Harmonic 26 (-1.453) 2.19]