Note11.hs

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

import Sharc.Types

note11 :: Note
note11 = Note
    (Pitch 246.942 47 "b3")
    12
    (Range
        (NoteRange
            (NoteRangeAmplitude 10124.62 41 0.23)
            (NoteRangeHarmonicFreq 1 246.94))
        (NoteRange
            (NoteRangeAmplitude 246.94 1 6303.0)
            (NoteRangeHarmonicFreq 41 10124.62)))
    [Harmonic 1 1.252 6303.0
    ,Harmonic 2 1.997 73.29
    ,Harmonic 3 2.857 1418.85
    ,Harmonic 4 3.4e-2 108.43
    ,Harmonic 5 2.303 294.7
    ,Harmonic 6 0.598 29.76
    ,Harmonic 7 2.118 55.68
    ,Harmonic 8 2.745 51.62
    ,Harmonic 9 2.21 18.02
    ,Harmonic 10 2.851 11.07
    ,Harmonic 11 2.781 13.52
    ,Harmonic 12 2.618 0.67
    ,Harmonic 13 (-2.523) 3.57
    ,Harmonic 14 (-1.775) 3.61
    ,Harmonic 15 2.633 2.53
    ,Harmonic 16 0.177 2.39
    ,Harmonic 17 (-0.712) 0.99
    ,Harmonic 18 (-2.348) 1.25
    ,Harmonic 19 1.119 1.92
    ,Harmonic 20 0.307 3.25
    ,Harmonic 21 (-0.466) 0.53
    ,Harmonic 22 2.176 2.46
    ,Harmonic 23 0.328 1.6
    ,Harmonic 24 (-2.409) 0.79
    ,Harmonic 25 2.85 0.96
    ,Harmonic 26 (-1.464) 0.62
    ,Harmonic 27 3.096 1.17
    ,Harmonic 28 2.553 2.24
    ,Harmonic 29 0.0 0.86
    ,Harmonic 30 (-2.899) 8.52
    ,Harmonic 31 (-0.378) 2.71
    ,Harmonic 32 2.558 1.98
    ,Harmonic 33 (-1.18) 1.55
    ,Harmonic 34 (-2.929) 1.34
    ,Harmonic 35 2.291 0.87
    ,Harmonic 36 (-2.022) 0.54
    ,Harmonic 37 (-2.348) 1.03
    ,Harmonic 38 (-0.525) 0.88
    ,Harmonic 39 (-1.638) 0.39
    ,Harmonic 40 (-1.53) 0.64
    ,Harmonic 41 (-3.1e-2) 0.23]