Note27.hs

module Sharc.Instruments.CelloMuted.Note27 (note27) where

import Sharc.Types

note27 :: Note
note27 = Note
    (Pitch 311.127 51 "d#4")
    28
    (Range
        (NoteRange
            (NoteRangeAmplitude 9022.68 29 1.01)
            (NoteRangeHarmonicFreq 1 311.12))
        (NoteRange
            (NoteRangeAmplitude 311.12 1 2178.0)
            (NoteRangeHarmonicFreq 32 9956.06)))
    [Harmonic 1 1.671 2178.0
    ,Harmonic 2 1.251 420.15
    ,Harmonic 3 (-1.343) 292.59
    ,Harmonic 4 (-0.271) 247.66
    ,Harmonic 5 0.737 120.01
    ,Harmonic 6 3.094 112.88
    ,Harmonic 7 (-1.561) 34.38
    ,Harmonic 8 (-1.637) 30.64
    ,Harmonic 9 (-1.725) 83.26
    ,Harmonic 10 0.709 15.47
    ,Harmonic 11 (-1.757) 6.6
    ,Harmonic 12 (-2.21) 33.02
    ,Harmonic 13 (-0.838) 7.64
    ,Harmonic 14 3.141 24.1
    ,Harmonic 15 (-2.975) 23.13
    ,Harmonic 16 (-1.959) 5.71
    ,Harmonic 17 1.714 20.43
    ,Harmonic 18 1.714 9.72
    ,Harmonic 19 (-0.966) 13.37
    ,Harmonic 20 1.419 13.37
    ,Harmonic 21 (-1.038) 3.28
    ,Harmonic 22 (-2.844) 4.84
    ,Harmonic 23 1.889 3.5
    ,Harmonic 24 0.152 3.23
    ,Harmonic 25 (-3.037) 1.88
    ,Harmonic 26 1.083 7.47
    ,Harmonic 27 (-2.87) 5.84
    ,Harmonic 28 1.132 4.85
    ,Harmonic 29 (-0.771) 1.01
    ,Harmonic 30 (-0.926) 5.37
    ,Harmonic 31 2.608 5.27
    ,Harmonic 32 0.327 1.99]