Note35.hs

module Sharc.Instruments.ContrabassPizzicato.Note35 (note35) where

import Sharc.Types

note35 :: Note
note35 = Note
    (Pitch 261.626 48 "c4")
    36
    (Range
        (NoteRange
            (NoteRangeAmplitude 7325.52 28 0.73)
            (NoteRangeHarmonicFreq 1 261.62))
        (NoteRange
            (NoteRangeAmplitude 261.62 1 15389.0)
            (NoteRangeHarmonicFreq 37 9680.16)))
    [Harmonic 1 1.466 15389.0
    ,Harmonic 2 1.764 3463.34
    ,Harmonic 3 (-0.202) 1090.22
    ,Harmonic 4 0.926 375.4
    ,Harmonic 5 (-0.168) 111.09
    ,Harmonic 6 (-0.568) 140.64
    ,Harmonic 7 1.968 26.73
    ,Harmonic 8 (-2.961) 34.97
    ,Harmonic 9 0.927 13.94
    ,Harmonic 10 2.274 3.98
    ,Harmonic 11 1.988 27.49
    ,Harmonic 12 (-2.82) 21.59
    ,Harmonic 13 (-0.401) 16.11
    ,Harmonic 14 2.246 11.16
    ,Harmonic 15 0.365 3.48
    ,Harmonic 16 (-1.04) 10.6
    ,Harmonic 17 0.974 6.8
    ,Harmonic 18 (-0.798) 2.69
    ,Harmonic 19 (-0.278) 1.74
    ,Harmonic 20 3.058 3.41
    ,Harmonic 21 2.976 1.34
    ,Harmonic 22 1.249 4.33
    ,Harmonic 23 (-1.115) 6.79
    ,Harmonic 24 1.398 3.19
    ,Harmonic 25 2.846 1.77
    ,Harmonic 26 (-0.86) 3.6
    ,Harmonic 27 (-0.262) 0.81
    ,Harmonic 28 2.808 0.73
    ,Harmonic 29 (-0.747) 5.79
    ,Harmonic 30 (-1.978) 3.35
    ,Harmonic 31 2.233 1.06
    ,Harmonic 32 (-2.882) 1.07
    ,Harmonic 33 2.186 3.53
    ,Harmonic 34 (-0.497) 1.11
    ,Harmonic 35 2.581 1.25
    ,Harmonic 36 (-1.698) 2.81
    ,Harmonic 37 1.726 1.44]