module Sharc.Instruments.ViolinMuted.Note24 (note24) where

import Sharc.Types

note24 :: Note
note24 = Note
    (Pitch 783.991 67 "g5")
    25
    (Range
        (NoteRange
            (NoteRangeAmplitude 6271.92 8 26.03)
            (NoteRangeHarmonicFreq 1 783.99))
        (NoteRange
            (NoteRangeAmplitude 783.99 1 2080.0)
            (NoteRangeHarmonicFreq 12 9407.89)))
    [Harmonic 1 1.597 2080.0
    ,Harmonic 2 (-3.3e-2) 750.1
    ,Harmonic 3 3.047 237.33
    ,Harmonic 4 1.678 315.77
    ,Harmonic 5 0.137 202.95
    ,Harmonic 6 (-2.116) 107.94
    ,Harmonic 7 (-0.622) 82.58
    ,Harmonic 8 0.436 26.03
    ,Harmonic 9 (-3.073) 50.71
    ,Harmonic 10 (-0.296) 97.13
    ,Harmonic 11 2.974 85.15
    ,Harmonic 12 (-3.021) 92.94]