Note2.hs

module Sharc.Instruments.Clarinet.Note2 (note2) where

import Sharc.Types

note2 :: Note
note2 = Note
    (Pitch 164.814 40 "e3")
    3
    (Range
        (NoteRange
            (NoteRangeAmplitude 8899.95 54 0.11)
            (NoteRangeHarmonicFreq 1 164.81))
        (NoteRange
            (NoteRangeAmplitude 164.81 1 1552.0)
            (NoteRangeHarmonicFreq 60 9888.84)))
    [Harmonic 1 1.558 1552.0
    ,Harmonic 2 3.138 25.17
    ,Harmonic 3 (-1.259) 552.05
    ,Harmonic 4 1.425 55.38
    ,Harmonic 5 1.479 434.1
    ,Harmonic 6 (-2.591) 61.87
    ,Harmonic 7 1.467 831.7
    ,Harmonic 8 2.743 218.68
    ,Harmonic 9 1.009 383.34
    ,Harmonic 10 (-1.667) 145.91
    ,Harmonic 11 (-2.864) 47.77
    ,Harmonic 12 (-0.638) 65.69
    ,Harmonic 13 (-2.658) 107.91
    ,Harmonic 14 (-0.462) 97.56
    ,Harmonic 15 (-1.953) 119.14
    ,Harmonic 16 1.879 45.19
    ,Harmonic 17 (-0.595) 127.86
    ,Harmonic 18 2.019 24.29
    ,Harmonic 19 (-1.182) 40.81
    ,Harmonic 20 1.903 41.18
    ,Harmonic 21 (-2.8e-2) 98.49
    ,Harmonic 22 2.743 83.48
    ,Harmonic 23 0.934 25.32
    ,Harmonic 24 3.058 39.22
    ,Harmonic 25 0.346 3.77
    ,Harmonic 26 (-2.659) 17.52
    ,Harmonic 27 (-2.226) 1.2
    ,Harmonic 28 (-0.76) 25.71
    ,Harmonic 29 1.813 4.44
    ,Harmonic 30 0.879 24.56
    ,Harmonic 31 (-2.838) 7.34
    ,Harmonic 32 1.452 10.9
    ,Harmonic 33 (-2.008) 5.83
    ,Harmonic 34 1.018 5.85
    ,Harmonic 35 (-2.684) 2.56
    ,Harmonic 36 1.577 2.34
    ,Harmonic 37 2.542 0.86
    ,Harmonic 38 (-2.558) 1.59
    ,Harmonic 39 (-0.501) 0.77
    ,Harmonic 40 (-1.007) 0.52
    ,Harmonic 41 2.097 0.94
    ,Harmonic 42 (-2.796) 0.81
    ,Harmonic 43 1.452 0.51
    ,Harmonic 44 0.416 0.15
    ,Harmonic 45 (-3.136) 0.98
    ,Harmonic 46 (-2.934) 0.26
    ,Harmonic 47 (-2.025) 0.58
    ,Harmonic 48 (-0.456) 0.11
    ,Harmonic 49 1.061 0.74
    ,Harmonic 50 (-0.826) 0.27
    ,Harmonic 51 1.525 0.88
    ,Harmonic 52 2.342 0.79
    ,Harmonic 53 1.925 1.23
    ,Harmonic 54 1.863 0.11
    ,Harmonic 55 2.87 0.29
    ,Harmonic 56 (-0.233) 0.16
    ,Harmonic 57 1.047 0.33
    ,Harmonic 58 (-0.774) 0.64
    ,Harmonic 59 (-2.248) 0.27
    ,Harmonic 60 3.004 0.31]