Note30.hs

module Sharc.Instruments.ContrabassPizzicato.Note30 (note30) where

import Sharc.Types

note30 :: Note
note30 = Note
    (Pitch 195.998 43 "g3")
    31
    (Range
        (NoteRange
            (NoteRangeAmplitude 6271.93 32 0.26)
            (NoteRangeHarmonicFreq 1 195.99))
        (NoteRange
            (NoteRangeAmplitude 195.99 1 4876.0)
            (NoteRangeHarmonicFreq 51 9995.89)))
    [Harmonic 1 (-2.399) 4876.0
    ,Harmonic 2 (-0.682) 3717.71
    ,Harmonic 3 (-1.408) 134.13
    ,Harmonic 4 2.337 270.46
    ,Harmonic 5 2.939 193.44
    ,Harmonic 6 (-0.324) 143.66
    ,Harmonic 7 (-0.279) 37.86
    ,Harmonic 8 (-3.074) 1.59
    ,Harmonic 9 2.799 17.81
    ,Harmonic 10 (-1.969) 9.72
    ,Harmonic 11 2.411 14.35
    ,Harmonic 12 1.608 3.51
    ,Harmonic 13 2.663 2.62
    ,Harmonic 14 (-0.159) 3.95
    ,Harmonic 15 (-0.722) 10.04
    ,Harmonic 16 0.402 0.76
    ,Harmonic 17 1.198 0.43
    ,Harmonic 18 0.498 2.32
    ,Harmonic 19 (-2.644) 0.58
    ,Harmonic 20 (-0.423) 0.76
    ,Harmonic 21 (-1.687) 1.58
    ,Harmonic 22 0.414 1.52
    ,Harmonic 23 (-1.022) 1.15
    ,Harmonic 24 1.702 1.03
    ,Harmonic 25 (-1.957) 0.91
    ,Harmonic 26 (-2.359) 0.48
    ,Harmonic 27 (-1.988) 1.43
    ,Harmonic 28 1.919 2.51
    ,Harmonic 29 (-2.148) 1.46
    ,Harmonic 30 (-1.707) 0.48
    ,Harmonic 31 (-2.54) 1.23
    ,Harmonic 32 (-0.231) 0.26
    ,Harmonic 33 1.201 1.69
    ,Harmonic 34 (-1.397) 0.55
    ,Harmonic 35 (-0.779) 0.66
    ,Harmonic 36 (-1.412) 0.3
    ,Harmonic 37 (-0.321) 0.61
    ,Harmonic 38 (-0.208) 1.44
    ,Harmonic 39 (-1.144) 0.98
    ,Harmonic 40 (-1.547) 0.74
    ,Harmonic 41 (-0.914) 1.18
    ,Harmonic 42 (-2.382) 0.73
    ,Harmonic 43 1.8 0.81
    ,Harmonic 44 (-1.417) 0.48
    ,Harmonic 45 2.535 0.54
    ,Harmonic 46 1.512 0.3
    ,Harmonic 47 (-2.018) 0.59
    ,Harmonic 48 (-1.622) 0.29
    ,Harmonic 49 (-1.605) 0.49
    ,Harmonic 50 0.521 0.53
    ,Harmonic 51 2.41 0.78]