Note19.hs

module Sharc.Instruments.TromboneMuted.Note19 (note19) where

import Sharc.Types

note19 :: Note
note19 = Note
    (Pitch 246.942 47 "b3")
    20
    (Range
        (NoteRange
            (NoteRangeAmplitude 7902.14 32 0.22)
            (NoteRangeHarmonicFreq 1 246.94))
        (NoteRange
            (NoteRangeAmplitude 493.88 2 3154.0)
            (NoteRangeHarmonicFreq 40 9877.68)))
    [Harmonic 1 0.766 683.51
    ,Harmonic 2 (-2.107) 3154.0
    ,Harmonic 3 (-0.755) 694.11
    ,Harmonic 4 2.873 224.92
    ,Harmonic 5 0.147 537.31
    ,Harmonic 6 (-2.174) 242.66
    ,Harmonic 7 0.83 361.83
    ,Harmonic 8 (-1.452) 256.59
    ,Harmonic 9 1.371 102.03
    ,Harmonic 10 (-1.129) 24.96
    ,Harmonic 11 1.043 21.08
    ,Harmonic 12 (-1.826) 4.37
    ,Harmonic 13 (-2.235) 16.93
    ,Harmonic 14 (-0.222) 14.74
    ,Harmonic 15 (-2.582) 5.89
    ,Harmonic 16 (-1.886) 1.76
    ,Harmonic 17 (-1.199) 1.17
    ,Harmonic 18 1.036 2.04
    ,Harmonic 19 2.606 1.48
    ,Harmonic 20 (-1.746) 0.41
    ,Harmonic 21 (-0.246) 0.61
    ,Harmonic 22 (-0.397) 2.09
    ,Harmonic 23 3.067 0.65
    ,Harmonic 24 2.76 1.16
    ,Harmonic 25 (-1.387) 1.01
    ,Harmonic 26 1.546 0.67
    ,Harmonic 27 (-1.011) 0.49
    ,Harmonic 28 (-2.144) 0.63
    ,Harmonic 29 1.0e-2 0.4
    ,Harmonic 30 0.889 0.46
    ,Harmonic 31 2.419 0.57
    ,Harmonic 32 3.141 0.22
    ,Harmonic 33 1.454 1.59
    ,Harmonic 34 1.389 0.25
    ,Harmonic 35 (-0.374) 1.37
    ,Harmonic 36 1.287 0.56
    ,Harmonic 37 (-0.505) 1.2
    ,Harmonic 38 2.903 1.12
    ,Harmonic 39 2.6e-2 1.24
    ,Harmonic 40 (-2.617) 0.49]