Note11.hs

module Sharc.Instruments.ViolaMarteleBowing.Note11 (note11) where

import Sharc.Types

note11 :: Note
note11 = Note
    (Pitch 261.626 48 "c4")
    12
    (Range
        (NoteRange
            (NoteRangeAmplitude 9941.78 38 1.77)
            (NoteRangeHarmonicFreq 1 261.62))
        (NoteRange
            (NoteRangeAmplitude 523.25 2 8269.0)
            (NoteRangeHarmonicFreq 38 9941.78)))
    [Harmonic 1 (-0.754) 5999.76
    ,Harmonic 2 (-2.75) 8269.0
    ,Harmonic 3 (-3.111) 2231.76
    ,Harmonic 4 (-0.659) 3361.41
    ,Harmonic 5 (-0.796) 3761.62
    ,Harmonic 6 2.902 327.86
    ,Harmonic 7 1.504 474.88
    ,Harmonic 8 2.655 108.0
    ,Harmonic 9 (-3.06) 184.13
    ,Harmonic 10 (-0.96) 455.38
    ,Harmonic 11 (-1.577) 64.71
    ,Harmonic 12 (-2.087) 207.73
    ,Harmonic 13 (-1.735) 115.63
    ,Harmonic 14 (-0.415) 63.3
    ,Harmonic 15 (-2.844) 45.92
    ,Harmonic 16 (-0.1) 63.47
    ,Harmonic 17 (-2.789) 24.05
    ,Harmonic 18 (-0.227) 3.1
    ,Harmonic 19 (-2.352) 23.86
    ,Harmonic 20 0.632 4.49
    ,Harmonic 21 (-2.071) 11.74
    ,Harmonic 22 (-0.223) 7.94
    ,Harmonic 23 (-1.126) 2.9
    ,Harmonic 24 (-0.209) 8.67
    ,Harmonic 25 0.763 6.37
    ,Harmonic 26 1.481 14.5
    ,Harmonic 27 (-1.997) 2.87
    ,Harmonic 28 (-1.875) 2.93
    ,Harmonic 29 (-1.1) 8.94
    ,Harmonic 30 (-0.376) 5.77
    ,Harmonic 31 0.996 5.65
    ,Harmonic 32 (-3.042) 4.85
    ,Harmonic 33 (-1.516) 5.74
    ,Harmonic 34 1.979 2.17
    ,Harmonic 35 (-1.346) 2.7
    ,Harmonic 36 2.37 9.82
    ,Harmonic 37 1.256 2.37
    ,Harmonic 38 0.523 1.77]