S.Mustonen, Survo Users' Guide (1992), p. 329
1 * 2 *Musical intervals in different temperaments
3 * *GLOBAL* 4 *YSCALE=-1,1 XSCALE=0,30 X=0,30,0.01 5 *SIZE=1164,350 YDIV=50,250,50 XDIV=0,1,0 FRAME=0 6 *....................................................................... 7 *HEADER=Pure_Fifth 8 *PLOT Y(X)=(SIN(20*X)+SIN(30*X))/2
/ DEVICE=PS,FIFTH1.PS 9 *....................................................................... 10 *HEADER=Fifth_in_Equal_Temperament 20*2^(7/12)=29.9661415375 11 *PLOT Y(X)=(SIN(20*X)+SIN(29.96614*X))/2
/ DEVICE=PS,FIFTH2.PS 12 *....................................................................... 13 *HEADER=`Wolf'_Fifth_in_Mean_Tone_Temperament 20*128*5^(-11/4)=30.62474 14 *PLOT Y(X)=(SIN(20*X)+SIN(30.62474*X))/2
/ DEVICE=PS,FIFTH3.PS 15 *....................................................................... 16 *PRINT CUR+1,E
17 % 400 18 - picture FIFTH1.PS 19 % 370 20 - picture FIFTH2.PS 21 % 370 22 - picture FIFTH3.PS 23 E 24 *
Index | Catalog | Previous | Next