Note26.hs

module Sharc.Instruments.TromboneMuted.Note26 (note26) where

import Sharc.Types

note26 :: Note
note26 = Note
    (Pitch 369.994 54 "f#4")
    27
    (Range
        (NoteRange
            (NoteRangeAmplitude 7399.88 20 0.45)
            (NoteRangeHarmonicFreq 1 369.99))
        (NoteRange
            (NoteRangeAmplitude 369.99 1 2677.0)
            (NoteRangeHarmonicFreq 27 9989.83)))
    [Harmonic 1 0.74 2677.0
    ,Harmonic 2 1.833 1506.64
    ,Harmonic 3 2.838 826.74
    ,Harmonic 4 3.033 662.93
    ,Harmonic 5 (-0.547) 390.35
    ,Harmonic 6 3.083 225.72
    ,Harmonic 7 (-0.157) 154.56
    ,Harmonic 8 2.095 19.51
    ,Harmonic 9 1.114 76.53
    ,Harmonic 10 3.113 51.13
    ,Harmonic 11 0.799 19.76
    ,Harmonic 12 2.202 43.18
    ,Harmonic 13 2.382 7.65
    ,Harmonic 14 (-1.268) 5.89
    ,Harmonic 15 1.656 9.51
    ,Harmonic 16 (-2.289) 5.25
    ,Harmonic 17 (-1.283) 2.77
    ,Harmonic 18 (-2.858) 2.7
    ,Harmonic 19 (-2.68) 1.1
    ,Harmonic 20 (-2.772) 0.45
    ,Harmonic 21 (-0.383) 1.23
    ,Harmonic 22 1.972 1.44
    ,Harmonic 23 (-2.782) 1.11
    ,Harmonic 24 (-2.605) 1.2
    ,Harmonic 25 1.618 1.11
    ,Harmonic 26 (-2.268) 2.59
    ,Harmonic 27 3.03 0.99]