module Sharc.Instruments.ViolinMarteleBowing.Note27 (note27) where

import Sharc.Types

note27 :: Note
note27 = Note
    (Pitch 932.328 70 "a#5")
    28
    (Range
        (NoteRange
            (NoteRangeAmplitude 9323.27 10 38.1)
            (NoteRangeHarmonicFreq 1 932.32))
        (NoteRange
            (NoteRangeAmplitude 932.32 1 7671.0)
            (NoteRangeHarmonicFreq 10 9323.27)))
    [Harmonic 1 1.264 7671.0
    ,Harmonic 2 1.628 1610.61
    ,Harmonic 3 1.41 1967.78
    ,Harmonic 4 (-1.433) 1194.02
    ,Harmonic 5 2.622 829.49
    ,Harmonic 6 (-1.088) 344.37
    ,Harmonic 7 (-2.09) 376.9
    ,Harmonic 8 1.402 83.67
    ,Harmonic 9 2.366 245.37
    ,Harmonic 10 1.701 38.1]