Note34.hs

module Sharc.Instruments.ContrabassMuted.Note34 (note34) where

import Sharc.Types

note34 :: Note
note34 = Note
    (Pitch 233.082 46 "a#3")
    35
    (Range
        (NoteRange
            (NoteRangeAmplitude 9556.36 41 0.91)
            (NoteRangeHarmonicFreq 1 233.08))
        (NoteRange
            (NoteRangeAmplitude 233.08 1 9555.0)
            (NoteRangeHarmonicFreq 43 10022.52)))
    [Harmonic 1 (-1.77) 9555.0
    ,Harmonic 2 1.427 2988.34
    ,Harmonic 3 (-0.63) 1424.78
    ,Harmonic 4 (-1.945) 1279.29
    ,Harmonic 5 (-1.45) 1082.95
    ,Harmonic 6 1.011 208.18
    ,Harmonic 7 (-2.808) 96.28
    ,Harmonic 8 (-1.208) 126.85
    ,Harmonic 9 (-2.724) 270.72
    ,Harmonic 10 (-0.507) 348.15
    ,Harmonic 11 (-1.391) 117.14
    ,Harmonic 12 (-2.212) 75.28
    ,Harmonic 13 (-1.692) 141.74
    ,Harmonic 14 0.924 119.41
    ,Harmonic 15 1.923 49.18
    ,Harmonic 16 3.097 15.04
    ,Harmonic 17 (-1.779) 33.75
    ,Harmonic 18 1.571 14.47
    ,Harmonic 19 (-1.748) 1.71
    ,Harmonic 20 0.74 29.48
    ,Harmonic 21 2.987 20.26
    ,Harmonic 22 (-2.9) 43.78
    ,Harmonic 23 1.501 4.54
    ,Harmonic 24 0.773 17.38
    ,Harmonic 25 (-0.383) 7.52
    ,Harmonic 26 1.5 7.26
    ,Harmonic 27 1.475 34.33
    ,Harmonic 28 0.394 28.6
    ,Harmonic 29 0.787 17.78
    ,Harmonic 30 1.205 1.98
    ,Harmonic 31 (-2.217) 4.09
    ,Harmonic 32 (-1.473) 7.18
    ,Harmonic 33 6.4e-2 0.94
    ,Harmonic 34 1.74 1.48
    ,Harmonic 35 2.885 1.32
    ,Harmonic 36 (-1.834) 6.56
    ,Harmonic 37 0.827 3.93
    ,Harmonic 38 0.217 6.93
    ,Harmonic 39 2.94 2.24
    ,Harmonic 40 0.836 4.58
    ,Harmonic 41 2.592 0.91
    ,Harmonic 42 1.734 1.36
    ,Harmonic 43 1.538 1.03]