module Temporal.Music.Western.P12(
module Temporal.Music.Western,
tone,
c, d, e, f, g, a, b,
cs, ds, es, fs, gs, as, bs,
cf, df, ef, ff, gf, af, bf,
eqt, pyth,
hind, hindFs, hindGb
)
where
import Temporal.Music(Score, temp, nx, Step)
import Temporal.Music.Scales(eqt, pyth, hind, hindFs, hindGb)
import Temporal.Music.Western
tone :: Step -> Score (Note a)
tone = nx
c, d, e, f, g, a, b,
cs, ds, es, fs, gs, as, bs,
cf, df, ef, ff, gf, af, bf :: Score (Note a)
c = tone 0
cs = tone 1
d = tone 2
ds = tone 3
e = tone 4
f = tone 5
fs = tone 6
g = tone 7
gs = tone 8
a = tone 9
as = tone 10
b = tone 11
bs = c
es = f
cf = b
df = cs
ef = ds
ff = e
gf = fs
af = gs
bf = as