{VERSION 2 3 "IBM INTEL NT" "2.3" }
{USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 0 1 255 0 0 1 0 1 0 0 
1 0 0 0 0 }{CSTYLE "2D Math" -1 2 "Times" 0 1 0 0 0 0 0 0 2 0 0 0 0 0 
0 }{CSTYLE "2D Output" 2 20 "" 0 1 0 0 255 1 0 0 0 0 0 0 0 0 0 }
{PSTYLE "Normal" -1 0 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 
0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "Maple Output" 0 11 1 
{CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 }3 3 0 -1 -1 -1 0 0 
0 0 0 0 -1 0 }}
{SECT 0 {EXCHG {PARA 0 "" 0 "" {TEXT -1 70 "scales.mws   calculate fre
quencies on musical scale :  27.5*(2)^(N/12)" }}}{EXCHG {PARA 0 "> " 
0 "" {MPLTEXT 1 0 20 "restart;with(plots):" }}}{EXCHG {PARA 0 "> " 0 "
" {MPLTEXT 1 0 22 "for i from 36 to 48 do" }}{PARA 0 "> " 0 "" 
{MPLTEXT 1 0 33 "freq[i]:=evalf(27.5*2^(i/12));od;" }}{PARA 11 "" 1 "
" {XPPMATH 20 "6#>&%%freqG6#\"#O$\"%+A!\"\"" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#>&%%freqG6#\"#P$\"+2)=3L#!\"(" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#>&%%freqG6#\"#Q$\"+1lTpC!\"(" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#>&%%freqG6#\"#R$\"+`cD;E!\"(" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#>&%%freqG6#\"#S$\"+5j#=x#!\"(" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#>&%%freqG6#\"#T$\"+zwkOH!\"(" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#>&%%freqG6#\"#U$\"+O)p76$!\"(" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#>&%%freqG6#\"#V$\"+pbF'H$!\"(" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#>&%%freqG6#\"#W$\"+9BG#\\$!\"(" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#>&%%freqG6#\"#X$\"+GU%**p$!\"(" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#>&%%freqG6#\"#Y$\"+fV&*>R!\"(" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#>&%%freqG6#\"#Z$\"+vp/`T!\"(" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#>&%%freqG6#\"#[$\"%+W!\"\"" }}}{EXCHG {PARA 0 "> " 0 "
" {MPLTEXT 1 0 0 "" }}}}{MARK "0 0 0" 5 }{VIEWOPTS 1 1 0 1 1 1803 }