Note14.hs

module Sharc.Instruments.Trombone.Note14 (note14) where

import Sharc.Types

note14 :: Note
note14 = Note
    (Pitch 184.997 42 "f#3")
    15
    (Range
        (NoteRange
            (NoteRangeAmplitude 7399.88 40 1.29)
            (NoteRangeHarmonicFreq 1 184.99))
        (NoteRange
            (NoteRangeAmplitude 739.98 4 5117.0)
            (NoteRangeHarmonicFreq 54 9989.83)))
    [Harmonic 1 1.383 2956.99
    ,Harmonic 2 (-4.3e-2) 2931.34
    ,Harmonic 3 (-2.623) 4367.31
    ,Harmonic 4 1.471 5117.0
    ,Harmonic 5 (-1.289) 3163.25
    ,Harmonic 6 2.495 2353.57
    ,Harmonic 7 0.267 2006.16
    ,Harmonic 8 (-2.338) 1077.38
    ,Harmonic 9 1.527 619.15
    ,Harmonic 10 (-0.708) 481.05
    ,Harmonic 11 (-2.801) 333.4
    ,Harmonic 12 1.202 241.89
    ,Harmonic 13 (-1.073) 173.54
    ,Harmonic 14 2.931 103.15
    ,Harmonic 15 0.605 75.76
    ,Harmonic 16 (-1.466) 46.63
    ,Harmonic 17 2.45 42.83
    ,Harmonic 18 0.485 27.41
    ,Harmonic 19 (-1.859) 21.36
    ,Harmonic 20 2.203 12.58
    ,Harmonic 21 (-0.185) 11.29
    ,Harmonic 22 (-2.515) 9.77
    ,Harmonic 23 1.632 7.74
    ,Harmonic 24 (-0.431) 6.96
    ,Harmonic 25 (-2.688) 5.76
    ,Harmonic 26 0.797 4.54
    ,Harmonic 27 (-1.494) 7.6
    ,Harmonic 28 (-3.096) 8.39
    ,Harmonic 29 1.385 4.82
    ,Harmonic 30 (-1.011) 2.31
    ,Harmonic 31 (-2.956) 3.49
    ,Harmonic 32 0.692 1.8
    ,Harmonic 33 (-1.488) 3.25
    ,Harmonic 34 2.921 4.27
    ,Harmonic 35 1.708 3.03
    ,Harmonic 36 1.183 2.71
    ,Harmonic 37 0.363 1.95
    ,Harmonic 38 (-0.741) 1.42
    ,Harmonic 39 (-2.458) 2.17
    ,Harmonic 40 2.109 1.29
    ,Harmonic 41 (-0.515) 1.82
    ,Harmonic 42 (-1.554) 1.96
    ,Harmonic 43 2.856 2.08
    ,Harmonic 44 0.623 3.41
    ,Harmonic 45 (-1.335) 3.59
    ,Harmonic 46 3.098 3.61
    ,Harmonic 47 1.551 1.99
    ,Harmonic 48 (-8.9e-2) 1.99
    ,Harmonic 49 (-2.895) 3.74
    ,Harmonic 50 1.518 4.09
    ,Harmonic 51 (-0.539) 3.61
    ,Harmonic 52 (-2.456) 3.75
    ,Harmonic 53 2.242 3.25
    ,Harmonic 54 0.978 1.72]