Note34.hs

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

import Sharc.Types

note34 :: Note
note34 = Note
    (Pitch 246.942 47 "b3")
    35
    (Range
        (NoteRange
            (NoteRangeAmplitude 10618.5 43 0.2)
            (NoteRangeHarmonicFreq 1 246.94))
        (NoteRange
            (NoteRangeAmplitude 246.94 1 11534.0)
            (NoteRangeHarmonicFreq 43 10618.5)))
    [Harmonic 1 1.521 11534.0
    ,Harmonic 2 1.013 858.33
    ,Harmonic 3 2.403 691.36
    ,Harmonic 4 0.304 240.48
    ,Harmonic 5 1.9 145.84
    ,Harmonic 6 (-1.639) 138.38
    ,Harmonic 7 3.026 293.66
    ,Harmonic 8 2.256 92.35
    ,Harmonic 9 (-0.474) 41.76
    ,Harmonic 10 (-2.19) 62.69
    ,Harmonic 11 1.46 37.24
    ,Harmonic 12 (-1.293) 35.16
    ,Harmonic 13 (-0.257) 30.14
    ,Harmonic 14 1.415 33.46
    ,Harmonic 15 1.748 10.66
    ,Harmonic 16 0.946 8.33
    ,Harmonic 17 (-2.956) 6.2
    ,Harmonic 18 2.414 3.62
    ,Harmonic 19 3.072 2.87
    ,Harmonic 20 1.461 4.75
    ,Harmonic 21 1.323 1.69
    ,Harmonic 22 2.253 13.84
    ,Harmonic 23 0.666 4.78
    ,Harmonic 24 (-0.427) 1.47
    ,Harmonic 25 (-1.116) 1.67
    ,Harmonic 26 (-0.11) 2.34
    ,Harmonic 27 (-2.639) 0.81
    ,Harmonic 28 (-1.279) 6.06
    ,Harmonic 29 (-3.138) 3.34
    ,Harmonic 30 0.761 1.87
    ,Harmonic 31 2.276 2.38
    ,Harmonic 32 1.185 1.48
    ,Harmonic 33 (-0.412) 1.37
    ,Harmonic 34 (-1.199) 0.62
    ,Harmonic 35 (-1.849) 0.37
    ,Harmonic 36 (-2.754) 0.92
    ,Harmonic 37 2.115 0.49
    ,Harmonic 38 (-0.546) 0.82
    ,Harmonic 39 (-2.224) 0.85
    ,Harmonic 40 (-2.964) 0.73
    ,Harmonic 41 (-1.956) 0.85
    ,Harmonic 42 3.082 0.93
    ,Harmonic 43 (-2.525) 0.2]