module Sharc.Instruments.BassFlute.Note13 (note13) where

import Sharc.Types

note13 :: Note
note13 = Note
    (Pitch 277.183 49 "c#4")
    14
    (Range
        (NoteRange
            (NoteRangeAmplitude 9424.22 34 0.32)
            (NoteRangeHarmonicFreq 1 277.18))
        (NoteRange
            (NoteRangeAmplitude 277.18 1 6490.0)
            (NoteRangeHarmonicFreq 37 10255.77)))
    [Harmonic 1 (-1.701) 6490.0
    ,Harmonic 2 2.73 119.14
    ,Harmonic 3 (-0.354) 1084.55
    ,Harmonic 4 (-2.959) 274.8
    ,Harmonic 5 (-1.272) 53.06
    ,Harmonic 6 1.98 24.9
    ,Harmonic 7 (-2.739) 11.99
    ,Harmonic 8 1.741 9.5
    ,Harmonic 9 (-2.155) 7.81
    ,Harmonic 10 2.485 3.76
    ,Harmonic 11 1.008 4.35
    ,Harmonic 12 (-2.358) 7.5
    ,Harmonic 13 1.887 3.15
    ,Harmonic 14 1.7e-2 4.35
    ,Harmonic 15 2.489 5.55
    ,Harmonic 16 0.199 4.46
    ,Harmonic 17 1.365 0.86
    ,Harmonic 18 0.277 2.62
    ,Harmonic 19 2.068 2.13
    ,Harmonic 20 1.604 3.44
    ,Harmonic 21 2.271 2.34
    ,Harmonic 22 2.601 1.93
    ,Harmonic 23 2.753 0.38
    ,Harmonic 24 (-2.161) 1.43
    ,Harmonic 25 0.165 1.24
    ,Harmonic 26 (-3.7e-2) 1.51
    ,Harmonic 27 0.7 3.42
    ,Harmonic 28 1.106 4.09
    ,Harmonic 29 (-1.383) 4.04
    ,Harmonic 30 0.666 2.17
    ,Harmonic 31 (-0.57) 2.26
    ,Harmonic 32 2.367 1.03
    ,Harmonic 33 1.071 1.31
    ,Harmonic 34 1.148 0.32
    ,Harmonic 35 2.046 1.24
    ,Harmonic 36 (-1.217) 0.36
    ,Harmonic 37 1.497 0.58]