module Sharc.Instruments.ClarinetEflat.Note30 (note30) where

import Sharc.Types

note30 :: Note
note30 = Note
    (Pitch 1108.73 73 "c#6")
    31
    (Range
        (NoteRange
            (NoteRangeAmplitude 7761.11 7 9.21)
            (NoteRangeHarmonicFreq 1 1108.73))
        (NoteRange
            (NoteRangeAmplitude 1108.73 1 2929.0)
            (NoteRangeHarmonicFreq 8 8869.84)))
    [Harmonic 1 1.657 2929.0
    ,Harmonic 2 (-0.823) 258.78
    ,Harmonic 3 (-9.9e-2) 387.14
    ,Harmonic 4 0.582 128.99
    ,Harmonic 5 (-0.676) 46.35
    ,Harmonic 6 1.986 92.29
    ,Harmonic 7 2.85 9.21
    ,Harmonic 8 (-1.599) 19.17]