sharc-timbre-0.1: src/Sharc/Instruments/ViolinPizzicato/Note36.hs

module Sharc.Instruments.ViolinPizzicato.Note36 (note36) where

import Sharc.Types

note36 :: Note
note36 = Note
    (Pitch 1567.98 79 "g6")
    37
    (Range
        (NoteRange
            (NoteRangeAmplitude 7839.9 5 47.52)
            (NoteRangeHarmonicFreq 1 1567.98))
        (NoteRange
            (NoteRangeAmplitude 1567.98 1 13296.0)
            (NoteRangeHarmonicFreq 6 9407.88)))
    [Harmonic 1 (-1.75) 13296.0
    ,Harmonic 2 (-0.198) 1130.72
    ,Harmonic 3 (-2.938) 223.7
    ,Harmonic 4 (-0.786) 467.95
    ,Harmonic 5 (-2.397) 47.52
    ,Harmonic 6 0.56 52.55]