Note30.hs

module Sharc.Instruments.ContrabassMuted.Note30 (note30) where

import Sharc.Types

note30 :: Note
note30 = Note
    (Pitch 184.997 42 "f#3")
    31
    (Range
        (NoteRange
            (NoteRangeAmplitude 7399.88 40 0.59)
            (NoteRangeHarmonicFreq 1 184.99))
        (NoteRange
            (NoteRangeAmplitude 369.99 2 8663.0)
            (NoteRangeHarmonicFreq 54 9989.83)))
    [Harmonic 1 0.932 3212.83
    ,Harmonic 2 1.704 8663.0
    ,Harmonic 3 1.659 3092.78
    ,Harmonic 4 1.692 1825.71
    ,Harmonic 5 0.49 587.92
    ,Harmonic 6 (-0.199) 563.58
    ,Harmonic 7 2.402 810.89
    ,Harmonic 8 0.109 344.75
    ,Harmonic 9 0.837 192.43
    ,Harmonic 10 2.915 71.83
    ,Harmonic 11 (-3.03) 4.22
    ,Harmonic 12 (-4.6e-2) 271.49
    ,Harmonic 13 (-2.797) 153.54
    ,Harmonic 14 2.998 77.31
    ,Harmonic 15 2.795 116.19
    ,Harmonic 16 0.841 21.83
    ,Harmonic 17 (-1.686) 73.42
    ,Harmonic 18 0.335 47.98
    ,Harmonic 19 (-0.828) 60.34
    ,Harmonic 20 (-2.581) 50.09
    ,Harmonic 21 (-0.401) 20.8
    ,Harmonic 22 0.72 41.0
    ,Harmonic 23 (-2.699) 19.46
    ,Harmonic 24 2.074 65.75
    ,Harmonic 25 (-2.151) 36.95
    ,Harmonic 26 0.452 22.82
    ,Harmonic 27 (-1.069) 46.44
    ,Harmonic 28 0.472 18.81
    ,Harmonic 29 0.912 20.75
    ,Harmonic 30 (-2.791) 40.13
    ,Harmonic 31 0.255 10.02
    ,Harmonic 32 (-0.57) 24.59
    ,Harmonic 33 (-0.78) 5.97
    ,Harmonic 34 (-2.449) 5.31
    ,Harmonic 35 2.073 9.65
    ,Harmonic 36 2.06 9.72
    ,Harmonic 37 2.59 1.78
    ,Harmonic 38 1.779 3.92
    ,Harmonic 39 (-2.864) 2.1
    ,Harmonic 40 (-1.465) 0.59
    ,Harmonic 41 0.765 1.88
    ,Harmonic 42 1.598 11.95
    ,Harmonic 43 (-2.697) 6.19
    ,Harmonic 44 1.2 8.79
    ,Harmonic 45 2.589 2.36
    ,Harmonic 46 2.783 3.66
    ,Harmonic 47 (-1.243) 3.94
    ,Harmonic 48 2.671 2.85
    ,Harmonic 49 (-2.717) 7.04
    ,Harmonic 50 (-0.145) 4.76
    ,Harmonic 51 2.873 6.56
    ,Harmonic 52 (-2.456) 2.63
    ,Harmonic 53 (-2.143) 1.4
    ,Harmonic 54 1.86 5.93]