Note36.hs

module Sharc.Instruments.ContrabassMarteleBowing.Note36 (note36) where

import Sharc.Types

note36 :: Note
note36 = Note
    (Pitch 277.183 49 "c#4")
    37
    (Range
        (NoteRange
            (NoteRangeAmplitude 8869.85 32 0.24)
            (NoteRangeHarmonicFreq 1 277.18))
        (NoteRange
            (NoteRangeAmplitude 554.36 2 4412.0)
            (NoteRangeHarmonicFreq 38 10532.95)))
    [Harmonic 1 1.564 3459.73
    ,Harmonic 2 1.69 4412.0
    ,Harmonic 3 (-0.843) 439.3
    ,Harmonic 4 (-3.001) 157.16
    ,Harmonic 5 1.371 430.6
    ,Harmonic 6 0.19 192.06
    ,Harmonic 7 (-0.954) 130.6
    ,Harmonic 8 (-1.173) 36.71
    ,Harmonic 9 2.352 80.72
    ,Harmonic 10 (-1.671) 42.89
    ,Harmonic 11 (-0.759) 42.77
    ,Harmonic 12 (-1.546) 49.24
    ,Harmonic 13 (-3.05) 55.98
    ,Harmonic 14 2.191 14.74
    ,Harmonic 15 (-0.15) 16.65
    ,Harmonic 16 (-0.657) 10.96
    ,Harmonic 17 1.519 15.97
    ,Harmonic 18 1.802 16.73
    ,Harmonic 19 (-1.796) 8.19
    ,Harmonic 20 (-2.9) 1.61
    ,Harmonic 21 (-0.202) 0.98
    ,Harmonic 22 2.11 2.91
    ,Harmonic 23 (-1.34) 5.43
    ,Harmonic 24 (-1.986) 11.08
    ,Harmonic 25 0.213 1.93
    ,Harmonic 26 2.698 5.2
    ,Harmonic 27 (-0.921) 4.57
    ,Harmonic 28 1.371 1.9
    ,Harmonic 29 0.346 1.37
    ,Harmonic 30 (-2.629) 1.4
    ,Harmonic 31 3.056 1.58
    ,Harmonic 32 (-2.884) 0.24
    ,Harmonic 33 (-2.757) 0.6
    ,Harmonic 34 0.361 0.93
    ,Harmonic 35 (-1.949) 1.96
    ,Harmonic 36 2.277 0.97
    ,Harmonic 37 (-2.27) 1.3
    ,Harmonic 38 0.896 0.26]