Note22.hs

module Sharc.Instruments.TromboneMuted.Note22 (note22) where

import Sharc.Types

note22 :: Note
note22 = Note
    (Pitch 293.665 50 "d4")
    23
    (Range
        (NoteRange
            (NoteRangeAmplitude 6754.29 23 5.0e-2)
            (NoteRangeHarmonicFreq 1 293.66))
        (NoteRange
            (NoteRangeAmplitude 587.33 2 4127.0)
            (NoteRangeHarmonicFreq 34 9984.61)))
    [Harmonic 1 2.015 574.3
    ,Harmonic 2 (-1.463) 4127.0
    ,Harmonic 3 (-1.878) 352.16
    ,Harmonic 4 2.346 660.13
    ,Harmonic 5 8.4e-2 101.64
    ,Harmonic 6 (-1.87) 57.83
    ,Harmonic 7 2.42 31.6
    ,Harmonic 8 1.104 15.47
    ,Harmonic 9 (-0.779) 15.54
    ,Harmonic 10 1.942 4.06
    ,Harmonic 11 (-0.307) 1.42
    ,Harmonic 12 (-2.996) 0.43
    ,Harmonic 13 0.103 0.62
    ,Harmonic 14 2.494 2.15
    ,Harmonic 15 (-2.01) 3.28
    ,Harmonic 16 1.532 1.38
    ,Harmonic 17 (-1.136) 0.61
    ,Harmonic 18 2.236 0.49
    ,Harmonic 19 (-7.1e-2) 1.32
    ,Harmonic 20 (-1.304) 0.58
    ,Harmonic 21 0.78 0.49
    ,Harmonic 22 0.838 0.63
    ,Harmonic 23 3.111 5.0e-2
    ,Harmonic 24 1.09 0.67
    ,Harmonic 25 0.468 0.36
    ,Harmonic 26 (-2.389) 0.72
    ,Harmonic 27 (-1.431) 0.4
    ,Harmonic 28 0.794 0.61
    ,Harmonic 29 0.281 0.37
    ,Harmonic 30 (-2.364) 0.29
    ,Harmonic 31 0.184 5.0e-2
    ,Harmonic 32 (-1.427) 0.7
    ,Harmonic 33 2.027 0.2
    ,Harmonic 34 (-0.43) 0.13]