Note0.hs

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

import Sharc.Types

note0 :: Note
note0 = Note
    (Pitch 195.998 43 "g3")
    1
    (Range
        (NoteRange
            (NoteRangeAmplitude 7447.92 38 1.05)
            (NoteRangeHarmonicFreq 1 195.99))
        (NoteRange
            (NoteRangeAmplitude 391.99 2 2710.0)
            (NoteRangeHarmonicFreq 51 9995.89)))
    [Harmonic 1 (-2.538) 96.81
    ,Harmonic 2 1.952 2710.0
    ,Harmonic 3 (-0.201) 103.19
    ,Harmonic 4 (-0.658) 898.79
    ,Harmonic 5 (-0.328) 921.66
    ,Harmonic 6 1.751 183.49
    ,Harmonic 7 2.054 197.47
    ,Harmonic 8 (-2.318) 203.5
    ,Harmonic 9 0.581 35.09
    ,Harmonic 10 (-2.967) 108.04
    ,Harmonic 11 (-2.69) 107.65
    ,Harmonic 12 (-2.111) 31.85
    ,Harmonic 13 2.953 79.04
    ,Harmonic 14 1.617 22.71
    ,Harmonic 15 (-0.705) 58.28
    ,Harmonic 16 (-1.668) 20.25
    ,Harmonic 17 (-2.66) 29.95
    ,Harmonic 18 0.91 38.02
    ,Harmonic 19 2.796 22.46
    ,Harmonic 20 (-1.03) 34.41
    ,Harmonic 21 (-0.122) 10.74
    ,Harmonic 22 (-2.988) 1.91
    ,Harmonic 23 0.103 4.05
    ,Harmonic 24 (-0.456) 22.32
    ,Harmonic 25 (-0.276) 2.22
    ,Harmonic 26 (-0.299) 2.12
    ,Harmonic 27 (-1.798) 5.56
    ,Harmonic 28 (-0.604) 11.47
    ,Harmonic 29 2.005 7.03
    ,Harmonic 30 1.581 5.78
    ,Harmonic 31 1.315 3.27
    ,Harmonic 32 2.027 1.43
    ,Harmonic 33 (-3.122) 4.95
    ,Harmonic 34 (-2.003) 4.67
    ,Harmonic 35 (-2.055) 2.77
    ,Harmonic 36 0.708 7.75
    ,Harmonic 37 (-1.518) 7.14
    ,Harmonic 38 (-0.591) 1.05
    ,Harmonic 39 (-0.455) 4.48
    ,Harmonic 40 2.144 6.56
    ,Harmonic 41 (-1.391) 5.43
    ,Harmonic 42 1.564 1.3
    ,Harmonic 43 (-1.109) 2.31
    ,Harmonic 44 2.441 2.89
    ,Harmonic 45 (-2.123) 4.86
    ,Harmonic 46 3.088 2.25
    ,Harmonic 47 (-0.586) 3.18
    ,Harmonic 48 2.709 2.68
    ,Harmonic 49 (-0.668) 5.16
    ,Harmonic 50 1.44 3.59
    ,Harmonic 51 2.232 1.36]