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

import Sharc.Types

note39 :: Note
note39 = Note
    (Pitch 1864.66 82 "a#6")
    40
    (Range
        (NoteRange
            (NoteRangeAmplitude 9323.3 5 74.81)
            (NoteRangeHarmonicFreq 1 1864.66))
        (NoteRange
            (NoteRangeAmplitude 3729.32 2 8236.0)
            (NoteRangeHarmonicFreq 5 9323.3)))
    [Harmonic 1 (-2.523) 3933.78
    ,Harmonic 2 0.927 8236.0
    ,Harmonic 3 (-1.32) 474.18
    ,Harmonic 4 7.6e-2 176.87
    ,Harmonic 5 0.759 74.81]