Note37.hs

module Sharc.Instruments.ContrabassMuted.Note37 (note37) where

import Sharc.Types

note37 :: Note
note37 = Note
    (Pitch 277.183 49 "c#4")
    38
    (Range
        (NoteRange
            (NoteRangeAmplitude 6929.57 25 0.98)
            (NoteRangeHarmonicFreq 1 277.18))
        (NoteRange
            (NoteRangeAmplitude 277.18 1 10557.0)
            (NoteRangeHarmonicFreq 36 9978.58)))
    [Harmonic 1 1.6 10557.0
    ,Harmonic 2 1.516 2411.15
    ,Harmonic 3 0.841 1807.65
    ,Harmonic 4 1.803 72.18
    ,Harmonic 5 (-0.834) 268.63
    ,Harmonic 6 (-1.614) 147.54
    ,Harmonic 7 2.179 206.33
    ,Harmonic 8 1.924 107.93
    ,Harmonic 9 (-1.425) 254.61
    ,Harmonic 10 (-1.097) 87.64
    ,Harmonic 11 (-2.209) 13.56
    ,Harmonic 12 (-0.136) 203.13
    ,Harmonic 13 (-1.822) 17.65
    ,Harmonic 14 (-2.343) 28.7
    ,Harmonic 15 (-1.293) 28.13
    ,Harmonic 16 0.187 17.11
    ,Harmonic 17 (-0.727) 6.77
    ,Harmonic 18 (-2.906) 7.31
    ,Harmonic 19 (-0.773) 16.11
    ,Harmonic 20 0.204 6.42
    ,Harmonic 21 (-2.174) 13.24
    ,Harmonic 22 (-0.782) 5.06
    ,Harmonic 23 2.182 20.51
    ,Harmonic 24 (-2.064) 6.58
    ,Harmonic 25 0.842 0.98
    ,Harmonic 26 (-2.814) 6.03
    ,Harmonic 27 (-2.565) 3.17
    ,Harmonic 28 1.322 4.51
    ,Harmonic 29 (-2.065) 2.82
    ,Harmonic 30 (-0.269) 5.87
    ,Harmonic 31 3.033 5.1
    ,Harmonic 32 1.388 4.0
    ,Harmonic 33 (-2.83) 2.29
    ,Harmonic 34 (-1.206) 2.39
    ,Harmonic 35 (-0.972) 2.27
    ,Harmonic 36 3.078 3.67]