module Sharc.Instruments.ViolinsEnsemble.Note23 (note23) where

import Sharc.Types

note23 :: Note
note23 = Note
    (Pitch 739.989 66 "f#5")
    24
    (Range
        (NoteRange
            (NoteRangeAmplitude 8139.87 11 310.93)
            (NoteRangeHarmonicFreq 1 739.98))
        (NoteRange
            (NoteRangeAmplitude 1479.97 2 24124.0)
            (NoteRangeHarmonicFreq 13 9619.85)))
    [Harmonic 1 1.607 15725.63
    ,Harmonic 2 0.536 24124.0
    ,Harmonic 3 2.058 21906.18
    ,Harmonic 4 1.777 7006.14
    ,Harmonic 5 (-2.542) 3267.22
    ,Harmonic 6 1.369 3173.5
    ,Harmonic 7 (-0.952) 1259.11
    ,Harmonic 8 (-1.976) 605.16
    ,Harmonic 9 (-2.765) 637.08
    ,Harmonic 10 0.789 1553.97
    ,Harmonic 11 (-1.205) 310.93
    ,Harmonic 12 9.9e-2 328.09
    ,Harmonic 13 1.347 326.59]