module Sharc.Instruments.ViolinMuted.Note39 (note39) where

import Sharc.Types

note39 :: Note
note39 = Note
    (Pitch 1864.66 82 "a#6")
    40
    (Range
        (NoteRange
            (NoteRangeAmplitude 9323.3 5 144.34)
            (NoteRangeHarmonicFreq 1 1864.66))
        (NoteRange
            (NoteRangeAmplitude 1864.66 1 2786.0)
            (NoteRangeHarmonicFreq 5 9323.3)))
    [Harmonic 1 (-1.985) 2786.0
    ,Harmonic 2 (-2.644) 470.48
    ,Harmonic 3 (-2.931) 169.97
    ,Harmonic 4 (-0.954) 144.69
    ,Harmonic 5 (-0.775) 144.34]