Note32.hs

module Sharc.Instruments.Contrabass.Note32 (note32) where

import Sharc.Types

note32 :: Note
note32 = Note
    (Pitch 207.652 44 "g#3")
    33
    (Range
        (NoteRange
            (NoteRangeAmplitude 9759.64 47 1.22)
            (NoteRangeHarmonicFreq 1 207.65))
        (NoteRange
            (NoteRangeAmplitude 207.65 1 2782.0)
            (NoteRangeHarmonicFreq 48 9967.29)))
    [Harmonic 1 1.662 2782.0
    ,Harmonic 2 1.373 519.74
    ,Harmonic 3 2.905 469.4
    ,Harmonic 4 1.402 332.19
    ,Harmonic 5 8.0e-2 447.78
    ,Harmonic 6 0.314 327.08
    ,Harmonic 7 0.842 411.25
    ,Harmonic 8 (-0.719) 185.47
    ,Harmonic 9 1.109 118.16
    ,Harmonic 10 (-0.939) 16.21
    ,Harmonic 11 (-0.714) 144.01
    ,Harmonic 12 2.55 83.31
    ,Harmonic 13 2.91 85.65
    ,Harmonic 14 (-2.918) 76.99
    ,Harmonic 15 (-1.314) 4.07
    ,Harmonic 16 0.332 18.68
    ,Harmonic 17 (-0.553) 32.89
    ,Harmonic 18 (-2.896) 34.73
    ,Harmonic 19 (-2.166) 13.39
    ,Harmonic 20 1.306 27.2
    ,Harmonic 21 (-3.073) 13.47
    ,Harmonic 22 0.414 3.46
    ,Harmonic 23 (-0.651) 6.75
    ,Harmonic 24 (-2.725) 16.59
    ,Harmonic 25 0.498 10.05
    ,Harmonic 26 1.607 9.09
    ,Harmonic 27 (-2.551) 16.53
    ,Harmonic 28 (-1.437) 8.37
    ,Harmonic 29 1.546 5.55
    ,Harmonic 30 (-0.696) 5.95
    ,Harmonic 31 0.859 17.95
    ,Harmonic 32 2.079 7.93
    ,Harmonic 33 (-0.525) 15.06
    ,Harmonic 34 1.136 13.7
    ,Harmonic 35 0.939 5.74
    ,Harmonic 36 2.569 6.39
    ,Harmonic 37 7.0e-3 1.97
    ,Harmonic 38 1.237 8.81
    ,Harmonic 39 (-2.55) 5.39
    ,Harmonic 40 1.96 3.51
    ,Harmonic 41 (-2.09) 2.76
    ,Harmonic 42 (-0.728) 4.11
    ,Harmonic 43 (-0.759) 2.63
    ,Harmonic 44 (-0.888) 2.44
    ,Harmonic 45 0.929 3.12
    ,Harmonic 46 2.392 2.73
    ,Harmonic 47 (-1.179) 1.22
    ,Harmonic 48 3.042 1.97]