Note31.hs

module Sharc.Instruments.Contrabass.Note31 (note31) where

import Sharc.Types

note31 :: Note
note31 = Note
    (Pitch 195.998 43 "g3")
    32
    (Range
        (NoteRange
            (NoteRangeAmplitude 9799.9 50 1.2)
            (NoteRangeHarmonicFreq 1 195.99))
        (NoteRange
            (NoteRangeAmplitude 195.99 1 3672.0)
            (NoteRangeHarmonicFreq 51 9995.89)))
    [Harmonic 1 (-1.337) 3672.0
    ,Harmonic 2 (-1.915) 1106.33
    ,Harmonic 3 (-1.912) 1060.71
    ,Harmonic 4 (-1.956) 729.94
    ,Harmonic 5 1.323 398.08
    ,Harmonic 6 (-0.569) 254.56
    ,Harmonic 7 (-2.383) 463.15
    ,Harmonic 8 0.885 445.16
    ,Harmonic 9 (-2.123) 624.92
    ,Harmonic 10 2.925 312.51
    ,Harmonic 11 1.088 261.36
    ,Harmonic 12 1.659 162.96
    ,Harmonic 13 1.579 202.6
    ,Harmonic 14 (-0.775) 213.07
    ,Harmonic 15 (-0.532) 91.98
    ,Harmonic 16 1.4 40.06
    ,Harmonic 17 1.734 53.84
    ,Harmonic 18 2.124 73.41
    ,Harmonic 19 2.312 39.81
    ,Harmonic 20 (-1.17) 8.15
    ,Harmonic 21 2.113 51.06
    ,Harmonic 22 (-2.506) 4.79
    ,Harmonic 23 (-2.955) 53.44
    ,Harmonic 24 2.605 4.75
    ,Harmonic 25 (-2.196) 17.57
    ,Harmonic 26 (-0.905) 17.92
    ,Harmonic 27 1.529 6.51
    ,Harmonic 28 (-1.608) 12.06
    ,Harmonic 29 0.285 27.0
    ,Harmonic 30 (-2.005) 11.46
    ,Harmonic 31 0.478 28.86
    ,Harmonic 32 (-1.34) 46.14
    ,Harmonic 33 1.044 56.86
    ,Harmonic 34 (-1.459) 12.12
    ,Harmonic 35 2.827 28.0
    ,Harmonic 36 (-0.641) 34.4
    ,Harmonic 37 (-0.505) 19.62
    ,Harmonic 38 1.073 14.76
    ,Harmonic 39 (-1.739) 8.93
    ,Harmonic 40 3.2e-2 5.29
    ,Harmonic 41 (-2.827) 6.33
    ,Harmonic 42 (-0.508) 15.63
    ,Harmonic 43 2.632 4.99
    ,Harmonic 44 (-0.43) 12.41
    ,Harmonic 45 2.609 7.57
    ,Harmonic 46 (-1.525) 3.35
    ,Harmonic 47 (-3.025) 9.22
    ,Harmonic 48 (-0.325) 8.84
    ,Harmonic 49 2.874 3.09
    ,Harmonic 50 (-2.555) 1.2
    ,Harmonic 51 (-1.424) 6.43]