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

import Sharc.Types

note37 :: Note
note37 = Note
    (Pitch 1661.22 80 "g#6")
    38
    (Range
        (NoteRange
            (NoteRangeAmplitude 9967.32 6 82.28)
            (NoteRangeHarmonicFreq 1 1661.22))
        (NoteRange
            (NoteRangeAmplitude 1661.22 1 2664.0)
            (NoteRangeHarmonicFreq 6 9967.32)))
    [Harmonic 1 (-1.85) 2664.0
    ,Harmonic 2 (-1.421) 294.42
    ,Harmonic 3 (-3.02) 120.4
    ,Harmonic 4 (-2.956) 124.15
    ,Harmonic 5 (-2.762) 83.78
    ,Harmonic 6 2.556 82.28]