module Sharc.Instruments.Violin.Note29 (note29) where

import Sharc.Types

note29 :: Note
note29 = Note
    (Pitch 1046.5 72 "c6")
    30
    (Range
        (NoteRange
            (NoteRangeAmplitude 8372.0 8 50.66)
            (NoteRangeHarmonicFreq 1 1046.5))
        (NoteRange
            (NoteRangeAmplitude 1046.5 1 4590.0)
            (NoteRangeHarmonicFreq 9 9418.5)))
    [Harmonic 1 2.216 4590.0
    ,Harmonic 2 0.985 2736.32
    ,Harmonic 3 0.14 2558.56
    ,Harmonic 4 2.914 604.76
    ,Harmonic 5 (-1.058) 312.45
    ,Harmonic 6 0.481 239.86
    ,Harmonic 7 1.756 290.14
    ,Harmonic 8 (-0.267) 50.66
    ,Harmonic 9 (-1.049) 95.19]