module Sharc.Instruments.CelloMuted.Note33 (note33) where

import Sharc.Types

note33 :: Note
note33 = Note
    (Pitch 440.0 57 "a4")
    34
    (Range
        (NoteRange
            (NoteRangeAmplitude 3960.0 9 3.77)
            (NoteRangeHarmonicFreq 1 440.0))
        (NoteRange
            (NoteRangeAmplitude 440.0 1 611.0)
            (NoteRangeHarmonicFreq 22 9680.0)))
    [Harmonic 1 (-1.627) 611.0
    ,Harmonic 2 (-2.376) 136.56
    ,Harmonic 3 (-0.221) 63.11
    ,Harmonic 4 (-1.808) 22.37
    ,Harmonic 5 (-0.422) 85.54
    ,Harmonic 6 (-3.044) 61.96
    ,Harmonic 7 0.406 10.83
    ,Harmonic 8 (-1.23) 43.94
    ,Harmonic 9 2.754 3.77
    ,Harmonic 10 (-0.224) 21.8
    ,Harmonic 11 3.125 9.66
    ,Harmonic 12 (-0.723) 14.89
    ,Harmonic 13 (-0.498) 5.6
    ,Harmonic 14 1.403 9.41
    ,Harmonic 15 (-1.712) 14.63
    ,Harmonic 16 8.8e-2 8.76
    ,Harmonic 17 (-0.349) 20.23
    ,Harmonic 18 2.825 6.11
    ,Harmonic 19 (-1.807) 6.16
    ,Harmonic 20 1.82 4.35
    ,Harmonic 21 1.639 4.33
    ,Harmonic 22 (-0.827) 6.1]