sharc-timbre-0.1: src/Sharc/Instruments/ViolinsEnsemble/Note34.hs

module Sharc.Instruments.ViolinsEnsemble.Note34 (note34) where

import Sharc.Types

note34 :: Note
note34 = Note
    (Pitch 1396.91 77 "f6")
    35
    (Range
        (NoteRange
            (NoteRangeAmplitude 6984.55 5 89.35)
            (NoteRangeHarmonicFreq 1 1396.91))
        (NoteRange
            (NoteRangeAmplitude 4190.73 3 10508.0)
            (NoteRangeHarmonicFreq 7 9778.37)))
    [Harmonic 1 3.102 9112.26
    ,Harmonic 2 0.888 7305.77
    ,Harmonic 3 (-0.973) 10508.0
    ,Harmonic 4 2.151 180.93
    ,Harmonic 5 1.15 89.35
    ,Harmonic 6 1.818 137.14
    ,Harmonic 7 0.43 121.89]