Music.Theory.Tuning.DB.Werckmeister

Andreas Werckmeister (1645-1706).

Documentation

werckmeister_iii_ar :: [Approximate_Ratio]

Approximate ratios for werckmeister_iii.

let c = [0,90,192,294,390,498,588,696,792,888,996,1092]
in map (round . ratio_to_cents) werckmeister_iii_ar == c

werckmeister_iii_ar_c :: [Cents]

Cents for werckmeister_iii.

werckmeister_iii :: Tuning

Werckmeister III, Andreas Werckmeister (1645-1706)

cents_i werckmeister_iii == [0,90,192,294,390,498,588,696,792,888,996,1092]

import Music.Theory.Tuning.Scala
scl <- scl_load "werck3"
cents_i (scale_tuning 0.01 scl) == cents_i werckmeister_iii

werckmeister_iv_ar :: [Approximate_Ratio]

Approximate ratios for werckmeister_iv.

let c = [0,82,196,294,392,498,588,694,784,890,1004,1086]
in map (round . ratio_to_cents) werckmeister_iv_ar == c

werckmeister_iv_c :: [Cents]

Cents for werckmeister_iv.

werckmeister_iv :: Tuning

Werckmeister IV, Andreas Werckmeister (1645-1706)

cents_i werckmeister_iv == [0,82,196,294,392,498,588,694,784,890,1004,1086]

scl <- scl_load "werck4"
cents_i (scale_tuning 0.01 scl) == cents_i werckmeister_iv

werckmeister_v_ar :: [Approximate_Ratio]

Approximate ratios for werckmeister_v.

let c = [0,96,204,300,396,504,600,702,792,900,1002,1098]
in map (round . ratio_to_cents) werckmeister_v_ar == c

werckmeister_v_c :: [Cents]

Cents for werckmeister_v.

werckmeister_v :: Tuning

Werckmeister V, Andreas Werckmeister (1645-1706)

cents_i werckmeister_v == [0,96,204,300,396,504,600,702,792,900,1002,1098]

scl <- scl_load "werck5"
cents_i (scale_tuning 0.01 scl) == cents_i werckmeister_v

werckmeister_vi_r :: [Rational]

Ratios for werckmeister_vi, with supposed correction of 2825 to 4944.

let c = [0,91,186,298,395,498,595,698,793,893,1000,1097]
in map (round . ratio_to_cents) werckmeister_vi_r == c

werckmeister_vi :: Tuning

Werckmeister VI, Andreas Werckmeister (1645-1706)

cents_i werckmeister_vi == [0,91,186,298,395,498,595,698,793,893,1000,1097]

scl <- scl_load "werck6"
cents_i (scale_tuning 0.01 scl) == cents_i werckmeister_vi