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

module Sharc.Instruments.ViolinsEnsemble.Note37 (note37) where

import Sharc.Types

note37 :: Note
note37 = Note
    (Pitch 1661.22 80 "g#6")
    38
    (Range
        (NoteRange
            (NoteRangeAmplitude 8306.1 5 41.48)
            (NoteRangeHarmonicFreq 1 1661.22))
        (NoteRange
            (NoteRangeAmplitude 3322.44 2 5203.0)
            (NoteRangeHarmonicFreq 5 8306.1)))
    [Harmonic 1 (-2.604) 1645.96
    ,Harmonic 2 (-1.682) 5203.0
    ,Harmonic 3 (-1.324) 210.21
    ,Harmonic 4 2.955 56.5
    ,Harmonic 5 2.164 41.48]