Note0.hs

module Sharc.Instruments.TrumpetMutedC.Note0 (note0) where

import Sharc.Types

note0 :: Note
note0 = Note
    (Pitch 184.997 42 "f#3")
    1
    (Range
        (NoteRange
            (NoteRangeAmplitude 4439.92 24 3.71)
            (NoteRangeHarmonicFreq 1 184.99))
        (NoteRange
            (NoteRangeAmplitude 184.99 1 957.0)
            (NoteRangeHarmonicFreq 53 9804.84)))
    [Harmonic 1 1.8 957.0
    ,Harmonic 2 (-1.535) 251.84
    ,Harmonic 3 1.844 109.39
    ,Harmonic 4 (-0.652) 76.03
    ,Harmonic 5 2.749 59.2
    ,Harmonic 6 (-0.429) 26.26
    ,Harmonic 7 (-2.127) 11.98
    ,Harmonic 8 2.033 24.5
    ,Harmonic 9 (-9.1e-2) 50.7
    ,Harmonic 10 1.693 81.82
    ,Harmonic 11 (-1.296) 40.77
    ,Harmonic 12 0.984 54.52
    ,Harmonic 13 (-2.752) 4.98
    ,Harmonic 14 (-1.636) 23.75
    ,Harmonic 15 1.182 31.27
    ,Harmonic 16 (-2.06) 68.32
    ,Harmonic 17 0.501 78.04
    ,Harmonic 18 (-2.939) 81.61
    ,Harmonic 19 1.6e-2 65.69
    ,Harmonic 20 (-3.074) 54.92
    ,Harmonic 21 0.177 43.22
    ,Harmonic 22 (-3.023) 25.46
    ,Harmonic 23 0.636 12.62
    ,Harmonic 24 0.484 3.71
    ,Harmonic 25 (-2.96) 23.33
    ,Harmonic 26 0.239 119.16
    ,Harmonic 27 2.961 112.84
    ,Harmonic 28 (-1.535) 305.58
    ,Harmonic 29 0.972 61.86
    ,Harmonic 30 (-2.545) 12.23
    ,Harmonic 31 (-2.449) 19.96
    ,Harmonic 32 (-2.6e-2) 60.02
    ,Harmonic 33 (-2.396) 88.98
    ,Harmonic 34 0.413 151.76
    ,Harmonic 35 (-2.907) 180.26
    ,Harmonic 36 (-0.65) 204.16
    ,Harmonic 37 1.324 6.33
    ,Harmonic 38 0.343 122.62
    ,Harmonic 39 (-3.009) 65.07
    ,Harmonic 40 (-0.241) 137.75
    ,Harmonic 41 3.088 99.69
    ,Harmonic 42 (-0.444) 87.68
    ,Harmonic 43 2.883 65.46
    ,Harmonic 44 (-9.7e-2) 50.49
    ,Harmonic 45 3.024 54.69
    ,Harmonic 46 (-0.644) 49.46
    ,Harmonic 47 2.594 28.42
    ,Harmonic 48 (-0.891) 24.35
    ,Harmonic 49 0.977 21.82
    ,Harmonic 50 (-2.016) 61.42
    ,Harmonic 51 (-0.461) 24.74
    ,Harmonic 52 (-2.662) 20.34
    ,Harmonic 53 (-5.0e-3) 26.04]