Note32.hs

module Sharc.Instruments.ContrabassMarteleBowing.Note32 (note32) where

import Sharc.Types

note32 :: Note
note32 = Note
    (Pitch 207.652 44 "g#3")
    33
    (Range
        (NoteRange
            (NoteRangeAmplitude 7267.82 35 0.34)
            (NoteRangeHarmonicFreq 1 207.65))
        (NoteRange
            (NoteRangeAmplitude 207.65 1 6284.0)
            (NoteRangeHarmonicFreq 47 9759.64)))
    [Harmonic 1 1.562 6284.0
    ,Harmonic 2 1.38 1494.84
    ,Harmonic 3 2.812 474.05
    ,Harmonic 4 1.968 650.25
    ,Harmonic 5 (-0.24) 227.53
    ,Harmonic 6 0.876 59.91
    ,Harmonic 7 2.219 766.63
    ,Harmonic 8 (-2.29) 205.97
    ,Harmonic 9 0.112 200.69
    ,Harmonic 10 (-2.036) 101.82
    ,Harmonic 11 (-0.507) 66.59
    ,Harmonic 12 (-2.725) 66.75
    ,Harmonic 13 (-0.414) 35.27
    ,Harmonic 14 2.026 78.55
    ,Harmonic 15 (-0.971) 26.92
    ,Harmonic 16 2.517 7.43
    ,Harmonic 17 (-0.701) 31.2
    ,Harmonic 18 3.014 7.69
    ,Harmonic 19 0.73 23.13
    ,Harmonic 20 (-0.778) 3.1
    ,Harmonic 21 2.045 29.12
    ,Harmonic 22 1.934 12.84
    ,Harmonic 23 (-2.956) 15.03
    ,Harmonic 24 1.879 5.12
    ,Harmonic 25 0.538 10.82
    ,Harmonic 26 (-3.049) 2.67
    ,Harmonic 27 2.029 13.89
    ,Harmonic 28 (-2.46) 7.57
    ,Harmonic 29 2.309 10.92
    ,Harmonic 30 (-7.1e-2) 19.41
    ,Harmonic 31 (-0.743) 10.28
    ,Harmonic 32 0.889 12.65
    ,Harmonic 33 1.484 8.14
    ,Harmonic 34 0.168 1.67
    ,Harmonic 35 (-0.474) 0.34
    ,Harmonic 36 (-0.699) 6.45
    ,Harmonic 37 1.069 1.66
    ,Harmonic 38 2.391 6.04
    ,Harmonic 39 (-1.784) 6.69
    ,Harmonic 40 (-3.071) 2.83
    ,Harmonic 41 (-2.863) 1.83
    ,Harmonic 42 (-2.97) 3.15
    ,Harmonic 43 (-9.1e-2) 2.47
    ,Harmonic 44 (-1.824) 1.43
    ,Harmonic 45 (-0.691) 3.04
    ,Harmonic 46 (-0.932) 2.04
    ,Harmonic 47 0.145 0.92]