Note31.hs

module Sharc.Instruments.ContrabassPizzicato.Note31 (note31) where

import Sharc.Types

note31 :: Note
note31 = Note
    (Pitch 207.652 44 "g#3")
    32
    (Range
        (NoteRange
            (NoteRangeAmplitude 8721.38 42 5.0e-2)
            (NoteRangeHarmonicFreq 1 207.65))
        (NoteRange
            (NoteRangeAmplitude 207.65 1 3371.0)
            (NoteRangeHarmonicFreq 47 9759.64)))
    [Harmonic 1 1.774 3371.0
    ,Harmonic 2 (-1.066) 626.71
    ,Harmonic 3 1.463 703.93
    ,Harmonic 4 1.09 234.04
    ,Harmonic 5 (-2.459) 232.52
    ,Harmonic 6 (-1.931) 233.54
    ,Harmonic 7 (-0.226) 31.35
    ,Harmonic 8 (-2.526) 57.19
    ,Harmonic 9 3.1e-2 35.2
    ,Harmonic 10 (-1.314) 13.42
    ,Harmonic 11 (-0.813) 8.26
    ,Harmonic 12 (-2.492) 7.7
    ,Harmonic 13 0.558 2.86
    ,Harmonic 14 1.919 2.78
    ,Harmonic 15 (-0.745) 2.63
    ,Harmonic 16 1.3e-2 2.24
    ,Harmonic 17 2.416 2.75
    ,Harmonic 18 0.318 1.34
    ,Harmonic 19 (-0.529) 0.32
    ,Harmonic 20 (-2.831) 3.31
    ,Harmonic 21 (-2.719) 2.01
    ,Harmonic 22 (-2.469) 0.25
    ,Harmonic 23 (-1.738) 2.0
    ,Harmonic 24 (-0.481) 1.12
    ,Harmonic 25 1.728 1.44
    ,Harmonic 26 2.119 0.22
    ,Harmonic 27 (-2.662) 1.62
    ,Harmonic 28 (-2.757) 2.77
    ,Harmonic 29 2.118 0.42
    ,Harmonic 30 3.001 1.12
    ,Harmonic 31 2.885 2.29
    ,Harmonic 32 (-2.366) 0.77
    ,Harmonic 33 (-0.8) 1.04
    ,Harmonic 34 (-2.322) 2.01
    ,Harmonic 35 (-1.912) 0.89
    ,Harmonic 36 1.73 2.54
    ,Harmonic 37 2.776 1.19
    ,Harmonic 38 (-0.853) 2.35
    ,Harmonic 39 0.953 1.67
    ,Harmonic 40 1.671 0.33
    ,Harmonic 41 (-1.127) 0.99
    ,Harmonic 42 (-2.299) 5.0e-2
    ,Harmonic 43 (-0.879) 1.77
    ,Harmonic 44 2.644 0.31
    ,Harmonic 45 1.704 1.7
    ,Harmonic 46 (-3.014) 1.17
    ,Harmonic 47 (-0.182) 1.79]