Note8.hs

module Sharc.Instruments.ViolaMuted.Note8 (note8) where

import Sharc.Types

note8 :: Note
note8 = Note
    (Pitch 207.652 44 "g#3")
    9
    (Range
        (NoteRange
            (NoteRangeAmplitude 7890.77 38 4.55)
            (NoteRangeHarmonicFreq 1 207.65))
        (NoteRange
            (NoteRangeAmplitude 207.65 1 4061.0)
            (NoteRangeHarmonicFreq 47 9759.64)))
    [Harmonic 1 0.971 4061.0
    ,Harmonic 2 2.424 3564.92
    ,Harmonic 3 1.95 3576.51
    ,Harmonic 4 (-0.386) 585.59
    ,Harmonic 5 0.852 1614.08
    ,Harmonic 6 0.293 1211.74
    ,Harmonic 7 (-1.473) 89.07
    ,Harmonic 8 (-0.617) 950.64
    ,Harmonic 9 2.754 477.08
    ,Harmonic 10 1.645 661.83
    ,Harmonic 11 (-2.931) 1059.74
    ,Harmonic 12 0.288 366.36
    ,Harmonic 13 (-0.607) 442.37
    ,Harmonic 14 (-3.091) 64.59
    ,Harmonic 15 (-0.631) 210.94
    ,Harmonic 16 3.131 224.6
    ,Harmonic 17 (-0.331) 283.09
    ,Harmonic 18 1.108 145.94
    ,Harmonic 19 (-2.555) 79.93
    ,Harmonic 20 1.167 149.38
    ,Harmonic 21 0.333 32.0
    ,Harmonic 22 1.733 16.79
    ,Harmonic 23 (-2.4) 78.94
    ,Harmonic 24 1.638 130.08
    ,Harmonic 25 (-1.242) 62.07
    ,Harmonic 26 3.082 20.1
    ,Harmonic 27 (-0.325) 46.46
    ,Harmonic 28 (-1.768) 30.58
    ,Harmonic 29 1.929 63.35
    ,Harmonic 30 (-2.716) 21.39
    ,Harmonic 31 (-0.338) 29.3
    ,Harmonic 32 2.806 31.27
    ,Harmonic 33 (-2.082) 9.73
    ,Harmonic 34 1.656 10.44
    ,Harmonic 35 1.107 7.83
    ,Harmonic 36 (-0.478) 17.47
    ,Harmonic 37 (-1.09) 14.2
    ,Harmonic 38 2.531 4.55
    ,Harmonic 39 0.635 9.1
    ,Harmonic 40 2.205 9.12
    ,Harmonic 41 (-6.2e-2) 10.22
    ,Harmonic 42 (-2.966) 12.51
    ,Harmonic 43 (-1.921) 9.6
    ,Harmonic 44 1.603 10.27
    ,Harmonic 45 (-1.42) 10.31
    ,Harmonic 46 1.683 15.59
    ,Harmonic 47 (-1.178) 9.7]