/
Lib.hs
executable file
·96 lines (95 loc) · 1.7 KB
/
Lib.hs
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
module Lib (
------------
-- |MusicData
MusicData,
PitchClass (P),
NoteName,
Chord (Chord),
Cadence,
i,
pitchClass,
readNoteName,
mostConsonant,
possibleTriads'',
toTriad,
flatTriad,
sharpTriad,
flatChord,
sharpChord,
flat,
sharp,
showTriad,
dissonanceLevel,
toCadence,
initCadenceState,
pc,
pcSet,
simpleInversions,
intervalVector,
fromCadence,
fromCadence',
movementFromCadence,
toMovement,
fromMovement',
movementFromCadence',
transposeCadence,
rootNote,
toMode,
basePenta,
sortPcSet,
fromChord,
progRoots',
toEnhTriad,
----------
-- experimental stuff
-- Movement,
-- Functionality,
constructCadence,
deconstructCadence,
-----------
-- |Analysis
prog3ecbc, pentaPatterns, -- temp
fullSet3title,
pentatonicSet1title,
pentatonicSet2title,
pentatonicSet3title,
diatonicSet12title,
diatonicSet23title,
diatonicSet31title,
generateScale,
triadSets,
chordSets,
vocab'',
allModes,
majorPentaChr,
okinaPentaChr,
iwatoPentaChr,
(?>),(<?),
-----------
-- |Markov
MarkovMap,
markovMap,
bigrams,
------------
-- |Overtone
chordList',
parseOvertones,
parseNotes,
parseTuning,
parseKey,
parseFunds,
------------
-- |Utility
unique,
-- uniqueAnalysis,
-- |GraphDB
-- testFunc,
-- testData
) where
import Markov -- contains markov chain numerical processing machinery
import MusicData -- defines MusicData and many pitchclass analysis functions
import Analysis -- ad hoc analysis functionality for composing
import Overtone -- mainly parsing functions for generating lists of MusicData
import Utility -- various 'misc' helper functions
import GraphDB -- functions to populate and access markov graph database (Neo4j)
import Perform -- functions related to performance with TidalCycles