module Sharc.Instruments.Clarinet.Note3 (note3) where
import Sharc.Types
note3 :: Note
note3 = Note
(Pitch 174.614 41 "f3")
4
(Range
(NoteRange
(NoteRangeAmplitude 8381.47 48 0.18)
(NoteRangeHarmonicFreq 1 174.61))
(NoteRange
(NoteRangeAmplitude 174.61 1 2116.0)
(NoteRangeHarmonicFreq 57 9952.99)))
[Harmonic 1 (1.937) 2116.0
,Harmonic 2 (3.007) 13.35
,Harmonic 3 0.206 776.0
,Harmonic 4 (0.55) 45.67
,Harmonic 5 2.978 467.67
,Harmonic 6 0.295 7.28
,Harmonic 7 (0.742) 1140.76
,Harmonic 8 (1.819) 514.93
,Harmonic 9 (0.918) 357.6
,Harmonic 10 2.877 170.03
,Harmonic 11 (1.084) 262.07
,Harmonic 12 (2.319) 111.88
,Harmonic 13 (1.04) 315.13
,Harmonic 14 (2.291) 55.65
,Harmonic 15 (1.855) 88.9
,Harmonic 16 (2.845) 119.18
,Harmonic 17 (2.421) 154.76
,Harmonic 18 (2.834) 223.66
,Harmonic 19 (2.646) 183.21
,Harmonic 20 2.393 137.07
,Harmonic 21 2.625 30.53
,Harmonic 22 0.889 24.4
,Harmonic 23 0.188 10.92
,Harmonic 24 2.888 4.21
,Harmonic 25 (3.005) 7.45
,Harmonic 26 (3.098) 7.76
,Harmonic 27 2.583 3.71
,Harmonic 28 1.694 27.31
,Harmonic 29 0.602 5.18
,Harmonic 30 1.624 14.7
,Harmonic 31 (0.359) 2.53
,Harmonic 32 1.652 1.35
,Harmonic 33 (1.576) 0.67
,Harmonic 34 0.627 2.33
,Harmonic 35 1.673 1.04
,Harmonic 36 0.961 4.64
,Harmonic 37 (0.721) 3.14
,Harmonic 38 1.335 1.51
,Harmonic 39 (0.14) 0.97
,Harmonic 40 (1.757) 0.39
,Harmonic 41 2.907 0.46
,Harmonic 42 0.517 1.55
,Harmonic 43 (2.538) 0.4
,Harmonic 44 0.332 0.83
,Harmonic 45 (1.513) 1.14
,Harmonic 46 2.721 0.43
,Harmonic 47 (0.757) 0.74
,Harmonic 48 (0.52) 0.18
,Harmonic 49 0.953 0.72
,Harmonic 50 (0.877) 0.2
,Harmonic 51 0.892 2.05
,Harmonic 52 (2.574) 0.79
,Harmonic 53 (0.209) 1.19
,Harmonic 54 (0.124) 0.98
,Harmonic 55 1.119 1.13
,Harmonic 56 (0.894) 0.8
,Harmonic 57 1.61 1.47]