Note16.hs

module Sharc.Instruments.Tuba.Note16 (note16) where

import Sharc.Types

note16 :: Note
note16 = Note
    (Pitch 174.614 41 "f3")
    17
    (Range
        (NoteRange
            (NoteRangeAmplitude 7683.01 44 6.0e-2)
            (NoteRangeHarmonicFreq 1 174.61))
        (NoteRange
            (NoteRangeAmplitude 349.22 2 2572.0)
            (NoteRangeHarmonicFreq 57 9952.99)))
    [Harmonic 1 (-0.761) 2037.15
    ,Harmonic 2 (-1.577) 2572.0
    ,Harmonic 3 (-2.551) 930.25
    ,Harmonic 4 2.253 508.22
    ,Harmonic 5 2.229 187.59
    ,Harmonic 6 (-1.925) 67.82
    ,Harmonic 7 (-2.825) 125.89
    ,Harmonic 8 2.497 55.36
    ,Harmonic 9 1.296 38.25
    ,Harmonic 10 1.05 2.68
    ,Harmonic 11 (-1.665) 8.61
    ,Harmonic 12 (-1.873) 7.6
    ,Harmonic 13 (-1.593) 5.27
    ,Harmonic 14 2.898 1.67
    ,Harmonic 15 (-0.553) 0.45
    ,Harmonic 16 (-1.245) 1.25
    ,Harmonic 17 1.765 0.16
    ,Harmonic 18 1.623 0.81
    ,Harmonic 19 0.443 0.86
    ,Harmonic 20 (-2.894) 0.5
    ,Harmonic 21 1.268 0.62
    ,Harmonic 22 0.22 0.13
    ,Harmonic 23 (-2.748) 0.25
    ,Harmonic 24 2.576 7.0e-2
    ,Harmonic 25 1.928 0.17
    ,Harmonic 26 (-0.124) 0.69
    ,Harmonic 27 (-0.27) 0.54
    ,Harmonic 28 2.286 0.34
    ,Harmonic 29 0.912 0.5
    ,Harmonic 30 1.414 0.26
    ,Harmonic 31 (-0.585) 0.35
    ,Harmonic 32 (-1.471) 0.16
    ,Harmonic 33 1.707 0.1
    ,Harmonic 34 1.9e-2 0.14
    ,Harmonic 35 (-0.508) 0.15
    ,Harmonic 36 (-0.244) 0.11
    ,Harmonic 37 0.131 0.16
    ,Harmonic 38 1.691 0.31
    ,Harmonic 39 (-2.403) 0.2
    ,Harmonic 40 (-3.06) 0.24
    ,Harmonic 41 2.8 0.21
    ,Harmonic 42 0.332 0.22
    ,Harmonic 43 1.361 0.27
    ,Harmonic 44 (-0.848) 6.0e-2
    ,Harmonic 45 (-0.49) 0.19
    ,Harmonic 46 (-0.274) 0.27
    ,Harmonic 47 2.32 9.0e-2
    ,Harmonic 48 (-1.634) 0.18
    ,Harmonic 49 0.508 0.11
    ,Harmonic 50 0.76 0.45
    ,Harmonic 51 1.048 0.1
    ,Harmonic 52 0.852 0.28
    ,Harmonic 53 (-1.349) 0.17
    ,Harmonic 54 (-0.72) 0.13
    ,Harmonic 55 (-1.879) 0.1
    ,Harmonic 56 (-1.454) 0.1
    ,Harmonic 57 1.521 0.15]