Note7.hs

module Sharc.Instruments.ViolaMuted.Note7 (note7) where

import Sharc.Types

note7 :: Note
note7 = Note
    (Pitch 195.998 43 "g3")
    8
    (Range
        (NoteRange
            (NoteRangeAmplitude 8819.91 45 0.94)
            (NoteRangeHarmonicFreq 1 195.99))
        (NoteRange
            (NoteRangeAmplitude 587.99 3 2969.0)
            (NoteRangeHarmonicFreq 51 9995.89)))
    [Harmonic 1 (-2.915) 2214.0
    ,Harmonic 2 (-2.707) 1751.43
    ,Harmonic 3 (-0.502) 2969.0
    ,Harmonic 4 (-2.27) 453.6
    ,Harmonic 5 (-2.053) 1331.89
    ,Harmonic 6 0.908 323.48
    ,Harmonic 7 (-1.32) 1019.88
    ,Harmonic 8 0.485 506.47
    ,Harmonic 9 (-0.937) 317.98
    ,Harmonic 10 0.868 580.37
    ,Harmonic 11 (-6.7e-2) 722.76
    ,Harmonic 12 0.373 190.8
    ,Harmonic 13 (-2.224) 204.22
    ,Harmonic 14 1.79 292.08
    ,Harmonic 15 1.416 415.89
    ,Harmonic 16 0.539 234.84
    ,Harmonic 17 1.708 90.51
    ,Harmonic 18 (-3.087) 26.46
    ,Harmonic 19 (-1.293) 247.65
    ,Harmonic 20 (-0.646) 141.21
    ,Harmonic 21 (-1.111) 121.53
    ,Harmonic 22 (-2.214) 81.62
    ,Harmonic 23 (-1.657) 23.68
    ,Harmonic 24 (-0.405) 91.0
    ,Harmonic 25 (-0.91) 36.68
    ,Harmonic 26 0.272 43.89
    ,Harmonic 27 (-0.626) 47.72
    ,Harmonic 28 (-1.442) 10.24
    ,Harmonic 29 (-1.481) 4.06
    ,Harmonic 30 (-2.301) 11.68
    ,Harmonic 31 (-0.918) 22.95
    ,Harmonic 32 (-0.523) 21.07
    ,Harmonic 33 (-1.671) 11.69
    ,Harmonic 34 0.261 18.04
    ,Harmonic 35 (-0.532) 9.04
    ,Harmonic 36 (-3.051) 13.16
    ,Harmonic 37 1.499 6.03
    ,Harmonic 38 (-1.565) 15.52
    ,Harmonic 39 (-0.738) 3.71
    ,Harmonic 40 (-1.127) 6.62
    ,Harmonic 41 (-1.471) 3.39
    ,Harmonic 42 (-0.228) 3.82
    ,Harmonic 43 1.138 2.04
    ,Harmonic 44 2.451 6.23
    ,Harmonic 45 (-1.03) 0.94
    ,Harmonic 46 (-0.443) 2.86
    ,Harmonic 47 0.2 13.05
    ,Harmonic 48 0.62 6.21
    ,Harmonic 49 1.286 8.49
    ,Harmonic 50 0.564 11.58
    ,Harmonic 51 3.7e-2 4.51]