module Sharc.Instruments.CelloPizzicato.Note24 (note24) where
import Sharc.Types
note24 :: Note
note24 = Note
(Pitch 261.626 48 "c4")
25
(Range
(NoteRange
(NoteRangeAmplitude 6279.02 24 7.0e-2)
(NoteRangeHarmonicFreq 1 261.62))
(NoteRange
(NoteRangeAmplitude 261.62 1 2411.0)
(NoteRangeHarmonicFreq 37 9680.16)))
[Harmonic 1 (0.783) 2411.0
,Harmonic 2 (1.184) 279.83
,Harmonic 3 (0.48) 217.09
,Harmonic 4 1.989 183.96
,Harmonic 5 (1.729) 202.67
,Harmonic 6 2.447 108.81
,Harmonic 7 (1.335) 96.95
,Harmonic 8 (3.5e-2) 65.99
,Harmonic 9 3.137 12.63
,Harmonic 10 (1.961) 29.59
,Harmonic 11 (1.814) 26.38
,Harmonic 12 (2.832) 11.19
,Harmonic 13 2.576 6.27
,Harmonic 14 (2.671) 28.86
,Harmonic 15 (1.693) 4.49
,Harmonic 16 1.795 1.49
,Harmonic 17 0.414 12.47
,Harmonic 18 (1.946) 3.75
,Harmonic 19 1.138 9.0e-2
,Harmonic 20 (2.694) 0.86
,Harmonic 21 (2.582) 0.9
,Harmonic 22 1.8e-2 0.96
,Harmonic 23 1.118 0.4
,Harmonic 24 1.526 7.0e-2
,Harmonic 25 (0.415) 0.72
,Harmonic 26 0.632 0.45
,Harmonic 27 (1.005) 0.41
,Harmonic 28 (0.532) 0.17
,Harmonic 29 0.268 1.11
,Harmonic 30 2.624 1.36
,Harmonic 31 (0.686) 0.34
,Harmonic 32 (1.079) 0.66
,Harmonic 33 1.294 0.43
,Harmonic 34 0.927 0.29
,Harmonic 35 (0.819) 0.28
,Harmonic 36 (2.53) 0.6
,Harmonic 37 (1.406) 0.27]