{-------------------------------}
{--- Custom stretched tuning ---}
{--- now BP ET!! ---}
{--- 1 cent = 1000 microcent ---}
{-- 2012 Matthias Kronlachner --}
{-------------------------------}
  
declare %stretched[128] := (...
 1527,00000,47831,-5865,40439,00000,-13257, 33048, 00000, -20648, 25656, 00000, {C-2 to B-2}...
 -28040, 18265, 00000, -35431, 10873, 00000, -42823, 3482, 00000, 49786,-3910, 42394, {C-1 to B-1}...
0,-11302,35003,0,-18693,27611,0,-26085,20220,0,-33476,12828, {C0 to B0}...
0,-40868,5437,0,-48259,-1955,44349,0,-9347,36958, 00000, -16738, {C1 to B1}...
29566,0, -24130,22175,0,-31521,14783,0,-38913,7392,0, -46304, {C2 to B2}...
 0, 46304, 0, -7392, 38913, 00000, -14783, 31521, 00000, -22175, 24130, 00000, {C3 to B3}...
-29566,16738, 0, -36958, 9347,0, -44349, 1955, 48259, 0, -5437, 40868, {C4 to B4}...
 0, -12828, 33476, 0, -20220, 26085, 0, -27611, 18693, 0, -35003, 11302, {C5 to B5}...
 0, -42394, 3910, -49786, 0, -3482, 42823, 0, -10873, 35431, 0, -18265,28040) {C6 to C7}