dom
/
tonalisa
Obserwuj 1
Polub 0
Forkuj 0
Kod Zgłoszenia 0 Oczekujące zmiany 0 Wydania 0 Wiki Aktywność
Nie możesz wybrać więcej, niż 25 tematów Tematy muszą się zaczynać od litery lub cyfry, mogą zawierać myślniki ('-') i mogą mieć do 35 znaków.
1 Commit
1 Gałąź
Gałąź: master
Gałęzie Tagi
${ item.name }
Utwórz gałąź ${ searchTerm }
z 'master'
${ noResults }
tonalisa/lib/sndlib/sndins/samples/fmviolin.fth

1789 lines
88KB
Czysty Bezpośredni odnośnik Wina Historia 

  1. #! /usr/bin/env fth

  2. \ fmviolin.fth -- CLM fmviolin.clm

  3. 

  4. \ Translator/Author: Michael Scholz <mi-scholz@users.sourceforge.net>

  5. \ Created: Mon Dec 06 17:23:22 CET 2004

  6. \ Changed: Sat Jul 28 03:13:10 CEST 2012

  7. 

  8. \ Commentary:

  9. 

  10. \ A translation of Bill Schottstaedt's clm/fmviolin.clm from Lisp

  11. \ into Fth.

  12. 

  13. \ short-example

  14. \ long-example

  15. 

  16. \ Code:

  17. 

  18. #t value *clm-c-version*

  19. 

  20. dl-load sndlib Init_sndlib

  21. *clm-c-version* [if]

  22.   dl-load sndins Init_sndins

  23. [else]

  24.   require clm-ins

  25.   <'> noop alias freeverb

  26. [then]

  27. require clm

  28. 

  29. "test-ins-f.snd" to *clm-file-name*

  30. #t	to *clm-play*

  31. #t	to *clm-statistics*

  32. #t	to *clm-verbose*

  33. 44100	to *clm-srate*

  34. 2	to *clm-channels*

  35. 2	to *clm-reverb-channels*

  36. #t	to *clm-delete-reverb*

  37. 

  38. 1.0	value fmv-fm-index                   

  39. '( 0 0 25 1 75 1 100 0 ) value fmv-amp-env                    

  40. 5.0	value fmv-periodic-vibrato-rate      

  41. 0.0025	value fmv-periodic-vibrato-amp

  42. 16.0	value fmv-random-vibrato-rate        

  43. 0.005	value fmv-random-vibrato-amp

  44. 1000.0	value fmv-noise-freq                 

  45. 0.0	value fmv-noise-amount               

  46. 10.0	value fmv-ind-noise-freq             

  47. 0.0	value fmv-ind-noise-amount           

  48. 20.0	value fmv-amp-noise-freq             

  49. 0.0	value fmv-amp-noise-amount           

  50. '( 0 0 100 0 ) value fmv-gliss-env                  

  51. 0.0	value fmv-glissando-amount           

  52. '( 0 1 25 0.4 75 0.6 100 0 ) value fmv-fm1-env                    

  53. '( 0 1 25 0.4 75 0.6 100 0 ) value fmv-fm2-env                    

  54. '( 0 1 25 0.4 75 0.6 100 0 ) value fmv-fm3-env                    

  55. 1.0	value fmv-fm1-rat                    

  56. 3.0	value fmv-fm2-rat                    

  57. 4.0	value fmv-fm3-rat                    

  58. #f	value fmv-fm1-index                  

  59. #f	value fmv-fm2-index                  

  60. #f	value fmv-fm3-index                  

  61. 0.0	value fmv-base                       

  62. 0.01	value fmv-reverb-amount              

  63. 0.0	value fmv-degree                     

  64. 1.0	value fmv-distance                   

  65. 'violin	value fmv-index-type                 

  66. 

  67. : restore-fm-violin-defaults ( -- )

  68.   1.0                          to fmv-fm-index                   

  69.   '( 0 0 25 1 75 1 100 0 )     to fmv-amp-env                    

  70.   5.0			       to fmv-periodic-vibrato-rate      

  71.   0.0025		       to fmv-periodic-vibrato-amp

  72.   16.0		               to fmv-random-vibrato-rate        

  73.   0.005			       to fmv-random-vibrato-amp

  74.   1000.0		       to fmv-noise-freq                 

  75.   0.0			       to fmv-noise-amount               

  76.   10.0			       to fmv-ind-noise-freq             

  77.   0.0			       to fmv-ind-noise-amount           

  78.   20.0			       to fmv-amp-noise-freq             

  79.   0.0			       to fmv-amp-noise-amount           

  80.   '( 0 0 100 0 )	       to fmv-gliss-env                  

  81.   0.0			       to fmv-glissando-amount           

  82.   '( 0 1 25 0.4 75 0.6 100 0 ) to fmv-fm1-env                    

  83.   '( 0 1 25 0.4 75 0.6 100 0 ) to fmv-fm2-env                    

  84.   '( 0 1 25 0.4 75 0.6 100 0 ) to fmv-fm3-env                    

  85.   1.0			       to fmv-fm1-rat                    

  86.   3.0			       to fmv-fm2-rat                    

  87.   4.0			       to fmv-fm3-rat                    

  88.   #f			       to fmv-fm1-index                  

  89.   #f			       to fmv-fm2-index                  

  90.   #f			       to fmv-fm3-index                  

  91.   0.0			       to fmv-base                       

  92.   0.0			       to fmv-degree                     

  93.   1.0			       to fmv-distance                   

  94.   0.01			       to fmv-reverb-amount              

  95.   'violin		       to fmv-index-type                 

  96. ;

  97. 

  98. : old-fm-violin ( start dur freq amp keyword-args -- )

  99.   :fm-index         fmv-fm-index              get-args { fm-index }

  100.   :amp-env          fmv-amp-env               get-args { amp-env }

  101.   :periodic-vibrato-rate      fmv-periodic-vibrato-rate get-args { pvrate }

  102.   :periodic-vibrato-amplitude fmv-periodic-vibrato-amp  get-args { pvamp }

  103.   :random-vibrato-rate        fmv-random-vibrato-rate   get-args { rvrate }

  104.   :random-vibrato-amplitude   fmv-random-vibrato-amp    get-args { rvamp }

  105.   :noise-freq       fmv-noise-freq            get-args { noise-freq }

  106.   :noise-amount     fmv-noise-amount          get-args { noise-amount }

  107.   :ind-noise-freq   fmv-ind-noise-freq        get-args { ind-noise-freq }

  108.   :ind-noise-amount fmv-ind-noise-amount      get-args { ind-noise-amount }

  109.   :amp-noise-freq   fmv-amp-noise-freq        get-args { amp-noise-freq }

  110.   :amp-noise-amount fmv-amp-noise-amount      get-args { amp-noise-amount }

  111.   :gliss-env        fmv-gliss-env             get-args { gliss-env }

  112.   :glissando-amount fmv-glissando-amount      get-args { gliss-amount }

  113.   :fm1-env          fmv-fm1-env               get-args { fm1-env }

  114.   :fm2-env          fmv-fm2-env               get-args { fm2-env }

  115.   :fm3-env          fmv-fm3-env               get-args { fm3-env }

  116.   :fm1-rat          fmv-fm1-rat               get-args { fm1-rat }

  117.   :fm2-rat          fmv-fm2-rat               get-args { fm2-rat }

  118.   :fm3-rat          fmv-fm3-rat               get-args { fm3-rat }

  119.   :fm1-index        fmv-fm1-index             get-args { fm1-index }

  120.   :fm2-index        fmv-fm2-index             get-args { fm2-index }

  121.   :fm3-index        fmv-fm3-index             get-args { fm3-index }

  122.   :base             fmv-base                  get-args { base }

  123.   :degree           fmv-degree                get-args { degree }

  124.   :distance         fmv-distance              get-args { distance }

  125.   :reverb-amount    fmv-reverb-amount         get-args { revamount }

  126.   :index-type       fmv-index-type            get-args { index-type }

  127.   { start dur freq amp }

  128.   start dur freq amp 0.125 f*

  129.   :fm-index                   fm-index

  130.   :amp-env                    amp-env

  131.   :periodic-vibrato-rate      pvrate

  132.   :periodic-vibrato-amplitude pvamp

  133.   :random-vibrato-rate        rvrate

  134.   :random-vibrato-amplitude   rvamp

  135.   :noise-freq                 noise-freq

  136.   :noise-amount               noise-amount

  137.   :ind-noise-freq             ind-noise-freq

  138.   :ind-noise-amount           ind-noise-amount

  139.   :amp-noise-freq             amp-noise-freq

  140.   :amp-noise-amount           amp-noise-amount

  141.   :gliss-env                  gliss-env

  142.   :glissando-amount           gliss-amount

  143.   :fm1-env                    fm1-env

  144.   :fm2-env                    fm2-env

  145.   :fm3-env                    fm3-env

  146.   :fm1-rat                    fm1-rat

  147.   :fm2-rat                    fm2-rat

  148.   :fm3-rat                    fm3-rat

  149.   :fm1-index                  fm1-index

  150.   :fm2-index                  fm2-index

  151.   :fm3-index                  fm3-index

  152.   :base                       base

  153.   :degree                     degree

  154.   :distance                   distance

  155.   :reverb-amount              revamount

  156.   :index-type                 index-type   fm-violin

  157. ;

  158. 

  159. : vln-one-sin ( start dur freq amp keyword-args -- )

  160.   :degree       0 get-args drop

  161.   :noise-amount 0 get-args drop

  162.   :degree 90.0 random :noise-amount 0.0 old-fm-violin

  163. ;

  164. 

  165. : vln-one-sin-ran ( start dur freq amp keyword-args -- )

  166.   :degree 0 get-args drop

  167.   :degree 90.0 random old-fm-violin

  168. ;

  169. 

  170. : vln-one-sin-exp ( start dur freq amp keyword-args -- )

  171.   :base 0 get-args drop

  172.   :base 0.03125 vln-one-sin

  173. ;

  174. 

  175. : cel-one-sum ( start dur freq amp keyword-args -- )

  176.   :degree     0 get-args drop

  177.   :index-type 0 get-args drop

  178.   :degree 90.0 random :index-type 'cello old-fm-violin

  179. ;

  180. 

  181. : violin-new ( start dur freq amp keyword-args -- )

  182.   :fm-index      1.0                  get-args { fm-index }

  183.   :amp-env       '( 0 0 221 1 240 0 ) get-args { amp-env }

  184.   :reverb-amount 0.2                  get-args { rev-amt }

  185.   { start dur freq amp }

  186.   6 0 do

  187.     1.0 random 0.05 f* i f* start f+	\ start

  188.     1.0 random 0.10 f* i f* dur   f+	\ dur

  189.     freq 400.0 f> if

  190.       1.0 random 0.02 f* 0.99 f+

  191.     else

  192.       1.0 random freq 200.0 f> if 0.01 f* 0.995 f+ else 0.002 f* 0.999 f+ then

  193.     then freq f*			\ freq

  194.     amp					\ amp

  195.     :fm-index      fm-index 1.0 random 0.75 f+ f*

  196.     :amp-env       amp-env

  197.     :reverb-amount rev-amt fm-violin

  198.   loop

  199. ;

  200. 

  201. event: fth-short-example ( -- )

  202.   '( 0 0 221 1 240 0 )             { amp-env }

  203.   '( 0 -1 5 0.25 10 0 100 0.1 ) to fmv-gliss-env

  204.   12.0  			to fmv-random-vibrato-rate

  205.   0.01  			to fmv-random-vibrato-amp

  206.   0.01  			to fmv-glissando-amount

  207.   0.002 			to fmv-noise-amount

  208.   0 8.53 993.323        0.03 :fm-index 0.75 :reverb-amount 0.2 :amp-env amp-env

  209.     violin-new

  210.   5 4.53 5/6 993.323 f* 0.02 :fm-index 0.55 :reverb-amount 0.2 :amp-env amp-env

  211.     violin-new

  212. ;event

  213. 

  214. 0  value *counter*

  215. #f value *timer*

  216. 

  217. : test-info { ctime -- }

  218.   *counter* 1+ to *counter*

  219.   *timer* stop-timer

  220.   "\\ %02d: score %3d   utime %7.3f\n" '( *counter* ctime *timer* utime@ )

  221.     fth-print

  222. ;

  223. 

  224. event: fth-long-example ( -- )

  225.   '( 0 0 1 1 99 1 100 0 )                        { tap }

  226.   '( 0 0 0.5 1 5 1 10 0.5 15 0.25 35 0.1 100 0 ) { metalamp }

  227.   '( 0 0 75 0.1 90 0.3 97 0.6 100 1 )            { whoosh }

  228.   '( 0 0 50 1 100 0 )                            { mamp }

  229.   '( 0 0 65 1 100 0 )                            { n-amp }

  230.   0 { beg }

  231.   0 to *counter*

  232.   make-timer to *timer*

  233. 

  234.   beg test-info

  235. 

  236.   \ 1, score 0

  237.   restore-fm-violin-defaults

  238.   0 to fmv-glissando-amount

  239.   0.1 to fmv-reverb-amount

  240.   metalamp to fmv-amp-env

  241.   6.718 to fmv-fm1-rat

  242.   4.414 to fmv-fm2-rat

  243.   5.141 to fmv-fm3-rat

  244.   beg 0.0000 f+ 1.6 164.5868 0.16   :fm-index 2.1087 vln-one-sin

  245.   beg 0.0003 f+ 4   164.5868 0.2600 :fm-index 1.5488 vln-one-sin

  246.   beg 0.0005 f+ 1.2 125.9513 0.2600 :fm-index 2.2999 vln-one-sin

  247.   beg 0.0005 f+ 2.8 125.9513 0.16   :fm-index 1.6818 vln-one-sin

  248.   beg 0.0013 f+ 4    24.4994 0.3    :fm-index 2.4557 vln-one-sin

  249.   beg 0.0033 f+ 3    24.4994 0.3    :fm-index 1.9387 vln-one-sin

  250.   beg 0.0035 f+ 2.8  24.4994 0.2600 :fm-index 2.3828 vln-one-sin

  251.   beg 0.0040 f+ 0.8  24.4994 0.16   :fm-index 1.7348 vln-one-sin

  252.   beg 0.0043 f+ 4    24.4994 0.3    :fm-index 2.0886 vln-one-sin

  253. 

  254.   beg 6 + dup to beg test-info

  255. 

  256.   \ 2, score 6

  257.   2.718 to fmv-fm1-rat

  258.   4.414 to fmv-fm2-rat

  259.   3.141 to fmv-fm3-rat

  260.   beg 0.0003 f+ 1.2  88.8854 0.16   :fm-index 2.0711 vln-one-sin

  261.   beg 0.0003 f+ 4    88.8854 0.2600 :fm-index 2.0225 vln-one-sin

  262.   beg 0.0005 f+ 1.2 102.7186 0.2600 :fm-index 1.9300 vln-one-sin

  263.   beg 0.0010 f+ 1.2  32.7025 0.3600 :fm-index 1.9269 vln-one-sin

  264.   beg 0.0015 f+ 2.8  32.7025 0.2600 :fm-index 2.2153 vln-one-sin

  265.   beg 0.0023 f+ 2    32.7025 0.2600 :fm-index 2.1968 vln-one-sin

  266.   beg 0.0023 f+ 4    32.7025 0.3600 :fm-index 1.6091 vln-one-sin

  267.   beg 0.0025 f+ 2    32.7025 0.2600 :fm-index 2.1766 vln-one-sin

  268.   beg 0.0035 f+ 1.2  32.7025 0.16   :fm-index 1.5157 vln-one-sin

  269.   beg 0.0040 f+ 0.8  32.7025 0.16   :fm-index 1.8092 vln-one-sin

  270.   beg 0.0043 f+ 2    32.7025 0.2600 :fm-index 1.6198 vln-one-sin

  271. 

  272.   beg 6 + dup to beg test-info

  273. 

  274.   \ 3, score 12

  275.   0.2   to fmv-reverb-amount

  276.   5.141 to fmv-fm3-rat

  277.   beg 0.0003 f+ 1.2 177.7708 0.3  :fm-index 1.9631 vln-one-sin

  278.   beg 0.0003 f+ 4   177.7708 0.3  :fm-index 1.9647 vln-one-sin

  279.   beg 0.0005 f+ 2.8 336.2471 0.16 :fm-index 2.3977 vln-one-sin

  280.   beg 0.0008 f+ 1.2 336.2471 0.25 :fm-index 2.4103 vln-one-sin

  281.   beg 0.0010 f+ 2    65.4050 0.3  :fm-index 1.8419 vln-one-sin

  282.   beg 0.0033 f+ 2    65.4050 0.3  :fm-index 2.4540 vln-one-sin

  283.   beg 0.0043 f+ 4    65.4050 0.16 :fm-index 2.2909 vln-one-sin

  284. 

  285.   beg 6 + dup to beg test-info

  286. 

  287.   \ 4, score 18

  288.   0.1 to fmv-reverb-amount

  289.   beg 0.0003 f+ 1.2 11.1107 0.3  :fm-index 1.8715 vln-one-sin

  290.   beg 0.0003 f+ 4   11.1107 0.3  :fm-index 2.4590 vln-one-sin

  291.   beg 0.0005 f+ 2.8 21.0154 0.16 :fm-index 2.3802 vln-one-sin

  292.   beg 0.0008 f+ 1.2 21.0154 0.25 :fm-index 1.7564 vln-one-sin

  293.   beg 0.0010 f+ 2    4.0878 0.3  :fm-index 2.2529 vln-one-sin

  294.   beg 0.0033 f+ 2    4.0878 0.3  :fm-index 1.9693 vln-one-sin

  295.   beg 0.0043 f+ 4    4.0878 0.16 :fm-index 2.2534 vln-one-sin

  296. 

  297.   beg 6 + dup to beg test-info

  298. 

  299.   \ 5, score 24

  300.   restore-fm-violin-defaults

  301.   0.1 to fmv-noise-amount

  302.   beg 0.0000 f+ 5.4 116.5400 0.25 :fm-index 2.2822 :reverb-amount 0.0280

  303.     :amp-env '( 0 0 0.0556 1 4.0937 0.6 9.1414 0.3 24.2845 0.1 100.0 0 )

  304.     vln-one-sin-ran

  305.   beg 0.0100 f+ 5.4  43.6538 0.25 :fm-index 2.0867 :reverb-amount 0.0202

  306.     :amp-env '( 0 0 0.0556 1 4.0937 0.6 9.1414 0.3 24.2845 0.1 100.0 0 )

  307.     vln-one-sin-ran

  308.   beg 0.0200 f+ 5.4 130.8100 0.25 :fm-index 1.9652 :reverb-amount 0.0270

  309.     :amp-env '( 0 0 0.0556 1 4.0937 0.6 9.1414 0.3 24.2845 0.1 100.0 0 )

  310.     vln-one-sin-ran

  311.   beg 0.0250 f+ 5.4  87.3075 0.25 :fm-index 2.1524 :reverb-amount 0.0260

  312.     :amp-env '( 0 0 0.0556 1 4.0937 0.6 9.1414 0.3 24.2845 0.1 100.0 0 )

  313.     vln-one-sin-ran

  314.   beg 0.0300 f+ 4.5 261.6200 0.15 :fm-index 2.1384 :reverb-amount 0.0242

  315.     :amp-env '( 0 0 0.0667 1 4.1044 0.6 9.1515 0.3 24.2929 0.1 100 0 )

  316.     vln-one-sin-ran

  317.   beg 0.0300 f+ 4.5 174.6150 0.15 :fm-index 2.1425 :reverb-amount 0.0265

  318.     :amp-env '( 0 0 0.0667 1 4.1044 0.6 9.1515 0.3 24.2929 0.1 100 0 )

  319.     vln-one-sin-ran

  320.   beg 0.0300 f+ 4.5 130.8100 0.15 :fm-index 1.9805 :reverb-amount 0.0201

  321.     :amp-env '( 0 0 0.0667 1 4.1044 0.6 9.1515 0.3 24.2929 0.1 100 0 ) 

  322.     vln-one-sin-ran

  323.   beg 0.0350 f+ 4.5  43.6538 0.15 :fm-index 2.4876 :reverb-amount 0.0329

  324.     :amp-env '( 0 0 0.0667 1 4.1044 0.6 9.1515 0.3 24.2929 0.1 100 0 )

  325.     vln-one-sin-ran

  326.   beg 0.0400 f+ 3.6 220      0.15 :fm-index 1.8282 :reverb-amount 0.0244

  327.     :amp-env '( 0 0 0.0833 1 4.1204 0.6 9.1667 0.3 24.3056 0.1 100.0 0 )

  328.     :noise-amount 0.15 vln-one-sin-ran

  329.   beg 0.0400 f+ 3.6 174.6150 0.15 :fm-index 2.3479 :reverb-amount 0.0200

  330.     :amp-env '( 0 0 0.0833 1 4.1204 0.6 9.1667 0.3 24.3056 0.1 100.0 0 )

  331.     :noise-amount 0.15 vln-one-sin-ran

  332.   beg 0.0400 f+ 3.6 523.2400 0.15 :fm-index 1.6424 :reverb-amount 0.0286

  333.     :amp-env '( 0 0 0.0833 1 4.1204 0.6 9.1667 0.3 24.3056 0.1 100.0 0 )

  334.     :noise-amount 0.15 vln-one-sin-ran

  335.   beg 0.0450 f+ 3.6 349.2300 0.15 :fm-index 1.6449 :reverb-amount 0.0333

  336.     :amp-env '( 0 0 0.0833 1 4.1204 0.6 9.1667 0.3 24.3056 0.1 100.0 0 )

  337.     :noise-amount 0.15 vln-one-sin-ran

  338.   beg 0.0500 f+ 6  699.4600 0.15 :fm-index 1.5570 :reverb-amount 0.13 

  339.     :amp-env tap vln-one-sin-ran

  340.   beg 0.0500 f+ 6 1397.9200 0.15 :fm-index 1.5131 :reverb-amount 0.13 

  341.     :amp-env tap vln-one-sin-ran

  342.   beg 0.0500 f+ 6  783.9800 0.15 :fm-index 2.2031 :reverb-amount 0.13 

  343.     :amp-env tap vln-one-sin-ran

  344.   beg 0.0500 f+ 6 1046.4800 0.15 :fm-index 2.2724 :reverb-amount 0.13 

  345.     :amp-env tap vln-one-sin-ran

  346.   beg 0.0600 f+ 9   21.8269 0.15 :fm-index 2.1048 :reverb-amount 0.1 

  347.     :amp-env tap vln-one-sin-ran

  348.   beg 0.0600 f+ 8   87.3075 0.15 :fm-index 1.8854 :reverb-amount 0.1 

  349.     :amp-env tap vln-one-sin-ran

  350.   beg 0.0600 f+ 7   65.4050 0.15 :fm-index 1.6781 :reverb-amount 0.1 

  351.     :amp-env tap vln-one-sin-ran

  352.   beg 0.0600 f+ 8   43.6538 0.15 :fm-index 1.7862 :reverb-amount 0.1 

  353.     :amp-env tap vln-one-sin-ran

  354.   beg 0.0700 f+ 6  175.6150 0.15 :fm-index 2.2656 :reverb-amount 0.1 

  355.     :amp-env tap vln-one-sin-ran

  356.   beg 0.0700 f+ 6  350.2300 0.15 :fm-index 2.4241 :reverb-amount 0.1 

  357.     :amp-env tap vln-one-sin-ran

  358.   beg 0.0700 f+ 6  131.8100 0.15 :fm-index 2.4294 :reverb-amount 0.1 

  359.     :amp-env tap vln-one-sin-ran

  360.   beg 0.0700 f+ 6   32.7025 0.15 :fm-index 1.5779 :reverb-amount 0.1 

  361.     :amp-env tap vln-one-sin-ran

  362.   beg 0.0800 f+ 6  196.9950 0.15 :fm-index 1.8511 :reverb-amount 0.1 

  363.     :amp-env tap vln-one-sin-ran

  364.   beg 0.0800 f+ 6 1047.4800 0.15 :fm-index 2.2148 :reverb-amount 0.1 

  365.     :amp-env tap vln-one-sin-ran

  366.   beg 0.0800 f+ 6  831.6200 0.15 :fm-index 1.9913 :reverb-amount 0.1 

  367.     :amp-env tap vln-one-sin-ran

  368.   beg 0.2700 f+ 6  784.9800 0.16 :fm-index 2.0693 :reverb-amount 0.1 

  369.     :amp-env tap vln-one-sin-ran

  370.   beg 0.2700 f+ 6   64.4050 0.16 :fm-index 1.6920 :reverb-amount 0.1 

  371.     :amp-env tap vln-one-sin-ran

  372.   beg 0.2700 f+ 6  208.6550 0.16 :fm-index 2.2597 :reverb-amount 0.1 

  373.     :amp-env tap vln-one-sin-ran

  374.   beg 0.2700 f+ 6   43.6538 0.16 :fm-index 2.2522 :reverb-amount 0.1 

  375.     :amp-env tap vln-one-sin-ran

  376. 

  377.   beg 12 + dup to beg test-info

  378. 

  379.   \ 6, score 36

  380.   restore-fm-violin-defaults

  381.   beg 0.0000 f+ 1.8 349.2300 0.16 :fm-index 2.1541 :reverb-amount 0.0225

  382.     :amp-env '( 0 0 0.1667 1 4.2003 0.6 9.2424 0.3 24.3687 0.1 100 0 )

  383.     :noise-amount 0.0500 vln-one-sin-ran

  384.   beg 0.0100 f+ 2.7 146.8300 0.16 :fm-index 2.3335 :reverb-amount 0.0274

  385.     :amp-env '( 0 0 0.1111 1 4.1470 0.6 9.1919 0.3 24.3266 0.1 100.0 0 )

  386.     :noise-amount 0.0500 vln-one-sin-ran

  387.   beg 0.0200 f+ 1.8 880      0.16 :fm-index 2.1910 :reverb-amount 0.0279

  388.     :amp-env '( 0 0 0.1667 1 4.2003 0.6 9.2424 0.3 24.3687 0.1 100 0 )

  389.     :noise-amount 0.0500 vln-one-sin-ran

  390.   beg 0.0250 f+ 3.6  73.4150 0.16 :fm-index 2.1410 :reverb-amount 0.0223

  391.     :amp-env '( 0 0 0.0833 1 4.1204 0.6 9.1667 0.3 24.3056 0.1 100.0 0 )

  392.     :noise-amount 0.0500 vln-one-sin-ran

  393.   beg 0.0300 f+ 2.7  87.3075 0.16 :fm-index 1.8491 :reverb-amount 0.0217

  394.     :amp-env '( 0 0 0.1111 1 4.1470 0.6 9.1919 0.3 24.3266 0.1 100.0 0 )

  395.     :noise-amount 0.0010 vln-one-sin-ran

  396.   beg 0.0300 f+ 2.7  75.5662 0.16 :fm-index 1.9191 :reverb-amount 0.0204

  397.     :amp-env '( 0 0 0.1111 1 4.1470 0.6 9.1919 0.3 24.3266 0.1 100.0 0 )

  398.     :noise-amount 0.0010 vln-one-sin-ran

  399.   beg 0.0400 f+ 3.6  52.3432 0.16 :fm-index 1.6090 :reverb-amount 0.0296

  400.     :amp-env '( 0 0 0.0833 1 4.1204 0.6 9.1667 0.3 24.3056 0.1 100.0 0 )

  401.     :noise-amount 0.0010 vln-one-sin-ran

  402.   beg 0.0450 f+ 1.8  73.4150 0.16 :fm-index 2.2201 :reverb-amount 0.0221

  403.     :amp-env '( 0 0 0.1667 1 4.2003 0.6 9.2424 0.3 24.3687 0.1 100 0 )

  404.     :noise-amount 0.0010 vln-one-sin-ran

  405.   beg 0.0500 f+ 4   116.5400 0.06 :fm-index 2.0230 :reverb-amount 0.1

  406.     :amp-env tap :noise-amount 0.0010 vln-one-sin-ran

  407.   beg 0.0500 f+ 4    97.9975 0.06 :fm-index 1.7284 :reverb-amount 0.1

  408.     :amp-env tap :noise-amount 0.0010 vln-one-sin-ran

  409.   beg 0.0600 f+ 4    36.7075 0.06 :fm-index 1.6845 :reverb-amount 0.1

  410.     :amp-env tap :noise-amount 0.0010 vln-one-sin-ran

  411.   beg 0.0650 f+ 4    97.9975 0.06 :fm-index 2.4616 :reverb-amount 0.1

  412.     :amp-env tap :noise-amount 0.0010 vln-one-sin-ran

  413. 

  414.   beg 7 + dup to beg test-info

  415. 

  416.   \ 7, score 43

  417.   beg 0.0000 f+ 1.8 261.6200 0.16 :fm-index 2.2576 :reverb-amount 0.0286

  418.     :amp-env '( 0 0 0.1667 1 4.2003 0.6 9.2424 0.3 24.3687 0.1 100 0 )

  419.     :noise-amount 0.0100 vln-one-sin-ran

  420.   beg 0.0100 f+ 2.7 130.8100 0.16 :fm-index 2.1530 :reverb-amount 0.0330

  421.     :amp-env '( 0 0 0.1111 1 4.1470 0.6 9.1919 0.3 24.3266 0.1 100.0 0 )

  422.     :noise-amount 0.0100 vln-one-sin-ran

  423.   beg 0.0200 f+ 1.8 523.2400 0.16 :fm-index 2.0608 :reverb-amount 0.0235

  424.     :amp-env '( 0 0 0.1667 1 4.2003 0.6 9.2424 0.3 24.3687 0.1 100 0 )

  425.     :noise-amount 0.0100 vln-one-sin-ran

  426.   beg 0.0250 f+ 3.6  65.4050 0.16 :fm-index 2.2203 :reverb-amount 0.0234

  427.     :amp-env '( 0 0 0.0833 1 4.1204 0.6 9.1667 0.3 24.3056 0.1 100.0 0 )

  428.     :noise-amount 0.0100 vln-one-sin-ran

  429.   beg 0.0300 f+ 2.7  65.4050 0.16 :fm-index 1.7089 :reverb-amount 0.0208

  430.     :amp-env '( 0 0 0.1111 1 4.1470 0.6 9.1919 0.3 24.3266 0.1 100.0 0 )

  431.     :noise-amount 0.0010 vln-one-sin-ran

  432.   beg 0.0300 f+ 2.7 130.8100 0.16 :fm-index 2.2948 :reverb-amount 0.0269

  433.     :amp-env '( 0 0 0.1111 1 4.1470 0.6 9.1919 0.3 24.3266 0.1 100.0 0 )

  434.     :noise-amount 0.0010 vln-one-sin-ran

  435.   beg 0.0400 f+ 3.6  32.7025 0.16 :fm-index 1.7677 :reverb-amount 0.0288

  436.     :amp-env '( 0 0 0.0833 1 4.1204 0.6 9.1667 0.3 24.3056 0.1 100.0 0 )

  437.     :noise-amount 0.0010 vln-one-sin-ran

  438.   beg 0.0450 f+ 1.8  32.7025 0.16 :fm-index 1.9030 :reverb-amount 0.0209

  439.     :amp-env '( 0 0 0.1667 1 4.2003 0.6 9.2424 0.3 24.3687 0.1 100 0 )

  440.     :noise-amount 0.0010 vln-one-sin-ran

  441.   beg 0.0500 f+ 4    65.4050 0.06 :fm-index 2.2757 :reverb-amount 0.1

  442.     :amp-env tap :noise-amount 0.0010 vln-one-sin-ran

  443.   beg 0.0500 f+ 4    65.4050 0.06 :fm-index 2.2435 :reverb-amount 0.1

  444.     :amp-env tap :noise-amount 0.0010 vln-one-sin-ran

  445.   beg 0.0600 f+ 4    32.7025 0.06 :fm-index 1.9619 :reverb-amount 0.1

  446.     :amp-env tap :noise-amount 0.0010 vln-one-sin-ran

  447.   beg 0.0650 f+ 4    65.4050 0.06 :fm-index 2.0207 :reverb-amount 0.1

  448.     :amp-env tap :noise-amount 0.0010 vln-one-sin-ran

  449. 

  450.   beg 6 + dup to beg test-info

  451. 

  452.   \ 8, score 49

  453.   beg 0.0100 f+ 0.9  3135.9200 0.16 :fm-index 2.1204 :reverb-amount 0.0024

  454.     :amp-env '( 0 0 0.3333 1 4.3603 0.6 9.3939 0.3 24.4950 0.1 100.0 0 )

  455.     :noise-amount 0.0100 vln-one-sin-ran

  456.   beg 0.0100 f+ 0.45 1567.96   0.16 :fm-index 2.0691 :reverb-amount 0.0025

  457.     :amp-env '( 0 0 0.6667 1 4.6801 0.6 9.6970 0.3 24.7475 0.1 100 0 )

  458.     :noise-amount 0.0100 vln-one-sin-ran

  459.   beg 0.0200 f+ 0.9  6271.8400 0.16 :fm-index 2.2081 :reverb-amount 0.0022

  460.     :amp-env '( 0 0 0.3333 1 4.3603 0.6 9.3939 0.3 24.4950 0.1 100.0 0 )

  461.     :noise-amount 0.0100 vln-one-sin-ran

  462.   beg 0.0250 f+ 0.9   783.9800 0.16 :fm-index 1.8719 :reverb-amount 0.0022

  463.     :amp-env '( 0 0 0.3333 1 4.3603 0.6 9.3939 0.3 24.4950 0.1 100.0 0 )

  464.     :noise-amount 0.0100 vln-one-sin-ran

  465.   beg 0.0300 f+ 0.27  783.9800 0.16 :fm-index 1.9705 :reverb-amount 0.0020

  466.     :amp-env '( 0 0 1.1111 1 5.1066 0.6 10.1010 0.3 25.0842 0.1 100.0 0 )

  467.     :noise-amount 0.0100 vln-one-sin-ran

  468.   beg 0.0300 f+ 0.63 1567.96   0.16 :fm-index 1.6778 :reverb-amount 0.0021

  469.     :amp-env '( 0 0 0.4762 1 4.4974 0.6 9.5238 0.3 24.6032 0.1 100.0 0 )

  470.     :noise-amount 0.0100 vln-one-sin-ran

  471.   beg 0.0400 f+ 0.9   391.9900 0.16 :fm-index 1.9558 :reverb-amount 0.0023

  472.     :amp-env '( 0 0 0.3333 1 4.3603 0.6 9.3939 0.3 24.4950 0.1 100.0 0 )

  473.     :noise-amount 0.0100 vln-one-sin-ran

  474.   beg 0.0450 f+ 0.45  195.9950 0.16 :fm-index 2.1344 :reverb-amount 0.0027

  475.     :amp-env '( 0 0 0.6667 1 4.6801 0.6 9.6970 0.3 24.7475 0.1 100 0 )

  476.     :noise-amount 0.0100 vln-one-sin-ran

  477.   beg 0.050 f+ 2  783.980 0.16 :reverb-amount 0.01 :amp-env tap 

  478.     :noise-amount 0.009 vln-one-sin-ran

  479.   beg 0.050 f+ 1 1567.960 0.16 :reverb-amount 0.01 :amp-env tap 

  480.     :noise-amount 0.009 vln-one-sin-ran

  481.   beg 0.060 f+ 2  391.990 0.16 :reverb-amount 0.01 :amp-env tap 

  482.     :noise-amount 0.009 vln-one-sin-ran

  483.   beg 0.065 f+ 1  783.980 0.16 :reverb-amount 0.01 :amp-env tap 

  484.     :noise-amount 0.009 vln-one-sin-ran

  485.   beg 0.070 f+ 2  195.995 0.16 :reverb-amount 0.01 :amp-env tap 

  486.     :noise-amount 0.004 vln-one-sin-ran

  487.   beg 0.070 f+ 1 1567.960 0.16 :reverb-amount 0.01 :amp-env tap 

  488.     :noise-amount 0.004 vln-one-sin-ran

  489.   beg 0.080 f+ 1  784.980 0.16 :reverb-amount 0.01 :amp-env tap 

  490.     :noise-amount 0.004 vln-one-sin-ran

  491.   beg 0.085 f+ 2  391.990 0.16 :reverb-amount 0.01 :amp-env tap 

  492.     :noise-amount 0.004 vln-one-sin-ran

  493. 

  494.   beg 6 + dup to beg test-info

  495. 

  496.   \ 9, score 55

  497.   beg 0.0100 f+ 0.9  97.9975 0.1 :fm-index 2.0885 :reverb-amount 0.0031

  498.     :amp-env '( 0 0 0.3333 1 4.3603 0.6 9.3939 0.3 24.4950 0.1 100.0 0 )

  499.     :noise-amount 0.0100 vln-one-sin-ran

  500.   beg 0.0100 f+ 1.8  48.9988 0.1 :fm-index 2.2269 :reverb-amount 0.0026

  501.     :amp-env '( 0 0 0.1667 1 4.2003 0.6 9.2424 0.3 24.3687 0.1 100 0 )

  502.     :noise-amount 0.0100 vln-one-sin-ran

  503.   beg 0.0200 f+ 0.9 195.9950 0.1 :fm-index 2.0305 :reverb-amount 0.0032

  504.     :amp-env '( 0 0 0.3333 1 4.3603 0.6 9.3939 0.3 24.4950 0.1 100.0 0 )

  505.     :noise-amount 0.0100 vln-one-sin-ran

  506.   beg 0.0250 f+ 0.9  24.4994 0.1 :fm-index 2.4934 :reverb-amount 0.0025

  507.     :amp-env '( 0 0 0.3333 1 4.3603 0.6 9.3939 0.3 24.4950 0.1 100.0 0 )

  508.     :noise-amount 0.0100 vln-one-sin-ran

  509.   beg 0.0300 f+ 1.8  97.9975 0.1 :fm-index 2.4039 :reverb-amount 0.0023

  510.     :amp-env '( 0 0 0.1667 1 4.2003 0.6 9.2424 0.3 24.3687 0.1 100 0 )

  511.     :noise-amount 0.0400 vln-one-sin-ran

  512.   beg 0.0300 f+ 0.9 195.9950 0.1 :fm-index 1.5159 :reverb-amount 0.0021

  513.     :amp-env '( 0 0 0.3333 1 4.3603 0.6 9.3939 0.3 24.4950 0.1 100.0 0 )

  514.     :noise-amount 0.0400 vln-one-sin-ran

  515.   beg 0.0300 f+ 0.9 392.9900 0.1 :fm-index 2.2122 :reverb-amount 0.0028

  516.     :amp-env '( 0 0 0.3333 1 4.3603 0.6 9.3939 0.3 24.4950 0.1 100.0 0 )

  517.     :noise-amount 0.0400 vln-one-sin-ran

  518.   beg 0.0300 f+ 1.8 784.9800 0.1 :fm-index 2.1574 :reverb-amount 0.0020

  519.     :amp-env '( 0 0 0.1667 1 4.2003 0.6 9.2424 0.3 24.3687 0.1 100 0 )

  520.     :noise-amount 0.0400 vln-one-sin-ran

  521.   beg 0.0300 f+ 2.7  24.4994 0.1 :fm-index 2.1963 :reverb-amount 0.0031

  522.     :amp-env '( 0 0 0.1111 1 4.1470 0.6 9.1919 0.3 24.3266 0.1 100.0 0 )

  523.     :noise-amount 0.0100 vln-one-sin-ran

  524.   beg 0.0300 f+ 1.8  48.9988 0.1 :fm-index 1.9761 :reverb-amount 0.0032

  525.     :amp-env '( 0 0 0.1667 1 4.2003 0.6 9.2424 0.3 24.3687 0.1 100 0 )

  526.     :noise-amount 0.0100 vln-one-sin-ran

  527.   beg 0.0400 f+ 2.7  12.2497 0.1 :fm-index 1.5088 :reverb-amount 0.0021

  528.     :amp-env '( 0 0 0.1111 1 4.1470 0.6 9.1919 0.3 24.3266 0.1 100.0 0 )

  529.     :noise-amount 0.0100 vln-one-sin-ran

  530.   beg 0.0450 f+ 1.8   6.1248 0.1 :fm-index 1.7384 :reverb-amount 0.0021

  531.     :amp-env '( 0 0 0.1667 1 4.2003 0.6 9.2424 0.3 24.3687 0.1 100 0 )

  532.     :noise-amount 0.0100 vln-one-sin-ran

  533.   beg 0.050 f+ 2 24.4994 0.1 :reverb-amount 0.1 :amp-env tap 

  534.     :noise-amount 0.004 vln-one-sin-ran

  535.   beg 0.050 f+ 1 48.9988 0.1 :reverb-amount 0.1 :amp-env tap 

  536.     :noise-amount 0.004 vln-one-sin-ran

  537.   beg 0.060 f+ 2 12.2497 0.1 :reverb-amount 0.1 :amp-env tap 

  538.     :noise-amount 0.004 vln-one-sin-ran

  539.   beg 0.065 f+ 1 24.4994 0.1 :reverb-amount 0.1 :amp-env tap 

  540.     :noise-amount 0.004 vln-one-sin-ran

  541.   beg 0.070 f+ 2  6.1248 0.1 :fm-index 1.2474 :reverb-amount 0.1 :amp-env tap

  542.     :noise-amount 0.004 vln-one-sin-ran

  543.   beg 0.070 f+ 1 48.9988 0.1 :fm-index 0.7526 :reverb-amount 0.1 :amp-env tap

  544.     :noise-amount 0.004 vln-one-sin-ran

  545.   beg 0.080 f+ 1 25.4994 0.1 :fm-index 1.1080 :reverb-amount 0.1 :amp-env tap

  546.     :noise-amount 0.004 vln-one-sin-ran

  547.   beg 0.085 f+ 2 12.2497 0.1 :fm-index 1.0859 :reverb-amount 0.1 :amp-env tap

  548.     :noise-amount 0.004 vln-one-sin-ran

  549.   beg 0.090 f+ 4 97.9975 0.1 :fm-index 2.4788 :reverb-amount 0.1 :amp-env tap

  550.     :noise-amount 0.004 vln-one-sin-ran

  551.   beg 0.090 f+ 3 48.9988 0.1 :fm-index 1.8980 :reverb-amount 0.1 :amp-env tap

  552.     :noise-amount 0.004 vln-one-sin-ran

  553.   beg 0.090 f+ 3 25.4994 0.1 :fm-index 2.1151 :reverb-amount 0.1 :amp-env tap

  554.     :noise-amount 0.004 vln-one-sin-ran

  555.   beg 0.095 f+ 5 12.2497 0.1 :fm-index 2.3224 :reverb-amount 0.1 :amp-env tap

  556.     :noise-amount 0.004 vln-one-sin-ran

  557. 

  558.   beg 6 + dup to beg test-info

  559. 

  560.   \ 10, score 61

  561.   beg 0.2100 f+ 0.9 123.4725 0.1 :reverb-amount 0.0031

  562.     :amp-env '( 0 0 0.3333 1 4.3603 0.6 9.3939 0.3 24.4950 0.1 100.0 0 )

  563.     :noise-amount 0.0100 vln-one-sin-ran

  564.   beg 0.2100 f+ 1.8  61.7363 0.1 :reverb-amount 0.0023

  565.     :amp-env '( 0 0 0.1667 1 4.2003 0.6 9.2424 0.3 24.3687 0.1 100 0 )

  566.     :noise-amount 0.0100 vln-one-sin-ran

  567.   beg 0.2200 f+ 0.9 246.9450 0.1 :reverb-amount 0.0023

  568.     :amp-env '( 0 0 0.3333 1 4.3603 0.6 9.3939 0.3 24.4950 0.1 100.0 0 )

  569.     :noise-amount 0.0100 vln-one-sin-ran

  570.   beg 0.2250 f+ 0.9  30.8681 0.1 :reverb-amount 0.0026

  571.     :amp-env '( 0 0 0.3333 1 4.3603 0.6 9.3939 0.3 24.4950 0.1 100.0 0 )

  572.     :noise-amount 0.0100 vln-one-sin-ran

  573.   beg 0.2300 f+ 1.8 123.4725 0.1 :reverb-amount 0.0027

  574.     :amp-env '( 0 0 0.1667 1 4.2003 0.6 9.2424 0.3 24.3687 0.1 100 0 )

  575.     :noise-amount 0.0400 vln-one-sin-ran

  576.   beg 0.2300 f+ 0.9 246.9450 0.1 :reverb-amount 0.0026

  577.     :amp-env '( 0 0 0.3333 1 4.3603 0.6 9.3939 0.3 24.4950 0.1 100.0 0 )

  578.     :noise-amount 0.0400 vln-one-sin-ran

  579.   beg 0.2300 f+ 0.9 494.8900 0.1 :reverb-amount 0.0020

  580.     :amp-env '( 0 0 0.3333 1 4.3603 0.6 9.3939 0.3 24.4950 0.1 100.0 0 )

  581.     :noise-amount 0.0400 vln-one-sin-ran

  582.   beg 0.2300 f+ 1.8 988.7800 0.1 :reverb-amount 0.0025

  583.     :amp-env '( 0 0 0.1667 1 4.2003 0.6 9.2424 0.3 24.3687 0.1 100 0 )

  584.     :noise-amount 0.0400 vln-one-sin-ran

  585.   beg 0.2300 f+ 2.7  30.8681 0.1 :reverb-amount 0.0028

  586.     :amp-env '( 0 0 0.1111 1 4.1470 0.6 9.1919 0.3 24.3266 0.1 100.0 0 )

  587.     :noise-amount 0.0100 vln-one-sin-ran

  588.   beg 0.2300 f+ 1.8  61.7363 0.1 :reverb-amount 0.0023

  589.     :amp-env '( 0 0 0.1667 1 4.2003 0.6 9.2424 0.3 24.3687 0.1 100 0 )

  590.     :noise-amount 0.0100 vln-one-sin-ran

  591.   beg 0.2400 f+ 2.7  15.4341 0.1 :reverb-amount 0.0030

  592.     :amp-env '( 0 0 0.1111 1 4.1470 0.6 9.1919 0.3 24.3266 0.1 100.0 0 )

  593.     :noise-amount 0.0100 vln-one-sin-ran

  594.   beg 0.2450 f+ 1.8  20.5788 0.1 :reverb-amount 0.0023

  595.     :amp-env '( 0 0 0.1667 1 4.2003 0.6 9.2424 0.3 24.3687 0.1 100 0 )

  596.     :noise-amount 0.0100 vln-one-sin-ran

  597.   beg 0.250 f+ 2 30.8681 0.1 :reverb-amount 0.1 :amp-env tap 

  598.     :noise-amount 0.009 vln-one-sin-ran

  599.   beg 0.250 f+ 1 61.7363 0.1 :reverb-amount 0.1 :amp-env tap 

  600.     :noise-amount 0.009 vln-one-sin-ran

  601.   beg 0.260 f+ 2 15.4341 0.1 :reverb-amount 0.1 :amp-env tap 

  602.     :noise-amount 0.009 vln-one-sin-ran

  603.   beg 0.265 f+ 1 30.8681 0.1 :reverb-amount 0.1 :amp-env tap 

  604.     :noise-amount 0.009 vln-one-sin-ran

  605.   beg 0.271 f+ 2 30.8681 0.1 :reverb-amount 0.1 :amp-env tap 

  606.     :noise-amount 0.004 vln-one-sin-ran

  607.   beg 0.271 f+ 1 61.7363 0.1 :reverb-amount 0.1 :amp-env tap 

  608.     :noise-amount 0.004 vln-one-sin-ran

  609.   beg 0.281 f+ 1 31.8681 0.1 :reverb-amount 0.1 :amp-env tap 

  610.     :noise-amount 0.004 vln-one-sin-ran

  611.   beg 0.286 f+ 2 15.4341 0.1 :reverb-amount 0.1 :amp-env tap 

  612.     :noise-amount 0.004 vln-one-sin-ran

  613. 

  614.   beg 8 + dup to beg test-info

  615. 

  616.   \ 11, score 69

  617.   '( 0 0 1 1 100 0 ) { yup }

  618.   beg 0.0100 f+ 0.9  3135.9200 0.16 :fm-index 1.7299 :reverb-amount 0.0026

  619.     :amp-env '( 0 0 0.3333 1 4.3603 0.6 9.3939 0.3 24.4950 0.1 100.0 0 )

  620.     :noise-amount 0.0100 vln-one-sin-ran

  621.   beg 0.0100 f+ 0.45 1464.6987 0.16 :fm-index 1.9173 :reverb-amount 0.0027

  622.     :amp-env '( 0 0 0.6667 1 4.6801 0.6 9.6970 0.3 24.7475 0.1 100 0 )

  623.     :noise-amount 0.0100 vln-one-sin-ran

  624.   beg 0.0200 f+ 0.9  6714.0048 0.16 :fm-index 2.4604 :reverb-amount 0.0032

  625.     :amp-env '( 0 0 0.3333 1 4.3603 0.6 9.3939 0.3 24.4950 0.1 100.0 0 )

  626.     :noise-amount 0.0100 vln-one-sin-ran

  627.   beg 0.0250 f+ 0.9   684.1190 0.16 :fm-index 1.9969 :reverb-amount 0.0021

  628.     :amp-env '( 0 0 0.3333 1 4.3603 0.6 9.3939 0.3 24.4950 0.1 100.0 0 )

  629.     :noise-amount 0.0100 vln-one-sin-ran

  630.   beg 0.0300 f+ 0.27  684.1190 0.16 :fm-index 2.0022 :reverb-amount 0.0026

  631.     :amp-env '( 0 0 1.1111 1 5.1066 0.6 10.1010 0.3 25.0842 0.1 100.0 0 )

  632.     :noise-amount 0.0100 vln-one-sin-ran

  633.   beg 0.0300 f+ 0.63 1464.6987 0.16 :fm-index 2.1058 :reverb-amount 0.0027

  634.     :amp-env '( 0 0 0.4762 1 4.4974 0.6 9.5238 0.3 24.6032 0.1 100.0 0 )

  635.     :noise-amount 0.0100 vln-one-sin-ran

  636.   beg 0.0400 f+ 0.9   319.5325 0.16 :fm-index 2.2293 :reverb-amount 0.0029

  637.     :amp-env '( 0 0 0.3333 1 4.3603 0.6 9.3939 0.3 24.4950 0.1 100.0 0 )

  638.     :noise-amount 0.0100 vln-one-sin-ran

  639.   beg 0.0450 f+ 0.45  149.2445 0.16 :fm-index 1.5780 :reverb-amount 0.0025

  640.     :amp-env '( 0 0 0.6667 1 4.6801 0.6 9.6970 0.3 24.7475 0.1 100 0 )

  641.     :noise-amount 0.0100 vln-one-sin-ran

  642.   beg 0.050 f+ 1  684.1190 0.16 :reverb-amount 0.01 :amp-env yup 

  643.     :noise-amount 0.009 vln-one-sin-ran

  644.   beg 0.050 f+ 1 1464.6987 0.16 :reverb-amount 0.01 :amp-env yup 

  645.     :noise-amount 0.009 vln-one-sin-ran

  646.   beg 0.060 f+ 1  319.5325 0.16 :reverb-amount 0.01 :amp-env yup 

  647.     :noise-amount 0.009 vln-one-sin-ran

  648.   beg 0.065 f+ 1  684.1190 0.16 :reverb-amount 0.01 :amp-env yup 

  649.     :noise-amount 0.009 vln-one-sin-ran

  650.   beg 0.070 f+ 1  149.2445 0.16 :reverb-amount 0.01 :amp-env yup 

  651.     :noise-amount 0.004 vln-one-sin-ran

  652.   beg 0.070 f+ 1 1464.6987 0.16 :reverb-amount 0.01 :amp-env yup 

  653.     :noise-amount 0.004 vln-one-sin-ran

  654.   beg 0.080 f+ 1  561.6022 0.16 :reverb-amount 0.01 :amp-env yup 

  655.     :noise-amount 0.004 vln-one-sin-ran

  656.   beg 0.085 f+ 1  319.5325 0.16 :reverb-amount 0.01 :amp-env yup 

  657.     :noise-amount 0.004 vln-one-sin-ran

  658. 

  659.   beg 3 + dup to beg test-info

  660. 

  661.   \ 12, score 72

  662.   beg 0.0100 f+ 0.9 3135.9200 0.16 :fm-index 1.6329 :reverb-amount 0.0031

  663.     :amp-env '( 0 0 0.3333 1 4.3603 0.6 9.3939 0.3 24.4950 0.1 100.0 0 )

  664.     :noise-amount 0.0100 vln-one-sin-ran

  665.   beg 0.0100 f+ 0.45 1810.5774 0.16 :fm-index 1.8298 :reverb-amount 0.0031

  666.     :amp-env '( 0 0 0.6667 1 4.6801 0.6 9.6970 0.3 24.7475 0.1 100 0 )

  667.     :noise-amount 0.0100 vln-one-sin-ran

  668.   beg 0.0200 f+ 0.9 5431.4135 0.16 :fm-index 2.1640 :reverb-amount 0.0022

  669.     :amp-env '( 0 0 0.3333 1 4.3603 0.6 9.3939 0.3 24.4950 0.1 100.0 0 )

  670.     :noise-amount 0.0100 vln-one-sin-ran

  671.   beg 0.0250 f+ 0.9 1045.3680 0.16 :fm-index 1.6971 :reverb-amount 0.0032

  672.     :amp-env '( 0 0 0.3333 1 4.3603 0.6 9.3939 0.3 24.4950 0.1 100.0 0 )

  673.     :noise-amount 0.0100 vln-one-sin-ran

  674.   beg 0.0300 f+ 0.27 1045.3680 0.16 :fm-index 2.4855 :reverb-amount 0.0028

  675.     :amp-env '( 0 0 1.1111 1 5.1066 0.6 10.1010 0.3 25.0842 0.1 100.0 0 )

  676.     :noise-amount 0.0100 vln-one-sin-ran

  677.   beg 0.0300 f+ 0.63 1810.5774 0.16 :fm-index 2.1604 :reverb-amount 0.0020

  678.     :amp-env '( 0 0 0.4762 1 4.4974 0.6 9.5238 0.3 24.6032 0.1 100.0 0 )

  679.     :noise-amount 0.0100 vln-one-sin-ran

  680.   beg 0.0400 f+ 0.9 603.5612 0.16 :fm-index 2.4204 :reverb-amount 0.0031

  681.     :amp-env '( 0 0 0.3333 1 4.3603 0.6 9.3939 0.3 24.4950 0.1 100.0 0 )

  682.     :noise-amount 0.0100 vln-one-sin-ran

  683.   beg 0.0450 f+ 0.4500 348.4765 0.16 :fm-index 2.3918 :reverb-amount 0.0026

  684.     :amp-env '( 0 0 0.6667 1 4.6801 0.6 9.6970 0.3 24.7475 0.1 100 0 )

  685.     :noise-amount 0.0100 vln-one-sin-ran

  686.   beg 0.0460 f+ 0.9 201.1989 0.16 :fm-index 1.5205 :reverb-amount 0.0024

  687.     :amp-env '( 0 0 0.3333 1 4.3603 0.6 9.3939 0.3 24.4950 0.1 100.0 0 )

  688.     :noise-amount 0.0100 vln-one-sin-ran

  689.   beg 0.0460 f+ 0.9 116.1656 0.16 :fm-index 2.3049 :reverb-amount 0.0028

  690.     :amp-env '( 0 0 0.3333 1 4.3603 0.6 9.3939 0.3 24.4950 0.1 100.0 0 )

  691.     :noise-amount 0.0100 vln-one-sin-ran

  692.   beg 0.0500 f+ 0.9 3135.9200 0.16 :fm-index 2.4363 :reverb-amount 0.0021

  693.     :amp-env '( 0 0 0.3333 1 4.3603 0.6 9.3939 0.3 24.4950 0.1 100.0 0 )

  694.     :noise-amount 0.0100 vln-one-sin-ran

  695.   beg 0.0500 f+ 0.45 1464.6987 0.16 :fm-index 2.3865 :reverb-amount 0.0027

  696.     :amp-env '( 0 0 0.6667 1 4.6801 0.6 9.6970 0.3 24.7475 0.1 100 0 )

  697.     :noise-amount 0.0100 vln-one-sin-ran

  698.   beg 0.0600 f+ 0.9 6714.0048 0.16 :fm-index 1.7354 :reverb-amount 0.0021

  699.     :amp-env '( 0 0 0.3333 1 4.3603 0.6 9.3939 0.3 24.4950 0.1 100.0 0 )

  700.     :noise-amount 0.0100 vln-one-sin-ran

  701.   beg 0.0650 f+ 0.9 684.1190 0.16 :fm-index 1.8282 :reverb-amount 0.0025

  702.     :amp-env '( 0 0 0.3333 1 4.3603 0.6 9.3939 0.3 24.4950 0.1 100.0 0 )

  703.     :noise-amount 0.0100 vln-one-sin-ran

  704.   beg 0.0700 f+ 0.2700 684.1190 0.16 :fm-index 2.3923 :reverb-amount 0.0025

  705.     :amp-env '( 0 0 1.1111 1 5.1066 0.6 10.1010 0.3 25.0842 0.1 100.0 0 )

  706.     :noise-amount 0.0100 vln-one-sin-ran

  707.   beg 0.0700 f+ 0.63 1464.6987 0.16 :fm-index 2.2789 :reverb-amount 0.0028

  708.     :amp-env '( 0 0 0.4762 1 4.4974 0.6 9.5238 0.3 24.6032 0.1 100.0 0 )

  709.     :noise-amount 0.0100 vln-one-sin-ran

  710.   beg 0.0800 f+ 0.9 319.5325 0.16 :fm-index 1.5438 :reverb-amount 0.0027

  711.     :amp-env '( 0 0 0.3333 1 4.3603 0.6 9.3939 0.3 24.4950 0.1 100.0 0 )

  712.     :noise-amount 0.0100 vln-one-sin-ran

  713.   beg 0.0850 f+ 0.4500 149.2445 0.16 :fm-index 2.4210 :reverb-amount 0.0028

  714.     :amp-env '( 0 0 0.6667 1 4.6801 0.6 9.6970 0.3 24.7475 0.1 100 0 )

  715.     :noise-amount 0.0100 vln-one-sin-ran

  716.   beg 0.0860 f+ 0.9 69.7078 0.16 :fm-index 2.0288 :reverb-amount 0.0029

  717.     :amp-env '( 0 0 0.3333 1 4.3603 0.6 9.3939 0.3 24.4950 0.1 100.0 0 )

  718.     :noise-amount 0.0100 vln-one-sin-ran

  719.   beg 0.0860 f+ 0.9 32.5585 0.16 :fm-index 1.8254 :reverb-amount 0.0028

  720.     :amp-env '( 0 0 0.3333 1 4.3603 0.6 9.3939 0.3 24.4950 0.1 100.0 0 )

  721.     :noise-amount 0.0100 vln-one-sin-ran

  722. 

  723.   beg 3 + dup to beg test-info

  724. 

  725.   \ 13, score 75

  726.   0    to fmv-reverb-amount

  727.   0.01 to fmv-noise-amount

  728.   beg 0.0500 f+ 0.9  3135.9200 0.16 :fm-index 1.7334

  729.     :amp-env '( 0 0 0.3333 1 4.3603 0.6 9.3939 0.3 24.4950 0.1 100.0 0 )

  730.     vln-one-sin-ran

  731.   beg 0.0500 f+ 0.45 1810.5774 0.16 :fm-index 2.3629

  732.     :amp-env '( 0 0 0.6667 1 4.6801 0.6 9.6970 0.3 24.7475 0.1 100 0 )

  733.     vln-one-sin-ran

  734.   beg 0.0600 f+ 0.9  5431.4135 0.16 :fm-index 2.2744

  735.     :amp-env '( 0 0 0.3333 1 4.3603 0.6 9.3939 0.3 24.4950 0.1 100.0 0 )

  736.     vln-one-sin-ran

  737.   beg 0.0650 f+ 0.9  1045.3680 0.16 :fm-index 1.8722

  738.     :amp-env '( 0 0 0.3333 1 4.3603 0.6 9.3939 0.3 24.4950 0.1 100.0 0 )

  739.     vln-one-sin-ran

  740.   beg 0.1100 f+ 0.27 1045.3680 0.16 :fm-index 2.3139

  741.     :amp-env '( 0 0 1.1111 1 5.1066 0.6 10.101 0.3 25.0842 0.1 100.0 0 )

  742.     vln-one-sin-ran

  743.   beg 0.1100 f+ 0.63 1810.5774 0.16 :fm-index 1.6216

  744.     :amp-env '( 0 0 0.4762 1 4.4974 0.6 9.5238 0.3 24.6032 0.1 100.0 0 )

  745.     vln-one-sin-ran

  746.   beg 0.1200 f+ 0.9   603.5612 0.16 :fm-index 1.5308

  747.     :amp-env '( 0 0 0.3333 1 4.3603 0.6 9.3939 0.3 24.4950 0.1 100.0 0 )

  748.     vln-one-sin-ran

  749.   beg 0.1650 f+ 0.45  348.4765 0.16 :fm-index 2.0346

  750.     :amp-env '( 0 0 0.6667 1 4.6801 0.6 9.6970 0.3 24.7475 0.1 100 0 )

  751.     vln-one-sin-ran

  752.   beg 0.1660 f+ 0.9   201.1989 0.16 :fm-index 1.8176

  753.     :amp-env '( 0 0 0.3333 1 4.3603 0.6 9.3939 0.3 24.4950 0.1 100.0 0 )

  754.     vln-one-sin-ran

  755.   beg 0.1660 f+ 0.9   116.1656 0.16 :fm-index 1.7145

  756.     :amp-env '( 0 0 0.3333 1 4.3603 0.6 9.3939 0.3 24.4950 0.1 100.0 0 )

  757.     vln-one-sin-ran

  758.   beg 0.1700 f+ 0.9  3135.9200 0.16 :fm-index 2.4459

  759.     :amp-env '( 0 0 0.3333 1 4.3603 0.6 9.3939 0.3 24.4950 0.1 100.0 0 )

  760.     vln-one-sin-ran

  761.   beg 0.1700 f+ 0.45 1464.6987 0.16 :fm-index 2.4644

  762.     :amp-env '( 0 0 0.6667 1 4.6801 0.6 9.6970 0.3 24.7475 0.1 100 0 )

  763.     vln-one-sin-ran

  764.   beg 0.1800 f+ 0.9  6714.0048 0.16 :fm-index 1.9985

  765.     :amp-env '( 0 0 0.3333 1 4.3603 0.6 9.3939 0.3 24.4950 0.1 100.0 0 )

  766.     vln-one-sin-ran

  767.   beg 0.1850 f+ 0.9   684.1190 0.16 :fm-index 2.4542

  768.     :amp-env '( 0 0 0.3333 1 4.3603 0.6 9.3939 0.3 24.4950 0.1 100.0 0 )

  769.     vln-one-sin-ran

  770.   beg 0.2900 f+ 0.27  684.1190 0.16 :fm-index 2.3391

  771.     :amp-env '( 0 0 1.1111 1 5.1066 0.6 10.101 0.3 25.0842 0.1 100.0 0 )

  772.     vln-one-sin-ran

  773.   beg 0.2900 f+ 0.63 1464.6987 0.16 :fm-index 1.5138

  774.     :amp-env '( 0 0 0.4762 1 4.4974 0.6 9.5238 0.3 24.6032 0.1 100.0 0 )

  775.     vln-one-sin-ran

  776.   beg 0.3    f+ 0.9   319.5325 0.16 :fm-index 1.5440

  777.     :amp-env '( 0 0 0.3333 1 4.3603 0.6 9.3939 0.3 24.4950 0.1 100.0 0 )

  778.     vln-one-sin-ran

  779.   beg 0.3050 f+ 0.45  149.2445 0.16 :fm-index 2.2283

  780.     :amp-env '( 0 0 0.6667 1 4.6801 0.6 9.6970 0.3 24.7475 0.1 100 0 )

  781.     vln-one-sin-ran

  782.   beg 0.3060 f+ 0.9    69.7078 0.16 :fm-index 1.9498

  783.     :amp-env '( 0 0 0.3333 1 4.3603 0.6 9.3939 0.3 24.4950 0.1 100.0 0 )

  784.     vln-one-sin-ran

  785.   beg 0.3060 f+ 0.9    32.5585 0.16 :fm-index 2.2943

  786.     :amp-env '( 0 0 0.3333 1 4.3603 0.6 9.3939 0.3 24.4950 0.1 100.0 0 )

  787.     vln-one-sin-ran

  788. 

  789.   beg 3 + dup to beg test-info

  790. 

  791.   \ 14, score 78

  792.   restore-fm-violin-defaults

  793.   metalamp to fmv-amp-env

  794.   0     to fmv-glissando-amount

  795.   0.01  to fmv-reverb-amount

  796.   2.718 to fmv-fm1-rat

  797.   1.414 to fmv-fm2-rat

  798.   3.141 to fmv-fm3-rat

  799.   beg 0.2600 f+ 1.2 355.5416 0.16 :fm-index 2.0375 vln-one-sin

  800.   beg 0.2600 f+ 1.5 354.8319 0.16 :fm-index 1.8744 vln-one-sin

  801.   beg 0.2603 f+ 0.9 356.2527 0.16 :fm-index 1.8743 vln-one-sin

  802.   beg 0.2605 f+ 0.9 409.2356 0.16 :fm-index 2.0808 vln-one-sin

  803.   beg 0.2605 f+ 2.1 410.0541 0.16 :fm-index 1.9219 vln-one-sin

  804.   beg 0.2608 f+ 1.2 130.8100 0.16 :fm-index 1.5746 vln-one-sin

  805.   beg 0.2613 f+ 3   130.2883 0.16 :fm-index 2.3771 vln-one-sin

  806.   beg 0.2615 f+ 0.9 130.2883 0.16 :fm-index 1.7765 vln-one-sin

  807.   beg 0.2615 f+ 2.1 130.5489 0.26 :fm-index 1.6485 vln-one-sin

  808.   beg 0.2625 f+ 2   130.8100 0.16 :fm-index 2.1416 vln-one-sin

  809.   beg 0.2633 f+ 2   130.5488 0.16 :fm-index 2.0883 vln-one-sin

  810. 

  811.   beg 4 + dup to beg test-info

  812. 

  813.   \ 15, score 82

  814.   '( 0 0 0.5 1 5 1 10 0.5 15 0.25 35 0.1 100 0 ) to fmv-amp-env

  815.   0.0001 to fmv-noise-amount

  816.   0.01   to fmv-reverb-amount

  817.   beg 0.2605 f+ 0.8  523.2400 0.16 :fm-index 2.3056 vln-one-sin-ran

  818.   beg 0.2605 f+ 1    247.1611 0.16 :fm-index 1.6308 vln-one-sin-ran

  819.   beg 0.2610 f+ 0.6 1107.6991 0.16 :fm-index 1.9364 vln-one-sin-ran

  820.   beg 0.2613 f+ 2    116.7506 0.16 :fm-index 2.3740 vln-one-sin-ran

  821.   beg 0.2615 f+ 0.6  116.7506 0.16 :fm-index 1.8374 vln-one-sin-ran

  822.   beg 0.2615 f+ 1.4  247.1611 0.16 :fm-index 1.7250 vln-one-sin-ran

  823.   beg 0.2620 f+ 0.6   55.1491 0.16 :fm-index 1.5495 vln-one-sin-ran

  824.   beg 0.2623 f+ 1     26.0506 0.16 :fm-index 1.7235 vln-one-sin-ran

  825.   beg 0.2623 f+ 2     12.3054 0.16 :fm-index 1.8818 vln-one-sin-ran

  826.   beg 0.2623 f+ 2      5.8127 0.16 :fm-index 1.9537 vln-one-sin-ran

  827.   beg 0.2625 f+ 2    523.2400 0.16 :fm-index 2.1593 vln-one-sin-ran

  828.   beg 0.2625 f+ 1    256.2390 0.16 :fm-index 1.9851 vln-one-sin-ran

  829.   beg 0.2630 f+ 2   1068.4561 0.16 :fm-index 1.8015 vln-one-sin-ran

  830.   beg 0.2633 f+ 2    125.4843 0.16 :fm-index 1.6161 vln-one-sin-ran

  831.   beg 0.2635 f+ 0.6  125.4843 0.16 :fm-index 2.2767 vln-one-sin-ran

  832.   beg 0.2635 f+ 1.4  256.2390 0.16 :fm-index 2.0835 vln-one-sin-ran

  833.   beg 0.2640 f+ 0.4   61.4517 0.16 :fm-index 1.5310 vln-one-sin-ran

  834.   beg 0.2643 f+ 1     30.0939 0.16 :fm-index 1.5803 vln-one-sin-ran

  835.   beg 0.2643 f+ 2     14.7374 0.16 :fm-index 1.9586 vln-one-sin-ran

  836.   beg 0.2643 f+ 2      7.2172 0.16 :fm-index 1.7270 vln-one-sin-ran

  837.   beg 0.2645 f+ 6     28.4710 0.16 :fm-index 1.5983 vln-one-sin-ran

  838.   beg 0.2648 f+ 10    25.6239 0.16 :fm-index 1.7285 vln-one-sin-ran

  839.   beg 0.2648 f+ 8     21.3532 0.16 :fm-index 1.7955 vln-one-sin-ran

  840.   beg 0.2648 f+ 8     17.0826 0.16 :fm-index 2.0866 vln-one-sin-ran

  841. 

  842.   beg 4 + dup to beg test-info

  843. 

  844.   \ 16, score 86

  845.   0.001 to fmv-reverb-amount

  846.   0.004 to fmv-noise-amount

  847.   3.141 to fmv-fm1-rat

  848.   1.414 to fmv-fm2-rat

  849.   2.718 to fmv-fm3-rat

  850.   beg 0.2600 f+ 1.6 1643.4968 0.16 :fm-index 2.1104 vln-one-sin-ran

  851.   beg 0.2600 f+ 2   1643.4968 0.16 :fm-index 1.5191 vln-one-sin-ran

  852.   beg 0.2603 f+ 1.2 1643.4968 0.16 :fm-index 2.0478 vln-one-sin-ran

  853.   beg 0.2603 f+ 4   1643.4968 0.16 :fm-index 2.0473 vln-one-sin-ran

  854.   beg 0.2605 f+ 1.2 1422.1663 0.16 :fm-index 1.9845 vln-one-sin-ran

  855.   beg 0.2605 f+ 2.8 1422.1663 0.16 :fm-index 2.0429 vln-one-sin-ran

  856.   beg 0.2605 f+ 1.2 1422.1663 0.16 :fm-index 1.6184 vln-one-sin-ran

  857.   beg 0.2608 f+ 1.6  523.2400 0.16 :fm-index 2.3908 vln-one-sin-ran

  858.   beg 0.2608 f+ 2    523.2400 0.16 :fm-index 1.6733 vln-one-sin-ran

  859.   beg 0.2610 f+ 1.2  523.2400 0.16 :fm-index 2.0431 vln-one-sin-ran

  860.   beg 0.2610 f+ 4    523.2400 0.16 :fm-index 1.7430 vln-one-sin-ran

  861.   beg 0.2613 f+ 1.2  523.2400 0.16 :fm-index 2.2030 vln-one-sin-ran

  862.   beg 0.2613 f+ 2.8  523.2400 0.16 :fm-index 2.0149 vln-one-sin-ran

  863.   beg 0.2615 f+ 1.2  523.2400 0.16 :fm-index 2.2310 vln-one-sin-ran

  864.   beg 0.2615 f+ 2    523.2400 0.16 :fm-index 2.1625 vln-one-sin-ran

  865.   beg 0.2618 f+ 4    523.2400 0.16 :fm-index 2.0000 vln-one-sin-ran

  866.   beg 0.2618 f+ 4    523.2400 0.16 :fm-index 2.2034 vln-one-sin-ran

  867.   beg 0.2620 f+ 3    523.2400 0.16 :fm-index 2.0186 vln-one-sin-ran

  868.   beg 0.2620 f+ 1.5  523.2400 0.16 :fm-index 2.1373 vln-one-sin-ran

  869.   beg 0.2623 f+ 3    523.2400 0.16 :fm-index 1.9046 vln-one-sin-ran

  870.   beg 0.2623 f+ 3    523.2400 0.16 :fm-index 2.1834 vln-one-sin-ran

  871.   beg 0.2625 f+ 1.2  523.2400 0.16 :fm-index 1.8266 vln-one-sin-ran

  872.   beg 0.2625 f+ 2.8  523.2400 0.16 :fm-index 1.5937 vln-one-sin-ran

  873.   beg 0.2628 f+ 0.8  523.2400 0.16 :fm-index 1.9762 vln-one-sin-ran

  874.   beg 0.2628 f+ 2    523.2400 0.16 :fm-index 1.8954 vln-one-sin-ran

  875.   beg 0.2630 f+ 4    523.2400 0.16 :fm-index 2.3302 vln-one-sin-ran

  876.   beg 0.2630 f+ 4    523.2400 0.16 :fm-index 2.4949 vln-one-sin-ran

  877. 

  878.   beg 4 + dup to beg test-info

  879. 

  880.   \ 17, score 90

  881.   3.414 to fmv-fm1-rat

  882.   1.414 to fmv-fm2-rat

  883.   2.718 to fmv-fm3-rat

  884.   beg 0.2600 f+ 1.6 821.7484 0.16 :fm-index 2.4793 vln-one-sin-ran

  885.   beg 0.2600 f+ 2   821.7484 0.16 :fm-index 2.4789 vln-one-sin-ran

  886.   beg 0.2603 f+ 1.2 821.7484 0.16 :fm-index 2.0827 vln-one-sin-ran

  887.   beg 0.2603 f+ 4   821.7484 0.16 :fm-index 2.4769 vln-one-sin-ran

  888.   beg 0.2605 f+ 1.2 711.0832 0.16 :fm-index 2.4094 vln-one-sin-ran

  889.   beg 0.2605 f+ 2.8 711.0832 0.16 :fm-index 2.4031 vln-one-sin-ran

  890.   beg 0.2605 f+ 1.2 711.0832 0.16 :fm-index 2.1428 vln-one-sin-ran

  891.   beg 0.2608 f+ 1.6 261.6200 0.16 :fm-index 2.3129 vln-one-sin-ran

  892.   beg 0.2608 f+ 2   261.6200 0.16 :fm-index 2.3488 vln-one-sin-ran

  893.   beg 0.2610 f+ 1.2 261.6200 0.16 :fm-index 2.1466 vln-one-sin-ran

  894.   beg 0.2610 f+ 4   261.6200 0.16 :fm-index 1.6938 vln-one-sin-ran

  895.   beg 0.2613 f+ 1.2 261.6200 0.16 :fm-index 2.1287 vln-one-sin-ran

  896.   beg 0.2613 f+ 2.8 261.6200 0.16 :fm-index 2.1917 vln-one-sin-ran

  897.   beg 0.2615 f+ 1.2 261.6200 0.16 :fm-index 2.3583 vln-one-sin-ran

  898.   beg 0.2615 f+ 2   261.6200 0.16 :fm-index 1.8368 vln-one-sin-ran

  899.   beg 0.2618 f+ 4   261.6200 0.16 :fm-index 1.5107 vln-one-sin-ran

  900.   beg 0.2618 f+ 4   261.6200 0.16 :fm-index 1.6218 vln-one-sin-ran

  901.   beg 0.2620 f+ 3   261.6200 0.16 :fm-index 1.9041 vln-one-sin-ran

  902.   beg 0.2620 f+ 1.5 261.6200 0.16 :fm-index 1.5748 vln-one-sin-ran

  903.   beg 0.2623 f+ 3   261.6200 0.16 :fm-index 1.9339 vln-one-sin-ran

  904.   beg 0.2623 f+ 3   261.6200 0.16 :fm-index 2.0489 vln-one-sin-ran

  905.   beg 0.2625 f+ 1.2 261.6200 0.16 :fm-index 2.0888 vln-one-sin-ran

  906.   beg 0.2625 f+ 2.8 261.6200 0.16 :fm-index 1.7306 vln-one-sin-ran

  907.   beg 0.2628 f+ 0.8 261.6200 0.16 :fm-index 2.3257 vln-one-sin-ran

  908.   beg 0.2628 f+ 2   261.6200 0.16 :fm-index 2.4755 vln-one-sin-ran

  909.   beg 0.2630 f+ 4   261.6200 0.16 :fm-index 1.9459 vln-one-sin-ran

  910.   beg 0.2630 f+ 4   261.6200 0.16 :fm-index 1.5782 vln-one-sin-ran

  911.   

  912.   beg 4 + dup to beg test-info

  913. 

  914.   \ 18, score 94

  915.   3.414 to fmv-fm1-rat

  916.   1.414 to fmv-fm2-rat

  917.   2.718 to fmv-fm3-rat

  918.   beg 0.2600 f+ 1.6 3286.9937 0.16 :fm-index 1.6655 vln-one-sin-ran

  919.   beg 0.2600 f+ 2   3286.9937 0.16 :fm-index 1.9356 vln-one-sin-ran

  920.   beg 0.2603 f+ 1.2 3286.9937 0.16 :fm-index 1.5665 vln-one-sin-ran

  921.   beg 0.2603 f+ 4   3286.9937 0.16 :fm-index 1.6701 vln-one-sin-ran

  922.   beg 0.2605 f+ 1.2 2844.3326 0.16 :fm-index 2.3273 vln-one-sin-ran

  923.   beg 0.2605 f+ 2.8 2844.3326 0.16 :fm-index 1.5520 vln-one-sin-ran

  924.   beg 0.2605 f+ 1.2 2844.3326 0.16 :fm-index 2.4104 vln-one-sin-ran

  925.   beg 0.2608 f+ 1.6 1046.4800 0.16 :fm-index 2.1075 vln-one-sin-ran

  926.   beg 0.2608 f+ 2   1046.4800 0.16 :fm-index 1.7004 vln-one-sin-ran

  927.   beg 0.2610 f+ 1.2 1046.4800 0.16 :fm-index 1.6502 vln-one-sin-ran

  928.   beg 0.2610 f+ 4   1046.4800 0.16 :fm-index 2.4591 vln-one-sin-ran

  929.   beg 0.2613 f+ 1.2 1046.4800 0.16 :fm-index 2.1491 vln-one-sin-ran

  930.   beg 0.2613 f+ 2.8 1046.4800 0.16 :fm-index 2.1594 vln-one-sin-ran

  931.   beg 0.2615 f+ 1.2 1046.4800 0.16 :fm-index 2.4783 vln-one-sin-ran

  932.   beg 0.2615 f+ 2   1046.4800 0.16 :fm-index 2.2080 vln-one-sin-ran

  933.   beg 0.2618 f+ 4   1046.4800 0.16 :fm-index 1.5844 vln-one-sin-ran

  934.   beg 0.2618 f+ 4   1046.4800 0.16 :fm-index 1.5440 vln-one-sin-ran

  935.   beg 0.2620 f+ 3   1046.4800 0.16 :fm-index 1.9857 vln-one-sin-ran

  936.   beg 0.2620 f+ 1.5 1046.4800 0.16 :fm-index 1.5165 vln-one-sin-ran

  937.   beg 0.2623 f+ 3   1046.4800 0.16 :fm-index 1.8309 vln-one-sin-ran

  938.   beg 0.2623 f+ 3   1046.4800 0.16 :fm-index 2.1236 vln-one-sin-ran

  939.   beg 0.2625 f+ 1.2 1046.4800 0.1  :fm-index 2.4074 vln-one-sin-ran

  940.   beg 0.2625 f+ 2.8 1046.4800 0.1  :fm-index 1.6315 vln-one-sin-ran

  941.   beg 0.2628 f+ 0.8 1046.4800 0.1  :fm-index 1.8061 vln-one-sin-ran

  942.   beg 0.2628 f+ 2   1046.4800 0.1  :fm-index 2.3664 vln-one-sin-ran

  943.   beg 0.2630 f+ 4   1046.4800 0.1  :fm-index 2.2490 vln-one-sin-ran

  944.   beg 0.2630 f+ 4   1046.4800 0.1  :fm-index 2.4081 vln-one-sin-ran

  945.   

  946.   beg 4 + dup to beg test-info

  947. 

  948.   \ 19, score 98

  949.   0.01 to fmv-reverb-amount

  950.   beg 0.2600 f+ 1.6 1643.4968 0.16 :fm-index 1.9284 vln-one-sin-ran

  951.   beg 0.2600 f+ 2   1643.4968 0.16 :fm-index 2.2171 vln-one-sin-ran

  952.   beg 0.2603 f+ 1.2 1643.4968 0.16 :fm-index 2.2272 vln-one-sin-ran

  953.   beg 0.2603 f+ 4   1643.4968 0.16 :fm-index 1.5677 vln-one-sin-ran

  954.   beg 0.2605 f+ 1.2 1422.1663 0.16 :fm-index 2.0476 vln-one-sin-ran

  955.   beg 0.2605 f+ 2.8 1422.1663 0.16 :fm-index 2.3289 vln-one-sin-ran

  956.   beg 0.2605 f+ 1.2 1422.1663 0.16 :fm-index 2.0269 vln-one-sin-ran

  957.   beg 0.2608 f+ 1.6  523.2400 0.16 :fm-index 1.7767 vln-one-sin-ran

  958.   beg 0.2608 f+ 2    523.2400 0.16 :fm-index 1.8117 vln-one-sin-ran

  959.   beg 0.2610 f+ 1.2  523.2400 0.16 :fm-index 1.5694 vln-one-sin-ran

  960.   beg 0.2610 f+ 4    523.2400 0.16 :fm-index 1.6869 vln-one-sin-ran

  961.   beg 0.2613 f+ 1.2  523.2400 0.16 :fm-index 1.9340 vln-one-sin-ran

  962.   beg 0.2613 f+ 2.8  523.2400 0.16 :fm-index 2.3986 vln-one-sin-ran

  963.   beg 0.2615 f+ 1.2  523.2400 0.16 :fm-index 2.4593 vln-one-sin-ran

  964.   beg 0.2615 f+ 2    523.2400 0.16 :fm-index 2.3430 vln-one-sin-ran

  965.   beg 0.2618 f+ 4    523.2400 0.16 :fm-index 2.2650 vln-one-sin-ran

  966.   beg 0.2618 f+ 4    523.2400 0.16 :fm-index 2.3015 vln-one-sin-ran

  967.   beg 0.2620 f+ 3    523.2400 0.16 :fm-index 1.9909 vln-one-sin-ran

  968.   beg 0.2620 f+ 1.5  523.2400 0.16 :fm-index 2.3916 vln-one-sin-ran

  969.   beg 0.2623 f+ 3    523.2400 0.16 :fm-index 2.0401 vln-one-sin-ran

  970.   beg 0.2623 f+ 3    523.2400 0.16 :fm-index 1.8484 vln-one-sin-ran

  971.   beg 0.2625 f+ 1.2  523.2400 0.16 :fm-index 2.3138 vln-one-sin-ran

  972.   beg 0.2625 f+ 2.8  523.2400 0.16 :fm-index 1.6295 vln-one-sin-ran

  973.   beg 0.2628 f+ 0.8  523.2400 0.16 :fm-index 2.2344 vln-one-sin-ran

  974.   beg 0.2628 f+ 2    523.2400 0.16 :fm-index 1.8423 vln-one-sin-ran

  975.   beg 0.2630 f+ 4    523.2400 0.16 :fm-index 2.2086 vln-one-sin-ran

  976.   beg 0.2630 f+ 4    523.2400 0.16 :fm-index 2.3130 vln-one-sin-ran

  977.   

  978.   beg 4 + dup to beg test-info

  979. 

  980.   \ 20, score 102

  981.   0.0001 to fmv-noise-amount

  982.   0.01   to fmv-reverb-amount

  983.   2.718  to fmv-fm1-rat

  984.   1.141  to fmv-fm2-rat

  985.   3.141  to fmv-fm3-rat

  986.   beg 0.2605 f+ 0.8 523.2400 0.16 :fm-index 2.0123 vln-one-sin-ran

  987.   beg 0.2605 f+ 1   493.8728 0.16 :fm-index 2.1176 vln-one-sin-ran

  988.   beg 0.2610 f+ 0.6 554.3535 0.16 :fm-index 1.9163 vln-one-sin-ran

  989.   beg 0.2613 f+ 2   466.1539 0.16 :fm-index 1.5048 vln-one-sin-ran

  990.   beg 0.2615 f+ 0.6 466.1539 0.16 :fm-index 1.5242 vln-one-sin-ran

  991.   beg 0.2615 f+ 1.4 493.8728 0.16 :fm-index 1.9509 vln-one-sin-ran

  992.   beg 0.2620 f+ 0.6 439.9907 0.16 :fm-index 2.2131 vln-one-sin-ran

  993.   beg 0.2623 f+ 1   415.2959 0.16 :fm-index 1.7326 vln-one-sin-ran

  994.   beg 0.2623 f+ 2   391.9871 0.16 :fm-index 1.9936 vln-one-sin-ran

  995.   beg 0.2623 f+ 2   369.9866 0.16 :fm-index 2.1103 vln-one-sin-ran

  996.   beg 0.2625 f+ 2   523.2400 0.16 :fm-index 1.6206 vln-one-sin-ran

  997.   beg 0.2625 f+ 1   522.7173 0.16 :fm-index 1.8598 vln-one-sin-ran

  998.   beg 0.2630 f+ 2   523.7632 0.16 :fm-index 1.8015 vln-one-sin-ran

  999.   beg 0.2633 f+ 2   522.1951 0.16 :fm-index 2.3575 vln-one-sin-ran

  1000.   beg 0.2635 f+ 0.6 522.1951 0.16 :fm-index 1.5010 vln-one-sin-ran

  1001.   beg 0.2635 f+ 1.4 522.7173 0.16 :fm-index 2.4075 vln-one-sin-ran

  1002.   beg 0.2640 f+ 0.4 521.6734 0.16 :fm-index 2.0721 vln-one-sin-ran

  1003.   beg 0.2643 f+ 1   521.1523 0.16 :fm-index 2.0433 vln-one-sin-ran

  1004.   beg 0.2643 f+ 2   520.6316 0.16 :fm-index 1.9788 vln-one-sin-ran

  1005.   beg 0.2643 f+ 2   520.1115 0.16 :fm-index 1.6770 vln-one-sin-ran

  1006.   

  1007.   beg 8 + dup to beg test-info

  1008. 

  1009.   \ 21, score 110

  1010.   0.004 to fmv-noise-amount

  1011.   beg 0.2600 f+ 0.8 1046.4800 0.16 :fm-index 1.5610 vln-one-sin-ran

  1012.   beg 0.2600 f+ 1   1044.3912 0.16 :fm-index 2.3514 vln-one-sin-ran

  1013.   beg 0.2603 f+ 0.6 1048.5730 0.16 :fm-index 1.9958 vln-one-sin-ran

  1014.   beg 0.2603 f+ 2   1042.3066 0.16 :fm-index 1.9654 vln-one-sin-ran

  1015.   beg 0.2605 f+ 0.6 1042.3066 0.16 :fm-index 1.5285 vln-one-sin-ran

  1016.   beg 0.2605 f+ 1.4 1044.3912 0.16 :fm-index 1.8881 vln-one-sin-ran

  1017.   beg 0.2608 f+ 0.6 1040.2262 0.16 :fm-index 1.8682 vln-one-sin-ran

  1018.   beg 0.2608 f+ 0.8  523.2400 0.16 :fm-index 1.8296 vln-one-sin-ran

  1019.   beg 0.2610 f+ 1    522.1956 0.16 :fm-index 2.1899 vln-one-sin-ran

  1020.   beg 0.2610 f+ 0.6  524.2865 0.16 :fm-index 1.9614 vln-one-sin-ran

  1021.   beg 0.2613 f+ 2    521.1533 0.16 :fm-index 1.7483 vln-one-sin-ran

  1022.   beg 0.2615 f+ 0.6  521.1533 0.16 :fm-index 1.8717 vln-one-sin-ran

  1023.   beg 0.2615 f+ 1.4  522.1956 0.16 :fm-index 1.5619 vln-one-sin-ran

  1024.   beg 0.2620 f+ 0.6  520.1131 0.16 :fm-index 2.4331 vln-one-sin-ran

  1025.   beg 0.2623 f+ 1    519.0749 0.16 :fm-index 2.4153 vln-one-sin-ran

  1026.   beg 0.2623 f+ 2    518.0388 0.16 :fm-index 1.5477 vln-one-sin-ran

  1027.   beg 0.2623 f+ 2    517.0048 0.16 :fm-index 1.9956 vln-one-sin-ran

  1028.   beg 0.2625 f+ 2    523.2400 0.16 :fm-index 1.8111 vln-one-sin-ran

  1029.   beg 0.2625 f+ 1    522.7173 0.16 :fm-index 2.4820 vln-one-sin-ran

  1030.   beg 0.2630 f+ 2    523.7632 0.16 :fm-index 1.5744 vln-one-sin-ran

  1031.   beg 0.2633 f+ 2    522.1951 0.16 :fm-index 1.9950 vln-one-sin-ran

  1032.   beg 0.2635 f+ 0.6  522.1951 0.16 :fm-index 1.9792 vln-one-sin-ran

  1033.   beg 0.2635 f+ 1.4  522.7173 0.16 :fm-index 1.7415 vln-one-sin-ran

  1034.   beg 0.2640 f+ 0.4  521.6734 0.16 :fm-index 2.0884 vln-one-sin-ran

  1035.   beg 0.2643 f+ 1    521.1523 0.16 :fm-index 2.3605 vln-one-sin-ran

  1036.   beg 0.2643 f+ 2    520.6316 0.16 :fm-index 1.7817 vln-one-sin-ran

  1037.   beg 0.2643 f+ 2    520.1115 0.16 :fm-index 2.0283 vln-one-sin-ran

  1038.   

  1039.   beg 4 + dup to beg test-info

  1040. 

  1041.   \ 22, score 114

  1042.   0.1   to fmv-reverb-amount

  1043.   0     to fmv-glissando-amount

  1044.   2.718 to fmv-fm1-rat

  1045.   1.414 to fmv-fm2-rat

  1046.   3.141 to fmv-fm3-rat

  1047.   beg 0.2600 f+ 1.6 177.7708 0.16 :fm-index 1.6447 vln-one-sin-ran

  1048.   beg 0.2600 f+ 2   177.7708 0.16 :fm-index 2.4875 vln-one-sin-ran

  1049.   beg 0.2603 f+ 1.2 177.7708 0.16 :fm-index 1.6126 vln-one-sin-ran

  1050.   beg 0.2603 f+ 4   177.7708 0.16 :fm-index 2.3122 vln-one-sin-ran

  1051.   beg 0.2605 f+ 1.2 205.4371 0.16 :fm-index 2.4116 vln-one-sin-ran

  1052.   beg 0.2605 f+ 2.8 205.4371 0.16 :fm-index 1.5337 vln-one-sin-ran

  1053.   beg 0.2608 f+ 1.2 205.4371 0.16 :fm-index 2.0307 vln-one-sin-ran

  1054.   beg 0.2608 f+ 1.6  65.4050 0.16 :fm-index 2.2341 vln-one-sin-ran

  1055.   beg 0.2610 f+ 2    65.4050 0.16 :fm-index 2.4683 vln-one-sin-ran

  1056.   beg 0.2610 f+ 1.2  65.4050 0.16 :fm-index 2.0643 vln-one-sin-ran

  1057.   beg 0.2613 f+ 4    65.4050 0.16 :fm-index 2.1925 vln-one-sin-ran

  1058.   beg 0.2615 f+ 1.2  65.4050 0.16 :fm-index 2.1325 vln-one-sin-ran

  1059.   beg 0.2615 f+ 2.8  65.4050 0.16 :fm-index 1.5847 vln-one-sin-ran

  1060.   beg 0.2620 f+ 1.2  65.4050 0.16 :fm-index 1.8781 vln-one-sin-ran

  1061.   beg 0.2623 f+ 2    65.4050 0.16 :fm-index 2.0283 vln-one-sin-ran

  1062.   beg 0.2623 f+ 4    65.4050 0.16 :fm-index 2.4739 vln-one-sin-ran

  1063.   beg 0.2623 f+ 4    65.4050 0.16 :fm-index 2.2333 vln-one-sin-ran

  1064.   beg 0.2625 f+ 2    65.4050 0.16 :fm-index 2.2194 vln-one-sin-ran

  1065.   beg 0.2625 f+ 1    65.4050 0.16 :fm-index 2.4491 vln-one-sin-ran

  1066.   beg 0.2630 f+ 2    65.4050 0.16 :fm-index 1.5672 vln-one-sin-ran

  1067.   beg 0.2633 f+ 2    65.4050 0.16 :fm-index 2.3254 vln-one-sin-ran

  1068.   beg 0.2635 f+ 1.2  65.4050 0.16 :fm-index 1.8302 vln-one-sin-ran

  1069.   beg 0.2635 f+ 2.8  65.4050 0.16 :fm-index 1.9201 vln-one-sin-ran

  1070.   beg 0.2640 f+ 0.8  65.4050 0.16 :fm-index 1.9164 vln-one-sin-ran

  1071.   beg 0.2643 f+ 2    65.4050 0.16 :fm-index 1.9483 vln-one-sin-ran

  1072.   beg 0.2643 f+ 4    65.4050 0.16 :fm-index 2.4247 vln-one-sin-ran

  1073.   beg 0.2643 f+ 4    65.4050 0.16 :fm-index 2.0419 vln-one-sin-ran

  1074.   

  1075.   beg 4 + dup to beg test-info

  1076. 

  1077.   \ 23, score 118

  1078.   2.718 to fmv-fm1-rat

  1079.   4.414 to fmv-fm2-rat

  1080.   3.141 to fmv-fm3-rat

  1081.   beg 0.2600 f+ 1.6  88.8854 0.16 :fm-index 2.2832 vln-one-sin-ran

  1082.   beg 0.2600 f+ 2    88.8854 0.16 :fm-index 1.6588 vln-one-sin-ran

  1083.   beg 0.2603 f+ 1.2  88.8854 0.16 :fm-index 2.2392 vln-one-sin-ran

  1084.   beg 0.2603 f+ 4    88.8854 0.16 :fm-index 1.7354 vln-one-sin-ran

  1085.   beg 0.2605 f+ 1.2 102.7186 0.16 :fm-index 1.6692 vln-one-sin-ran

  1086.   beg 0.2605 f+ 2.8 102.7186 0.16 :fm-index 2.1518 vln-one-sin-ran

  1087.   beg 0.2608 f+ 1.2 102.7186 0.16 :fm-index 2.2439 vln-one-sin-ran

  1088.   beg 0.2608 f+ 1.6  32.7025 0.16 :fm-index 2.1665 vln-one-sin-ran

  1089.   beg 0.2610 f+ 2    32.7025 0.16 :fm-index 1.7947 vln-one-sin-ran

  1090.   beg 0.2610 f+ 1.2  32.7025 0.16 :fm-index 2.0740 vln-one-sin-ran

  1091.   beg 0.2613 f+ 4    32.7025 0.16 :fm-index 1.9705 vln-one-sin-ran

  1092.   beg 0.2615 f+ 1.2  32.7025 0.16 :fm-index 1.9447 vln-one-sin-ran

  1093.   beg 0.2615 f+ 2.8  32.7025 0.16 :fm-index 2.4918 vln-one-sin-ran

  1094.   beg 0.2620 f+ 1.2  32.7025 0.16 :fm-index 1.6275 vln-one-sin-ran

  1095.   beg 0.2623 f+ 2    32.7025 0.16 :fm-index 2.2355 vln-one-sin-ran

  1096.   beg 0.2623 f+ 4    32.7025 0.16 :fm-index 2.0084 vln-one-sin-ran

  1097.   beg 0.2623 f+ 4    32.7025 0.16 :fm-index 1.8964 vln-one-sin-ran

  1098.   beg 0.2625 f+ 2    32.7025 0.16 :fm-index 2.3937 vln-one-sin-ran

  1099.   beg 0.2625 f+ 1    32.7025 0.16 :fm-index 1.8634 vln-one-sin-ran

  1100.   beg 0.2630 f+ 2    32.7025 0.16 :fm-index 1.5217 vln-one-sin-ran

  1101.   beg 0.2633 f+ 2    32.7025 0.16 :fm-index 1.9275 vln-one-sin-ran

  1102.   beg 0.2635 f+ 1.2  32.7025 0.16 :fm-index 2.4413 vln-one-sin-ran

  1103.   beg 0.2635 f+ 2.8  32.7025 0.16 :fm-index 2.3242 vln-one-sin-ran

  1104.   beg 0.2640 f+ 0.8  32.7025 0.16 :fm-index 2.3267 vln-one-sin-ran

  1105.   beg 0.2643 f+ 2    32.7025 0.16 :fm-index 1.7004 vln-one-sin-ran

  1106.   beg 0.2643 f+ 4    32.7025 0.16 :fm-index 1.8785 vln-one-sin-ran

  1107.   beg 0.2643 f+ 4    32.7025 0.16 :fm-index 2.4573 vln-one-sin-ran

  1108.   

  1109.   beg 4 + dup to beg test-info

  1110. 

  1111.   \ 24, score 122

  1112.   2.718 to fmv-fm1-rat

  1113.   4.414 to fmv-fm2-rat

  1114.   5.141 to fmv-fm3-rat

  1115.   beg 0.2600 f+ 1.6 22.2213 0.16 :fm-index 1.6232 vln-one-sin-ran

  1116.   beg 0.2600 f+ 2   22.2213 0.16 :fm-index 1.5982 vln-one-sin-ran

  1117.   beg 0.2603 f+ 1.2 22.2213 0.16 :fm-index 2.1585 vln-one-sin-ran

  1118.   beg 0.2603 f+ 4   22.2213 0.16 :fm-index 2.2207 vln-one-sin-ran

  1119.   beg 0.2605 f+ 1.2 42.0309 0.16 :fm-index 1.5294 vln-one-sin-ran

  1120.   beg 0.2605 f+ 2.8 42.0309 0.16 :fm-index 1.9544 vln-one-sin-ran

  1121.   beg 0.2608 f+ 1.2 42.0309 0.16 :fm-index 2.4016 vln-one-sin-ran

  1122.   beg 0.2608 f+ 1.6  8.1756 0.16 :fm-index 1.5267 vln-one-sin-ran

  1123.   beg 0.2610 f+ 2    8.1756 0.16 :fm-index 2.4190 vln-one-sin-ran

  1124.   beg 0.2610 f+ 1.2  8.1756 0.16 :fm-index 2.2757 vln-one-sin-ran

  1125.   beg 0.2613 f+ 4    8.1756 0.16 :fm-index 2.3607 vln-one-sin-ran

  1126.   beg 0.2615 f+ 1.2  8.1756 0.16 :fm-index 1.8698 vln-one-sin-ran

  1127.   beg 0.2615 f+ 2.8  8.1756 0.16 :fm-index 2.3753 vln-one-sin-ran

  1128.   beg 0.2620 f+ 1.2  8.1756 0.16 :fm-index 2.3392 vln-one-sin-ran

  1129.   beg 0.2623 f+ 2    8.1756 0.16 :fm-index 1.5088 vln-one-sin-ran

  1130.   beg 0.2623 f+ 4    8.1756 0.16 :fm-index 2.2084 vln-one-sin-ran

  1131.   beg 0.2623 f+ 4    8.1756 0.16 :fm-index 1.9512 vln-one-sin-ran

  1132.   beg 0.2625 f+ 2    8.1756 0.16 :fm-index 2.0399 vln-one-sin-ran

  1133.   beg 0.2625 f+ 1    8.1756 0.16 :fm-index 1.7053 vln-one-sin-ran

  1134.   beg 0.2630 f+ 2    8.1756 0.16 :fm-index 2.3204 vln-one-sin-ran

  1135.   beg 0.2633 f+ 2    8.1756 0.16 :fm-index 1.6336 vln-one-sin-ran

  1136.   beg 0.2635 f+ 1.2  8.1756 0.16 :fm-index 1.9483 vln-one-sin-ran

  1137.   beg 0.2635 f+ 2.8  8.1756 0.16 :fm-index 2.3255 vln-one-sin-ran

  1138.   beg 0.2640 f+ 0.8  8.1756 0.16 :fm-index 1.7331 vln-one-sin-ran

  1139.   beg 0.2643 f+ 2    8.1756 0.16 :fm-index 1.9318 vln-one-sin-ran

  1140.   beg 0.2643 f+ 4    8.1756 0.16 :fm-index 1.6908 vln-one-sin-ran

  1141.   beg 0.2643 f+ 4    8.1756 0.16 :fm-index 2.4103 vln-one-sin-ran

  1142.   

  1143.   beg 4 + dup to beg test-info

  1144. 

  1145.   \ 25, score 126

  1146.   beg 0.2600 f+ 1.6 11.1107 0.16 :fm-index 1.6371 vln-one-sin-ran

  1147.   beg 0.2600 f+ 2   11.1107 0.16 :fm-index 1.8971 vln-one-sin-ran

  1148.   beg 0.2603 f+ 1.2 11.1107 0.16 :fm-index 1.9065 vln-one-sin-ran

  1149.   beg 0.2603 f+ 4   11.1107 0.16 :fm-index 2.2143 vln-one-sin-ran

  1150.   beg 0.2605 f+ 1.2 21.0154 0.16 :fm-index 1.8011 vln-one-sin-ran

  1151.   beg 0.2605 f+ 2.8 21.0154 0.16 :fm-index 2.1950 vln-one-sin-ran

  1152.   beg 0.2608 f+ 1.2 21.0154 0.16 :fm-index 2.3563 vln-one-sin-ran

  1153.   beg 0.2608 f+ 1.6  4.0878 0.16 :fm-index 2.3181 vln-one-sin-ran

  1154.   beg 0.2610 f+ 2    4.0878 0.16 :fm-index 2.0776 vln-one-sin-ran

  1155.   beg 0.2610 f+ 1.2  4.0878 0.16 :fm-index 1.8336 vln-one-sin-ran

  1156.   beg 0.2613 f+ 4    4.0878 0.16 :fm-index 1.5019 vln-one-sin-ran

  1157.   beg 0.2615 f+ 1.2  4.0878 0.16 :fm-index 2.2368 vln-one-sin-ran

  1158.   beg 0.2615 f+ 2.8  4.0878 0.16 :fm-index 1.7462 vln-one-sin-ran

  1159.   beg 0.2620 f+ 1.2  4.0878 0.16 :fm-index 1.9604 vln-one-sin-ran

  1160.   beg 0.2623 f+ 2    4.0878 0.16 :fm-index 2.2361 vln-one-sin-ran

  1161.   beg 0.2623 f+ 4    4.0878 0.16 :fm-index 1.9972 vln-one-sin-ran

  1162.   beg 0.2623 f+ 4    4.0878 0.16 :fm-index 2.4870 vln-one-sin-ran

  1163.   beg 0.2625 f+ 2    4.0878 0.16 :fm-index 2.0762 vln-one-sin-ran

  1164.   beg 0.2625 f+ 1    4.0878 0.16 :fm-index 2.2973 vln-one-sin-ran

  1165.   beg 0.2630 f+ 2    4.0878 0.16 :fm-index 2.2350 vln-one-sin-ran

  1166.   beg 0.2633 f+ 2    4.0878 0.16 :fm-index 2.1613 vln-one-sin-ran

  1167.   beg 0.2635 f+ 1.2  4.0878 0.16 :fm-index 2.0640 vln-one-sin-ran

  1168.   beg 0.2635 f+ 2.8  4.0878 0.16 :fm-index 2.1738 vln-one-sin-ran

  1169.   beg 0.2640 f+ 0.8  4.0878 0.16 :fm-index 1.5188 vln-one-sin-ran

  1170.   beg 0.2643 f+ 2    4.0878 0.16 :fm-index 1.8766 vln-one-sin-ran

  1171.   beg 0.2643 f+ 4    4.0878 0.16 :fm-index 2.3083 vln-one-sin-ran

  1172.   beg 0.2643 f+ 4    4.0878 0.16 :fm-index 2.2215 vln-one-sin-ran

  1173.   

  1174.   beg 4 + dup to beg test-info

  1175. 

  1176.   \ 26, score 130

  1177.   beg 0.2600 f+ 1.6  66.5893 0.16 :fm-index 1.7041 vln-one-sin-ran

  1178.   beg 0.2600 f+ 2    66.4564 0.16 :fm-index 2.0296 vln-one-sin-ran

  1179.   beg 0.2603 f+ 1.2  66.7225 0.16 :fm-index 1.8321 vln-one-sin-ran

  1180.   beg 0.2603 f+ 4    66.3237 0.16 :fm-index 2.1550 vln-one-sin-ran

  1181.   beg 0.2605 f+ 1.2 125.4490 0.16 :fm-index 2.1806 vln-one-sin-ran

  1182.   beg 0.2605 f+ 2.8 125.6999 0.16 :fm-index 2.3570 vln-one-sin-ran

  1183.   beg 0.2608 f+ 1.2 125.1986 0.16 :fm-index 1.9861 vln-one-sin-ran

  1184.   beg 0.2608 f+ 1.6  24.4994 0.16 :fm-index 1.6412 vln-one-sin-ran

  1185.   beg 0.2610 f+ 2    24.4505 0.16 :fm-index 1.9770 vln-one-sin-ran

  1186.   beg 0.2610 f+ 1.2  24.5484 0.16 :fm-index 2.0103 vln-one-sin-ran

  1187.   beg 0.2613 f+ 4    24.4017 0.16 :fm-index 2.0663 vln-one-sin-ran

  1188.   beg 0.2615 f+ 1.2  24.4017 0.16 :fm-index 2.1521 vln-one-sin-ran

  1189.   beg 0.2615 f+ 2.8  24.4505 0.16 :fm-index 2.4453 vln-one-sin-ran

  1190.   beg 0.2620 f+ 1.2  24.3530 0.16 :fm-index 2.0930 vln-one-sin-ran

  1191.   beg 0.2623 f+ 2    24.6960 0.16 :fm-index 2.3423 vln-one-sin-ran

  1192.   beg 0.2623 f+ 4    24.7454 0.16 :fm-index 2.0856 vln-one-sin-ran

  1193.   beg 0.2623 f+ 4    24.7948 0.16 :fm-index 1.9570 vln-one-sin-ran

  1194.   beg 0.2625 f+ 2    24.4994 0.16 :fm-index 2.4642 vln-one-sin-ran

  1195.   beg 0.2625 f+ 1    24.4749 0.16 :fm-index 1.9901 vln-one-sin-ran

  1196.   beg 0.2630 f+ 2    24.5239 0.16 :fm-index 1.9972 vln-one-sin-ran

  1197.   beg 0.2633 f+ 2    24.4505 0.16 :fm-index 1.9148 vln-one-sin-ran

  1198.   beg 0.2635 f+ 1.2  24.4505 0.16 :fm-index 1.9017 vln-one-sin-ran

  1199.   beg 0.2635 f+ 2.8  24.4749 0.16 :fm-index 2.4958 vln-one-sin-ran

  1200.   beg 0.2640 f+ 0.8  24.4260 0.16 :fm-index 2.2518 vln-one-sin-ran

  1201.   beg 0.2643 f+ 2    24.5975 0.16 :fm-index 2.1120 vln-one-sin-ran

  1202.   beg 0.2643 f+ 4    24.6221 0.16 :fm-index 2.3154 vln-one-sin-ran

  1203.   beg 0.2643 f+ 4    24.6467 0.16 :fm-index 1.9240 vln-one-sin-ran

  1204.   

  1205.   beg 4 + dup to beg test-info

  1206. 

  1207.   \ 27, score 134

  1208.   6.718 to fmv-fm1-rat

  1209.   4.414 to fmv-fm2-rat

  1210.   5.141 to fmv-fm3-rat

  1211.   beg 0.2600 f+ 1.6 164.5868 0.16 :fm-index 1.9587 vln-one-sin-ran

  1212.   beg 0.2600 f+ 2   164.5868 0.16 :fm-index 1.5071 vln-one-sin-ran

  1213.   beg 0.2603 f+ 1.2 164.5868 0.16 :fm-index 1.7690 vln-one-sin-ran

  1214.   beg 0.2603 f+ 4   164.5868 0.16 :fm-index 1.7686 vln-one-sin-ran

  1215.   beg 0.2605 f+ 1.2 125.9513 0.16 :fm-index 1.5702 vln-one-sin-ran

  1216.   beg 0.2605 f+ 2.8 125.9513 0.16 :fm-index 2.1962 vln-one-sin-ran

  1217.   beg 0.2608 f+ 1.2 125.9513 0.16 :fm-index 1.7701 vln-one-sin-ran

  1218.   beg 0.2608 f+ 1.6  24.4994 0.16 :fm-index 2.1665 vln-one-sin-ran

  1219.   beg 0.2610 f+ 2    24.4994 0.16 :fm-index 1.9345 vln-one-sin-ran

  1220.   beg 0.2610 f+ 1.2  24.4994 0.16 :fm-index 2.2037 vln-one-sin-ran

  1221.   beg 0.2613 f+ 4    24.4994 0.16 :fm-index 1.6826 vln-one-sin-ran

  1222.   beg 0.2615 f+ 1.2  24.4994 0.16 :fm-index 1.5410 vln-one-sin-ran

  1223.   beg 0.2615 f+ 2.8  24.4994 0.16 :fm-index 1.8293 vln-one-sin-ran

  1224.   beg 0.2620 f+ 1.2  24.4994 0.16 :fm-index 2.1468 vln-one-sin-ran

  1225.   beg 0.2623 f+ 2    24.4994 0.16 :fm-index 2.0758 vln-one-sin-ran

  1226.   beg 0.2623 f+ 4    24.4994 0.16 :fm-index 2.4138 vln-one-sin-ran

  1227.   beg 0.2623 f+ 4    24.4994 0.16 :fm-index 1.8479 vln-one-sin-ran

  1228.   beg 0.2625 f+ 3    24.4994 0.16 :fm-index 2.4639 vln-one-sin-ran

  1229.   beg 0.2625 f+ 1.5  24.4994 0.16 :fm-index 2.3995 vln-one-sin-ran

  1230.   beg 0.2630 f+ 3    24.4994 0.16 :fm-index 1.8609 vln-one-sin-ran

  1231.   beg 0.2633 f+ 3    24.4994 0.16 :fm-index 2.4506 vln-one-sin-ran

  1232.   beg 0.2635 f+ 1.2  24.4994 0.16 :fm-index 2.1577 vln-one-sin-ran

  1233.   beg 0.2635 f+ 2.8  24.4994 0.16 :fm-index 1.6663 vln-one-sin-ran

  1234.   beg 0.2640 f+ 0.8  24.4994 0.16 :fm-index 2.1166 vln-one-sin-ran

  1235.   beg 0.2643 f+ 2    24.4994 0.16 :fm-index 1.9362 vln-one-sin-ran

  1236.   beg 0.2643 f+ 4    24.4994 0.16 :fm-index 2.2052 vln-one-sin-ran

  1237.   beg 0.2643 f+ 4    24.4994 0.16 :fm-index 2.0102 vln-one-sin-ran

  1238.   

  1239.   beg 4 + dup to beg test-info

  1240. 

  1241.   \ 28, score 138

  1242.   restore-fm-violin-defaults

  1243.   whoosh   to fmv-gliss-env

  1244.   metalamp to fmv-amp-env

  1245.   0.8   to fmv-glissando-amount

  1246.   0.01  to fmv-reverb-amount

  1247.   2.718 to fmv-fm1-rat

  1248.   1.141 to fmv-fm2-rat

  1249.   3.141 to fmv-fm3-rat

  1250.   beg 0.2600 f+ 0.4 1046.4800 0.16 :fm-index 2.3870 vln-one-sin

  1251.   beg 0.2600 f+ 0.5 1044.3912 0.16 :fm-index 2.4309 vln-one-sin

  1252.   beg 0.2603 f+ 0.3 1048.5730 0.16 :fm-index 2.15   vln-one-sin

  1253.   beg 0.2603 f+ 0.5 1042.3066 0.16 :fm-index 1.7211 vln-one-sin

  1254.   beg 0.2610 f+ 0.3  524.2865 0.16 :fm-index 2.1751 vln-one-sin

  1255.   beg 0.2620 f+ 0.3  520.1131 0.16 :fm-index 1.5433 vln-one-sin

  1256.   beg 0.2623 f+ 0.4  517.0048 0.16 :fm-index 2.4335 vln-one-sin

  1257.   beg 0.2625 f+ 0.4  523.2400 0.16 :fm-index 2.2778 vln-one-sin

  1258.   beg 0.2635 f+ 0.3  522.1951 0.16 :fm-index 1.9441 vln-one-sin

  1259.   beg 0.2643 f+ 0.4  520.6316 0.16 :fm-index 2.4656 vln-one-sin

  1260.   

  1261.   beg 4 + dup to beg test-info

  1262. 

  1263.   \ 29, score 142

  1264.   restore-fm-violin-defaults

  1265.   beg 0.1200 f+ 0.4 2092.9600 0.16 :fm-index 3 :reverb-amount 0

  1266.     :amp-env metalamp :fm2-rat 1.1410 

  1267.     :fm3-rat 3.1410 :fm1-rat 2.7180 vln-one-sin

  1268.   beg 0.1200 f+ 0.5 2088.7820 0.16 :fm-index 3 :reverb-amount 0

  1269.     :amp-env metalamp :fm2-rat 1.1410 :fm3-rat 3.1410 

  1270.     :fm1-rat 2.7180 vln-one-sin

  1271.   beg 0.1200 f+ 0.3 2097.1460 0.16 :fm-index 3 :reverb-amount 0

  1272.     :amp-env metalamp :fm2-rat 1.1410 :fm3-rat 3.1410 

  1273.     :fm1-rat 2.7180 vln-one-sin

  1274.   beg 0.1200 f+ 0.5 2084.6130 0.16 :fm-index 3 :reverb-amount 0

  1275.     :amp-env metalamp :fm2-rat 1.1410 :fm3-rat 3.1410 

  1276.     :fm1-rat 2.7180 vln-one-sin

  1277.   beg 0.1210 f+ 0.3 1048.5730 0.16 :fm-index 3 :reverb-amount 0

  1278.     :amp-env metalamp :fm2-rat 1.1410 :fm3-rat 3.1410 

  1279.     :fm1-rat 2.7180 vln-one-sin

  1280.   beg 0.1220 f+ 0.3 1040.2260 0.16 :fm-index 3 :reverb-amount 0

  1281.     :amp-env metalamp :fm2-rat 1.1410 :fm3-rat 3.1410 

  1282.     :fm1-rat 2.7180 vln-one-sin

  1283.   beg 0.1220 f+ 0.5 1034.0100 0.16 :fm-index 3 :reverb-amount 0

  1284.     :amp-env metalamp :fm2-rat 1.1410 :fm3-rat 3.1410 

  1285.     :fm1-rat 2.7180 vln-one-sin

  1286.   beg 0.1230 f+ 0.5 1046.4800 0.16 :fm-index 3 :reverb-amount 0

  1287.     :amp-env metalamp :fm2-rat 1.1410 :fm3-rat 3.1410 

  1288.     :fm1-rat 2.7180 vln-one-sin

  1289.   beg 0.1240 f+ 0.3 1044.3900 0.16 :fm-index 3 :reverb-amount 0

  1290.     :amp-env metalamp :fm2-rat 1.1410 :fm3-rat 3.1410 

  1291.     :fm1-rat 2.7180 vln-one-sin

  1292.   beg 0.1240 f+ 0.5 1041.2630 0.16 :fm-index 3 :reverb-amount 0

  1293.     :amp-env metalamp :fm2-rat 1.1410 :fm3-rat 3.1410 

  1294.     :fm1-rat 2.7180 vln-one-sin

  1295. 

  1296.   beg 2 + dup to beg test-info

  1297. 

  1298.   \ 30, score 144

  1299.   '( 0 0 20 0.5000 40 0.1 60 0.2 80 1 100 0 ) { z1amp }

  1300.   '( 0 0 20 1 60 0.1 75 0.3 100 0 )	      { z2amp }

  1301.   2.718 to fmv-fm1-rat

  1302.   4.414 to fmv-fm2-rat

  1303.   5.141 to fmv-fm3-rat

  1304.   beg 0.4880 f+ 1.1770  416.6072 0.0110 :fm-index 1.1140 :reverb-amount 0.1

  1305.     :amp-env z1amp :noise-amount 0.0050 vln-one-sin-ran

  1306.   beg 0.5050 f+ 2.4900  859.5863 0.0083 :fm-index 0.5890 :reverb-amount 0.1

  1307.     :amp-env z2amp :noise-amount 0.0050 vln-one-sin-ran

  1308.   beg 1 + to beg

  1309.   beg 0.0590 f+ 1.0550 1758.0816 0.0053 :fm-index 1.8640 :reverb-amount 0.1

  1310.     :amp-env z2amp :noise-amount 0.0050 vln-one-sin-ran

  1311.   beg 0.0930 f+ 1.8580  229.0566 0.0110 :fm-index 1.9690 :reverb-amount 0.1

  1312.     :amp-env z2amp :noise-amount 0.0050 vln-one-sin-ran

  1313.   beg 0.3490 f+ 3.3680  479.1994 0.0083 :fm-index 1.9970 :reverb-amount 0.1

  1314.     :amp-env z1amp :noise-amount 0.0050 vln-one-sin-ran

  1315.   beg 0.5010 f+ 3.0680  411.8241 0.0110 :fm-index 1.5390 :reverb-amount 0.1

  1316.     :amp-env z2amp :noise-amount 0.0050 vln-one-sin-ran

  1317.   beg 0.5200 f+ 2.8290  984.8456 0.0053 :fm-index 0.0560 :reverb-amount 0.1

  1318.     :amp-env z1amp :noise-amount 0.0050 vln-one-sin-ran

  1319.   beg 0.6100 f+ 0.7040 1767.7444 0.0053 :fm-index 1.2620 :reverb-amount 0.1

  1320.     :amp-env z2amp :noise-amount 0.0050 vln-one-sin-ran

  1321.   beg 0.8480 f+ 3.0510  859.7203 0.0083 :fm-index 1.6080 :reverb-amount 0.1

  1322.     :amp-env z2amp :noise-amount 0.0050 vln-one-sin-ran

  1323.   beg 1 + to beg

  1324.   beg 0.4880 f+ 3.2350  231.9431 0.0110 :fm-index 0.9690 :reverb-amount 0.1

  1325.     :amp-env z1amp :noise-amount 0.0050 vln-one-sin-ran

  1326.   beg 0.5610 f+ 3.2810  475.2009 0.0083 :fm-index 0.3740 :reverb-amount 0.1

  1327.     :amp-env z2amp :noise-amount 0.0050 vln-one-sin-ran

  1328.   beg 0.7970 f+ 2.8400  988.8375 0.0053 :fm-index 0.4200 :reverb-amount 0.1

  1329.     :amp-env z2amp :noise-amount 0.0050 vln-one-sin-ran

  1330.   beg 1 + to beg

  1331.   beg 0.0620 f+ 1.0210  411.7247 0.0110 :fm-index 0.1370 :reverb-amount 0.1

  1332.     :amp-env z2amp :noise-amount 0.0050 vln-one-sin-ran

  1333.   beg 0.2130 f+ 1.1610  848.5959 0.0083 :fm-index 1.3120 :reverb-amount 0.1

  1334.     :amp-env z2amp :noise-amount 0.0050 vln-one-sin-ran

  1335.   beg 0.4410 f+ 2.6160  390.0600 0.0110 :fm-index 1.9030 :reverb-amount 0.1

  1336.     :amp-env z1amp :noise-amount 0.0050 vln-one-sin-ran

  1337.   beg 0.4490 f+ 0.7000  802.3538 0.0083 :fm-index 1.5940 :reverb-amount 0.1

  1338.     :amp-env z2amp :noise-amount 0.0050 vln-one-sin-ran

  1339.   beg 0.5270 f+ 2.5080 1773.9366 0.0053 :fm-index 1.8030 :reverb-amount 0.1

  1340.     :amp-env z1amp :noise-amount 0.0050 vln-one-sin-ran

  1341.   beg 0.7820 f+ 2.7990  232.4344 0.0110 :fm-index 0.0590 :reverb-amount 0.1

  1342.     :amp-env z2amp :noise-amount 0.0050 vln-one-sin-ran

  1343.   beg 0.7830 f+ 2.7660 1650.1434 0.0053 :fm-index 0.4400 :reverb-amount 0.1

  1344.     :amp-env z2amp :noise-amount 0.0050 vln-one-sin-ran

  1345.   beg 0.7890 f+ 3.1560  475.7231 0.0083 :fm-index 0.7370 :reverb-amount 0.1

  1346.     :amp-env z2amp :noise-amount 0.0050 vln-one-sin-ran

  1347.   beg 1 + to beg

  1348.   beg 0.1540 f+ 2.1290  976.0237 0.0053 :fm-index 1.2690 :reverb-amount 0.1

  1349.     :amp-env z2amp :noise-amount 0.0050 vln-one-sin-ran

  1350.   beg 0.4890 f+ 3.3650  390.0525 0.0110 :fm-index 1.4580 :reverb-amount 0.1

  1351.     :amp-env z2amp :noise-amount 0.0050 vln-one-sin-ran

  1352.   beg 0.7450 f+ 1.5070 1665.9722 0.0053 :fm-index 1.9330 :reverb-amount 0.1

  1353.     :amp-env z2amp :noise-amount 0.0050 vln-one-sin-ran

  1354.   beg 0.8320 f+ 1.4430  798.1238 0.0083 :fm-index 0.8560 :reverb-amount 0.1

  1355.     :amp-env z1amp :noise-amount 0.0050 vln-one-sin-ran

  1356.   beg 0.9440 f+ 3.1560  229.0528 0.0110 :fm-index 1.8300 :reverb-amount 0.1

  1357.     :amp-env z2amp :noise-amount 0.0050 vln-one-sin-ran

  1358.   beg 1 + to beg

  1359.   beg 0.3930 f+ 1.1100  473.7225 0.0083 :fm-index 1.6260 :reverb-amount 0.1

  1360.     :amp-env z1amp :noise-amount 0.0050 vln-one-sin-ran

  1361.   beg 0.6970 f+ 1.6170  988.7953 0.0053 :fm-index 0.4230 :reverb-amount 0.1

  1362.     :amp-env z2amp :noise-amount 0.0050 vln-one-sin-ran

  1363.   beg 1 + to beg

  1364.   beg 0.0620 f+ 1.3190  390.9769 0.0110 :fm-index 0.4100 :reverb-amount 0.1

  1365.     :amp-env z2amp :noise-amount 0.0050 vln-one-sin-ran

  1366.   beg 0.0840 f+ 3.3660  804.6413 0.0083 :fm-index 1.8760 :reverb-amount 0.1

  1367.     :amp-env z2amp :noise-amount 0.0050 vln-one-sin-ran

  1368.   beg 0.1740 f+ 2.7210  418.6819 0.0110 :fm-index 0.0910 :reverb-amount 0.1

  1369.     :amp-env z2amp :noise-amount 0.0050 vln-one-sin-ran

  1370.   beg 0.5700 f+ 3.4460  845.4019 0.0077 :fm-index 0.7660 :reverb-amount 0.1

  1371.     :amp-env z2amp :noise-amount 0.0050 vln-one-sin-ran

  1372.   beg 0.6440 f+ 1.1790 1656.5756 0.0049 :fm-index 0.2960 :reverb-amount 0.1

  1373.     :amp-env z1amp :noise-amount 0.0050 vln-one-sin-ran

  1374.   beg 0.6600 f+ 2.8520 1758.9788 0.0049 :fm-index 0.4520 :reverb-amount 0.1

  1375.     :amp-env z2amp :noise-amount 0.0050 vln-one-sin-ran

  1376.   beg 0.8270 f+ 1.8840  387.0009 0.0099 :fm-index 1.3010 :reverb-amount 0.1

  1377.     :amp-env z1amp :noise-amount 0.0050 vln-one-sin-ran

  1378.   beg 0.8870 f+ 3.4040  796.7213 0.0077 :fm-index 1.1820 :reverb-amount 0.1

  1379.     :amp-env z2amp :noise-amount 0.0050 vln-one-sin-ran

  1380.   beg 0.9640 f+ 3.3230  416.3916 0.0099 :fm-index 0.6290 :reverb-amount 0.1

  1381.     :amp-env z2amp :noise-amount 0.0050 vln-one-sin-ran

  1382.   beg 1 + to beg

  1383.   beg 0.1320 f+ 1.7050 1637.2303 0.0049 :fm-index 1.0570 :reverb-amount 0.1

  1384.     :amp-env z1amp :noise-amount 0.0050 vln-one-sin-ran

  1385.   beg 0.15   f+ 3.1250 1762.4906 0.0049 :fm-index 1.3170 :reverb-amount 0.1

  1386.     :amp-env z2amp :noise-amount 0.0050 vln-one-sin-ran

  1387.   beg 0.3860 f+ 2.9670  852.0487 0.0077 :fm-index 1.4790 :reverb-amount 0.1

  1388.     :amp-env z1amp :noise-amount 0.0050 vln-one-sin-ran

  1389.   beg 0.6670 f+ 0.6780  413.7094 0.0099 :fm-index 0.9470 :reverb-amount 0.1

  1390.     :amp-env z2amp :noise-amount 0.0050 vln-one-sin-ran

  1391.   beg 0.8780 f+ 2.7490 1749.7509 0.0049 :fm-index 0.5040 :reverb-amount 0.1

  1392.     :amp-env z1amp :noise-amount 0.0050 vln-one-sin-ran

  1393.   beg 0.9730 f+ 0.5990  848.1253 0.0077 :fm-index 1.9380 :reverb-amount 0.1

  1394.     :amp-env z1amp :noise-amount 0.0050 vln-one-sin-ran

  1395.   beg 1 + to beg

  1396.   beg 0.0880 f+ 3.3360  229.9144 0.0099 :fm-index 1.3930 :reverb-amount 0.1

  1397.     :amp-env z2amp :noise-amount 0.0050 vln-one-sin-ran

  1398.   beg 0.1170 f+ 1.1300  984.0816 0.0049 :fm-index 0.3560 :reverb-amount 0.1

  1399.     :amp-env z2amp :noise-amount 0.0050 vln-one-sin-ran

  1400.   beg 0.4640 f+ 1.7330  478.7184 0.0077 :fm-index 0.2840 :reverb-amount 0.1

  1401.     :amp-env z2amp :noise-amount 0.0050 vln-one-sin-ran

  1402.   beg 0.5760 f+ 0.5680  413.4253 0.0099 :fm-index 1.5020 :reverb-amount 0.1

  1403.     :amp-env z2amp :noise-amount 0.0050 vln-one-sin-ran

  1404.   beg 0.8200 f+ 1.2150  230.9588 0.0099 :fm-index 1.0990 :reverb-amount 0.1

  1405.     :amp-env z1amp :noise-amount 0.0050 vln-one-sin-ran

  1406.   beg 0.8320 f+ 3.4590  473.8903 0.0077 :fm-index 0.7680 :reverb-amount 0.1

  1407.     :amp-env z2amp :noise-amount 0.0050 vln-one-sin-ran

  1408.   beg 0.8320 f+ 0.7260  857.2875 0.0077 :fm-index 0.7520 :reverb-amount 0.1

  1409.     :amp-env z2amp :noise-amount 0.0050 vln-one-sin-ran

  1410. 

  1411.   beg 4 + dup to beg test-info

  1412. 

  1413.   \ 31, score 156

  1414.   '( 0 1 20 0 100 0 ) { indfunc }

  1415.   '( 0 1 90 1 100 0 ) { indfunc2 }

  1416.   '( 0 1 6 1 10 0.5 20 0.3630 30 0.27

  1417.      40 0.2 50 0.12 60 0.08 70 0.04 100 0 ) { ampfunc }

  1418.   '( 0 0 1 1 3 1 10 0.5 30 0.2 60 0.05 100 0 ) { ampfunc1 }

  1419.   restore-fm-violin-defaults

  1420.   beg 0.2600 f+ 0.0500 80 0.8 :fm-index 5 :reverb-amount 0

  1421.     :amp-env ampfunc1 :fm1-env indfunc2 vln-one-sin

  1422.   beg 1 + to beg

  1423.   beg 0.2610 f+ 0.2 80 0.8 :fm-index 4 :reverb-amount 0

  1424.     :amp-env ampfunc :fm1-env indfunc :fm2-rat 0.6875 vln-one-sin

  1425.   beg 1 + to beg

  1426.   beg 0.2600 f+ 0.05 80 0.8 :fm-index 5 :reverb-amount 0

  1427.     :amp-env ampfunc1 :fm1-env indfunc2 vln-one-sin

  1428.   beg 0.2620 f+ 0.2  80 0.8 :fm-index 5 :reverb-amount 0

  1429.     :amp-env ampfunc :fm1-env indfunc :fm2-rat 0.6875 vln-one-sin

  1430.   beg 1 + to beg

  1431.   beg 0.2600 f+ 0.0500 80 0.8 :fm-index 6 :reverb-amount 0

  1432.     :amp-env ampfunc1 :fm1-env indfunc2  vln-one-sin

  1433.   beg 0.2630 f+ 0.2 80 0.8 :fm-index 6 :reverb-amount 0

  1434.     :amp-env ampfunc :fm1-env indfunc :fm2-rat 0.6875 vln-one-sin

  1435.   beg 1 + to beg

  1436.   beg 0.2600 f+ 0.0500 80 0.3 :fm-index 4 :reverb-amount 0

  1437.     :amp-env ampfunc1 :fm1-env indfunc2 vln-one-sin 

  1438.   beg 0.2620 f+ 0.1 160 0.3 :fm-index 4 :reverb-amount 0

  1439.     :amp-env ampfunc :fm1-env indfunc :fm2-rat 0.6875 vln-one-sin

  1440.   beg 0.2620 f+ 0.2500 80 0.8 :fm-index 4 :reverb-amount 0

  1441.     :amp-env ampfunc :fm1-env indfunc :fm2-rat 0.6875 vln-one-sin

  1442.   beg 1 + to beg

  1443.   beg 0.2600 f+ 0.0500 80 0.5000 :fm-index 4 :reverb-amount 0

  1444.     :amp-env ampfunc1 :fm1-env indfunc2 vln-one-sin

  1445.   beg 0.2610 f+ 0.1 210 0.3 :fm-index 4 :reverb-amount 0

  1446.     :amp-env ampfunc :fm1-env indfunc :fm2-rat 0.6875 vln-one-sin

  1447.   beg 0.2620 f+ 0.2 80 0.1 :fm-index 4 :reverb-amount 0

  1448.     :amp-env ampfunc :fm1-env indfunc :fm2-rat 0.6875 vln-one-sin

  1449.   beg 0.2630 f+ 0.2500 320 0.1 :fm-index 2 :reverb-amount 0

  1450.     :amp-env ampfunc :fm1-env indfunc :fm2-rat 0.6875 vln-one-sin

  1451.   beg 1 + to beg

  1452.   beg 0.2600 f+ 0.0500 80 0.8 :fm-index 4 :reverb-amount 0

  1453.     :amp-env ampfunc1 :fm1-env indfunc2 vln-one-sin 

  1454.   beg 0.2610 f+ 0.1 210 0.1 :fm-index 2 :reverb-amount 0

  1455.     :amp-env ampfunc :fm1-env indfunc :fm2-rat 0.6875 vln-one-sin

  1456.   beg 0.2620 f+ 0.2 80 0.2 :fm-index 4 :reverb-amount 0

  1457.     :amp-env ampfunc :fm1-env indfunc :fm2-rat 0.6875 vln-one-sin

  1458.   beg 0.2630 f+ 0.2500 320 0.3 :reverb-amount 0

  1459.     :amp-env ampfunc :fm1-env indfunc :fm2-rat 0.6875  vln-one-sin

  1460.   beg 1 + to beg

  1461.   beg 0.2600 f+ 0.0500 80 0.8 :fm-index 2 :reverb-amount 0

  1462.     :amp-env ampfunc1 :fm1-env indfunc2 vln-one-sin

  1463.   beg 0.2610 f+ 0.1 210 0.1 :fm-index 2 :reverb-amount 0

  1464.     :amp-env ampfunc :fm1-env indfunc :fm2-rat 0.6875 vln-one-sin

  1465.   beg 0.2620 f+ 0.2 80 0.2 :fm-index 2 :reverb-amount 0

  1466.     :amp-env ampfunc :fm1-env indfunc :fm2-rat 0.6875 vln-one-sin

  1467.   beg 0.2630 f+ 0.2500 320 0.3 :reverb-amount 0

  1468.     :amp-env ampfunc :fm1-env indfunc :fm2-rat 0.6875 vln-one-sin

  1469. 

  1470.   beg 1 + dup to beg test-info

  1471. 

  1472.   \ 32, score 164

  1473.   0     to fmv-glissando-amount

  1474.   0.004 to fmv-noise-amount

  1475.   3.141 to fmv-fm1-rat

  1476.   4.414 to fmv-fm2-rat

  1477.   2.718 to fmv-fm3-rat

  1478.   beg 0.2600 f+ 4 3286.9937 0.16 :fm-index 2.2165 :reverb-amount 0.01

  1479.     :amp-env n-amp :fm1-env n-amp vln-one-sin-ran

  1480.   beg 0.2603 f+ 4 1046.4800 0.16 :fm-index 2.3234 :reverb-amount 0.01

  1481.     :amp-env n-amp :fm1-env n-amp vln-one-sin-ran

  1482.   beg 0.2605 f+ 4 2844.3326 0.16 :fm-index 2.4790 :reverb-amount 0.1

  1483.     :amp-env n-amp :fm1-env n-amp vln-one-sin-ran

  1484.   beg 0.2608 f+ 4  821.7484 0.1  :fm-index 1.8667 :reverb-amount 0.01

  1485.     :amp-env n-amp :fm1-env n-amp vln-one-sin-ran

  1486.   beg 0.2610 f+ 4  261.6200 0.1  :fm-index 1.8523 :reverb-amount 0.01

  1487.     :amp-env n-amp :fm1-env n-amp vln-one-sin-ran

  1488.   beg 0.2613 f+ 4  711.0832 0.1  :fm-index 2.2300 :reverb-amount 0.1

  1489.     :amp-env n-amp :fm1-env n-amp vln-one-sin-ran

  1490.   beg 0.2615 f+ 4  205.4371 0.06 :fm-index 1.5187 :reverb-amount 0.01

  1491.     :amp-env n-amp :fm1-env n-amp vln-one-sin-ran

  1492.   beg 0.2618 f+ 4   65.4050 0.06 :fm-index 2.4074 :reverb-amount 0.01

  1493.     :amp-env n-amp :fm1-env n-amp vln-one-sin-ran

  1494.   beg 0.2620 f+ 4  177.7708 0.06 :fm-index 2.4481 :reverb-amount 0.1

  1495.     :amp-env n-amp :fm1-env n-amp vln-one-sin-ran

  1496.   beg 0.2623 f+ 4   51.3593 0.01 :fm-index 2.3069 :reverb-amount 0.01

  1497.     :amp-env n-amp :fm1-env n-amp vln-one-sin-ran

  1498.   beg 0.2625 f+ 4   16.3513 0.01 :fm-index 2.1008 :reverb-amount 0.01

  1499.     :amp-env n-amp :fm1-env n-amp vln-one-sin-ran

  1500.   beg 0.2628 f+ 4   44.4427 0.01 :fm-index 2.4860 :reverb-amount 0.1

  1501.     :amp-env n-amp :fm1-env n-amp vln-one-sin-ran

  1502. 

  1503.   beg 8 + dup to beg test-info

  1504. 

  1505.   \ 33, score 172

  1506.   restore-fm-violin-defaults

  1507.   beg 0.2603 f+ 1.2  88.8854 0.1  :fm-index 2.3144 :reverb-amount 0.2

  1508.     :amp-env mamp :fm2-rat 4.4140 :fm3-rat 5.1410 :fm1-rat 2.7180 vln-one-sin

  1509.   beg 0.2603 f+ 4    88.8854 0.1  :fm-index 2.1690 :reverb-amount 0.2

  1510.     :amp-env mamp :fm2-rat 4.4140 :fm3-rat 5.1410 :fm1-rat 2.7180 vln-one-sin

  1511.   beg 0.2605 f+ 2.8 168.1236 0.05 :fm-index 2.1850 :reverb-amount 0.2

  1512.     :amp-env mamp :fm2-rat 4.4140 :fm3-rat 5.1410 :fm1-rat 2.7180 vln-one-sin

  1513.   beg 0.2608 f+ 1.2 168.1236 0.08 :fm-index 1.7743 :reverb-amount 0.2

  1514.     :amp-env mamp :fm2-rat 4.4140 :fm3-rat 5.1410 :fm1-rat 2.7180 vln-one-sin

  1515.   beg 0.2610 f+ 2    32.7025 0.1  :fm-index 2.4925 :reverb-amount 0.2

  1516.     :amp-env mamp :fm2-rat 4.4140 :fm3-rat 5.1410 :fm1-rat 2.7180 vln-one-sin

  1517.   beg 0.2633 f+ 2    32.7025 0.1  :fm-index 2.1325 :reverb-amount 0.2

  1518.     :amp-env mamp :fm2-rat 4.4140 :fm3-rat 5.1410 :fm1-rat 2.7180 vln-one-sin

  1519.   beg 0.2643 f+ 4    32.7025 0.05 :fm-index 1.7578 :reverb-amount 0.2

  1520.     :amp-env mamp :fm2-rat 4.4140 :fm3-rat 5.1410 :fm1-rat 2.7180 vln-one-sin

  1521. 

  1522.   beg 8 + dup to beg test-info

  1523. 

  1524.   \ 34, score 180

  1525.   beg 0.2600 f+ 6.6830  244.8160 0.0060 :fm-index 2   :reverb-amount 0.2

  1526.     :noise-amount 0.0040 vln-one-sin-ran

  1527.   beg 0.2600 f+ 5.5170  495.4040 0.0060 :fm-index 2   :reverb-amount 0.2

  1528.     :noise-amount 0.0040 vln-one-sin-ran

  1529.   beg 0.2600 f+ 7.5350  980.6190 0.0020 :fm-index 2   :reverb-amount 0.2

  1530.     :noise-amount 0.0040 vln-one-sin-ran

  1531.   beg 0.2600 f+ 7.1990 1965.4290 0.0020 :fm-index 0.8 :reverb-amount 0.2

  1532.     :noise-amount 0.0040 vln-one-sin-ran

  1533.   beg 0.2600 f+ 4.0790 3835.3170 0.0020 :fm-index 0.8 :reverb-amount 0.2

  1534.     :noise-amount 0.0040 vln-one-sin-ran

  1535.   beg 0.5170 f+ 4.7400 1320.9670 0.0020 :fm-index 0.8 :reverb-amount 0.2

  1536.     :noise-amount 0.0040 vln-one-sin-ran

  1537.   beg 0.7040 f+ 7.2080  655.5670 0.0040 :fm-index 2   :reverb-amount 0.2

  1538.     :noise-amount 0.0040 vln-one-sin-ran

  1539. 

  1540.   beg 9 + dup to beg test-info

  1541. 

  1542.   \ 35, score 189

  1543.   '( 0 0 15 1 100 0 ) { updown }

  1544.   0   to fmv-glissando-amount

  1545.   0.9 to fmv-reverb-amount

  1546.   beg 0.5450 f+ 6.4650  366.3330 0.0320 :fm-index 1.0480

  1547.     :amp-env '( 0 0 1.5468 1 2.0882 0.7 2.3202 1 98.4532 0.7500 100 0 )

  1548.     vln-one-sin-exp

  1549.   beg 0.5950 f+ 8.4340 1172.5830 0.0180 :fm-index 1.1350

  1550.     :amp-env '( 0 0 1.1857 1.0 1.6007 0.7 1.7785 1 98.8143 0.5556 100 0 )

  1551.     vln-one-sin-exp

  1552.   beg 0.7650 f+ 1.6210  369.9940 0.0170 :fm-index 0.0960

  1553.     :amp-env '( 0 0 6.1690 1.0 8.3282 0.7 9.2535 1 93.8310 0.5294 100 0 )

  1554.     vln-one-sin-exp

  1555.   beg 0.8820 f+ 3.0640  246.9420 0.0170 :fm-index 0.0020

  1556.     :amp-env '( 0 0 3.2637 1 4.4060 0.7 4.8956 1.0 96.7363 0.5294 100 0 )

  1557.     vln-one-sin-exp

  1558.   beg 0.9250 f+ 3.1170  123.4710 0.0380 :fm-index 0.2330

  1559.     :amp-env '( 0 0 3.2082 1 4.3311 0.7 4.8123 1 96.7918 0.7895 100 0 )

  1560.     vln-one-sin-exp

  1561.   beg 0.9810 f+ 3.5670  123.4710 0.0420 :fm-index 0.2330

  1562.     :amp-env '( 0 0 2.8035 1 3.7847 0.7 4.2052 1.0 97.1965 0.8095 100 0 )

  1563.     vln-one-sin-exp

  1564.   beg 1 + to beg

  1565.   beg 0.1280 f+ 1.0450  246.9420 0.0170 :fm-index 1.2050

  1566.     :amp-env '( 0 0 9.5694 1 12.9187 0.7 14.3541 1 90.4306 0.5294 100 0 )

  1567.     vln-one-sin-exp

  1568.   beg 0.2550 f+ 3.3870  374.1370 0.0170 :fm-index 0.1800

  1569.     :amp-env '( 0 0 2.9525 1.0 3.9858 0.7 4.4287 1 97.0475 0.5294 100 0 )

  1570.     vln-one-sin-exp

  1571.   beg 0.2990 f+ 8.3050 1576.9120 0.0200 :fm-index 0.2990

  1572.     :amp-env '( 0 0 1.2041 1 1.6255 0.7 1.8061 1 98.7959 0.6 100 0 )

  1573.     vln-one-sin-exp

  1574.   beg 0.3300 f+ 4.4630  246.9420 0.0170 :fm-index 0.0020

  1575.     :amp-env '( 0 0 2.2406 1 3.0249 0.7 3.3610 1.0 97.7594 0.5294 100 0 )

  1576.     vln-one-sin-exp

  1577.   beg 0.6600 f+ 8.9940 1576.9120 0.0200 :fm-index 0.2990

  1578.     :amp-env '( 0 0 1.1119 1 1.5010 0.7 1.6678 1 98.8881 0.6 100 0 )

  1579.     vln-one-sin-exp

  1580.   beg 0.9060 f+ 8.8360 1172.5830 0.0180 :fm-index 1.1350

  1581.     :amp-env '( 0 0 1.1317 1 1.5278 0.7 1.6976 1 98.8683 0.5556 100 0 )

  1582.     vln-one-sin-exp

  1583.   beg 1 + to beg

  1584.   beg 0.1510 f+ 4.9320 374.1370 0.0170 :fm-index 0.1800

  1585.     :amp-env '( 0 0 2.0276 1 2.7372 0.7 3.0414 1 97.9724 0.5294 100 0 )

  1586.     vln-one-sin-exp

  1587.   beg 0.2720 f+ 2.3250 369.9940 0.0170 :fm-index 1.1030

  1588.     :amp-env '( 0 0 4.3011 1 5.8065 0.7 6.4516 1 95.6989 0.5294 100 0 )

  1589.     vln-one-sin-exp

  1590.   beg 1 + to beg

  1591.   beg 0.6960 f+ 3.5540 366.3330 0.0310 :fm-index 1.0480

  1592.     :amp-env '( 0 0 2.8137 1 3.7985 0.7 4.2206 1 97.1863 0.7419 100 0 )

  1593.     vln-one-sin-exp

  1594.   beg 1 + to beg

  1595.   beg 0.7240 f+ 0.6040 246.9420 0.0170 :fm-index 1.2050

  1596.     :amp-env '( 0 0 16.5563 1 22.351 0.7 24.8344 1 83.4437 0.5294 100 0 )

  1597.     vln-one-sin-exp

  1598.   beg 0.9420 f+ 2.5010 123.4710 0.0330 :fm-index 0.2330

  1599.     :amp-env '( 0 0 3.9984 1 5.3978 0.7 5.9976 1 96.0016 0.7576 100 0 )

  1600.     vln-one-sin-exp

  1601.   beg 1 + to beg

  1602.   beg 0.0340 f+ 2.3860 246.9420 0.0170 :fm-index 0.0020

  1603.     :amp-env '( 0 0 4.1911 1 5.6580 0.7 6.2867 1 95.8089 0.5294 100 0 )

  1604.     vln-one-sin-exp

  1605.   beg 0.3850 f+ 1.4510 369.9940 0.0170 :fm-index 1.1030

  1606.     :amp-env '( 0 0 6.8918 1 9.3039 0.7 10.3377 1 93.1082 0.5294 100 0 )

  1607.     vln-one-sin-exp

  1608.   beg 0.5670 f+ 2.6550 374.1370 0.0170 :fm-index 0.1800

  1609.     :amp-env '( 0 0 3.7665 1 5.0847 0.7 5.6497 1 96.2335 0.5294 100 0 )

  1610.     vln-one-sin-exp

  1611.   beg 0.9830 f+ 2.9860 123.4710 0.0380 :fm-index 0.2330

  1612.     :amp-env '( 0 0 3.3490 1 4.5211 0.7 5.0234 1 96.6510 0.7895 100 0 )

  1613.     vln-one-sin-exp

  1614.   beg 1 + to beg

  1615.   beg 0.4910 f+ 0.6110 123.9770 0.0170 :fm-index 0.7550

  1616.     :amp-env '( 0 0 16.3666 1 22.0949 0.7 24.55 1 83.6334 0.5294 100 0 )

  1617.     vln-one-sin-exp

  1618.   beg 0.7570 f+ 1.4440 123.4710 0.0170 :fm-index 0.0020

  1619.     :amp-env '( 0 0 6.9252 1 9.3490 0.7 10.3878 1 93.0748 0.5294 100 0 )

  1620.     vln-one-sin-exp

  1621.   beg 0.7750 f+ 0.5370  92.4435 0.0330 :fm-index 0.9200

  1622.     :amp-env '( 0 0 18.622 1 25.1397 0.7 27.9330 1 81.3780 0.7576 100 0 )

  1623.     vln-one-sin-exp

  1624.   beg 0.7750 f+ 10.537  92.4435 0.0130 :fm-index 0.9200

  1625.     :amp-env '( 0 0 0.9490 1 1.2812 0.7 1.4236 1 99.0510 0.3846 100 0 )

  1626.     vln-one-sin-exp

  1627.   beg 0.9380 f+ 0.6520 122.2995 0.0170 :fm-index 1.8380

  1628.     :amp-env '( 0 0 15.3374 1 20.706 0.7 23.0061 1 84.6626 0.5294 100 0 )

  1629.     vln-one-sin-exp

  1630.   beg 1 + to beg 

  1631.   beg 0.2350 f+ 3.7250 586.2915 0.0180 :fm-index 1.1350

  1632.     :amp-env '( 0 0 2.6846 1 3.6242 0.7 4.0268 1 97.3154 0.5556 100 0 )

  1633.     vln-one-sin-exp

  1634.   beg 0.2560 f+ 2.8900 183.1665 0.0260 :fm-index 1.0480

  1635.     :amp-env '( 0 0 3.4602 1 4.6713 0.7 5.1903 1 96.5398 0.6923 100 0 )

  1636.     vln-one-sin-exp

  1637.   beg 0.2710 f+ 1.6210 187.0685 0.0170 :fm-index 0.1800

  1638.     :amp-env '( 0 0 6.169 1.0 8.3282 0.7 9.2535 1 93.8310 0.5294 100 0 )

  1639.     vln-one-sin-exp

  1640.   beg 0.2920 f+ 2.0160 183.1665 0.0290 :fm-index 1.0480

  1641.     :amp-env '( 0 0 4.9603 1 6.6964 0.7 7.4405 1 95.0397 0.7241 100 0 )

  1642.     vln-one-sin-exp

  1643.   beg 0.2920 f+ 12.016 183.1665 0.0290 :fm-index 1.0480

  1644.     :amp-env '( 0 0 0.832 1 1.1235 0.7 1.248 1.0 99.1678 0.7241 100 0 )

  1645.     vln-one-sin-exp

  1646.   beg 0.3300 f+ 0.7300 184.9970 0.0170 :fm-index 0.0960

  1647.     :amp-env '( 0 0 13.699 1 18.4932 0.7 20.548 1.0 86.3014 0.529 100 0 )

  1648.     vln-one-sin-exp

  1649.   beg 0.3570 f+ 1.9600 183.1665 0.0280 :fm-index 1.0480

  1650.     :amp-env '( 0 0 5.1020 1.0 6.8878 0.7 7.6531 1 94.8980 0.7143 100 0 )

  1651.     vln-one-sin-exp

  1652.   beg 0.3820 f+ 2.2450  61.7355 0.0330 :fm-index 0.2330

  1653.     :amp-env '( 0 0 4.4543 1 6.0134 0.7 6.6815 1 95.5457 0.7576 100 0 )

  1654.     vln-one-sin-exp

  1655.   beg 0.3820 f+ 12.2450 61.7355 0.0330 :fm-index 0.2330

  1656.     :amp-env '( 0 0 0.8167 1 1.1025 0.7 1.2250 1 99.1833 0.7576 100 0 )

  1657.     vln-one-sin-exp

  1658.   beg 0.5410 f+ 3.0130 246.5050 0.0360 :fm-index 1.1350

  1659.     :amp-env '( 0 0 3.3190 1.0 4.4806 0.7 4.9784 1 96.6810 0.7778 100 0 )

  1660.     vln-one-sin-exp

  1661.   beg 0.5570 f+ 2.322 1251.5960 0.0400 :fm-index 0.2990

  1662.     :amp-env '( 0 0 4.3066 1 5.8140 0.7 6.4599 1 95.6934 0.8 100 0 )

  1663.     vln-one-sin-exp

  1664.   beg 0.5570 f+ 18.322 1251.5960 0.020 :fm-index 0.2990

  1665.     :amp-env '( 0 0 0.5458 1.000 0.7368 0.7 0.8187 1 99.4542 0.6 100 0 )

  1666.     vln-one-sin-exp

  1667.   beg 1 + to beg

  1668.   beg 0.1060 f+ 1.9900 183.1665 0.0230 :fm-index 1.0480

  1669.     :amp-env '( 0 0 5.0251 1.0 6.7839 0.7 7.5377 1 94.9749 0.6522 100 0 )

  1670.     vln-one-sin-exp

  1671.   beg 0.2570 f+ 1.9180  61.7355 0.0330 :fm-index 0.2330

  1672.     :amp-env '( 0 0 5.2138 1 7.0386 0.7 7.8206 1 94.7862 0.7576 100 0 )

  1673.     vln-one-sin-exp

  1674.   beg 0.6370 f+ 1.3090 183.1665 0.0310 :fm-index 1.0480

  1675.     :amp-env '( 0 0 7.6394 1 10.3132 0.7 11.4591 1 92.3606 0.7419 100 0 )

  1676.     vln-one-sin-exp

  1677.   beg 1 + to beg 

  1678.   beg 0.0330 f+ 1.1590 183.1665 0.0250 :fm-index 1.0480

  1679.     :amp-env '( 0 0 8.6281 1 11.6480 0.7 12.9422 1 91.3719 0.6800 100 0 )

  1680.     vln-one-sin-exp

  1681.   beg 0.0980 f+ 1.2400  30.8675 0.0330 :fm-index 0.2330

  1682.     :amp-env '( 0 0 8.0645 1 10.8871 0.7 12.0968 1 91.9355 0.7576 100 0 )

  1683.     vln-one-sin-exp

  1684.   beg 0.0980 f+ 11.2400 30.8675 0.0130 :fm-index 0.2330

  1685.     :amp-env '( 0 0 0.8897 1 1.2011 0.7 1.3345 1 99.1103 0.3846 100 0 )

  1686.     vln-one-sin-exp

  1687.   beg 0.1260 f+ 0.2600 123.4710 0.0170 :fm-index 1.2050

  1688.     :amp-env '( 0 0 38.462 1 51.9231 0.7 57.6923 1 61.5385 0.5294 100 0 )

  1689.     vln-one-sin-exp

  1690.   beg 0.1260 f+ 10.26  123.4710 0.0170 :fm-index 1.2050

  1691.     :amp-env '( 0 0 0.9747 1 1.3158 0.7 1.4620 1 99.0253 0.5294 100 0 )

  1692.     vln-one-sin-exp

  1693.   beg 0.0600 f+ 13.877 3951.1200 0.009               :amp-env updown vln-one-sin

  1694.   beg 0.2600 f+ 14.877  123.4725 0.017 :fm-index 1.5 :amp-env updown vln-one-sin

  1695.   beg 0.2600 f+ 13.877   61.7363 0.017 :fm-index 1.5 :amp-env updown vln-one-sin

  1696.   beg 0.2600 f+ 12.877   30.8681 0.017 :fm-index 1.5 :amp-env updown vln-one-sin

  1697.   beg 0.2600 f+ 11.877   15.4341 0.017 :fm-index 1.5 :amp-env updown vln-one-sin

  1698. 

  1699.   beg 19 + dup to beg test-info

  1700. 

  1701.   \ 36, score 217

  1702.   restore-fm-violin-defaults

  1703.   beg 0.2620 f+ 0.3906 440 0.4500 :fm-index 1.2 :reverb-amount 0.0013

  1704.     :amp-env '( 0 0 0.7680 1 4.7774 0.6 9.7891 0.3 24.8243 0.1 100 0 )

  1705.     cel-one-sum

  1706.   beg 0.2640 f+ 0.5220 220 0.4500 :fm-index 1.2 :reverb-amount 0.0012

  1707.     :amp-env '( 0 0 0.5747 1.0 4.5919 0.6 9.6134 0.3 24.6778 0.1 100 0 )

  1708.     cel-one-sum

  1709.   beg 0.2660 f+ 1.5660 880 0.4500 :fm-index 1.2 :reverb-amount 0.0014

  1710.     :amp-env '( 0 0 0.1916 1.0 4.2242 0.6 9.2651 0.3 24.3876 0.1 100 0 )

  1711.     cel-one-sum

  1712.   beg 0.2680 f+ 1.5660 110 0.4500 :fm-index 1.2 :reverb-amount 0.0013

  1713.     :amp-env '( 0 0 0.1916 1.0 4.2242 0.6 9.2651 0.3 24.3876 0.1 100 0 ) 

  1714.     cel-one-sum

  1715. 

  1716.   beg 3 + dup to beg test-info

  1717. 

  1718.   \ 37, score 220

  1719.   beg 0.8600 f+ 0.9    733.3330 0.1875 :fm-index 0.2 :distance 1.0 

  1720.     :reverb-amount 0.0012

  1721.     :amp-env '( 0 0 0.3333 1 4.3603 0.6 9.3939 0.3 24.4950 0.1 100 0 )

  1722.     vln-one-sin

  1723.   beg 0.8600 f+ 0.225  550      0.1875 :fm-index 0.2 :distance 1.0 

  1724.     :reverb-amount 0.0015

  1725.     :amp-env '( 0 0 1.3333 1 5.3199 0.6 10.3030 0.3 25.2525 0.1 100 0 )

  1726.     vln-one-sin

  1727.   beg 0.8600 f+ 0.45   586.6670 0.3750 :fm-index 0.2 :distance 1.0 

  1728.     :reverb-amount 0.0013

  1729.     :amp-env '( 0 0 0.6667 1 4.6801 0.6 9.6970 0.3 24.7475 0.1 100 0 )  

  1730.     vln-one-sin

  1731.   beg 0.9020 f+ 0.9    733.3330 0.1875 :fm-index 0.4 :distance 1.0 

  1732.     :reverb-amount 0.0013

  1733.     :amp-env '( 0 0 0.3333 1 4.3603 0.6 9.3939 0.3 24.4950 0.1 100 0 )  

  1734.     vln-one-sin

  1735.   beg 0.9020 f+ 0.225  550      0.1875 :fm-index 0.4 :distance 1.0 

  1736.     :reverb-amount 0.0010

  1737.     :amp-env '( 0 0 1.3333 1 5.3199 0.6 10.3030 0.3 25.2525 0.1 100 0 ) 

  1738.     vln-one-sin

  1739.   beg 0.9020 f+ 0.45   586.6670 0.3750 :fm-index 0.4 :distance 1.0 

  1740.     :reverb-amount 0.0015

  1741.     :amp-env '( 0 0 0.6667 1 4.6801 0.6 9.6970 0.3 24.7475 0.1 100 0 )  

  1742.     vln-one-sin

  1743.   beg 0.9430 f+ 0.9    366.6670 0.1875 :fm-index 0.6 :distance 1.0 

  1744.     :reverb-amount 0.0016

  1745.     :amp-env '( 0 0 0.3333 1 4.3603 0.6 9.3939 0.3 24.4950 0.1 100 0 )  

  1746.     vln-one-sin

  1747.   beg 0.9430 f+ 0.225  275      0.1875 :fm-index 0.6 :distance 1.0 

  1748.     :reverb-amount 0.0015

  1749.     :amp-env '( 0 0 1.3333 1 5.3199 0.6 10.3030 0.3 25.2525 0.1 100 0 ) 

  1750.     vln-one-sin

  1751.   beg 0.9430 f+ 0.45   293.3340 0.3750 :fm-index 0.6 :distance 1.0 

  1752.     :reverb-amount 0.0015

  1753.     :amp-env '( 0 0 0.6667 1 4.6801 0.6 9.6970 0.3 24.7475 0.1 100 0 )  

  1754.     vln-one-sin

  1755.   beg 0.9850 f+ 0.9    733.3330 0.1875 :fm-index 0.8 :distance 1.0 

  1756.     :reverb-amount 0.0010

  1757.     :amp-env '( 0 0 0.3333 1 4.3603 0.6 9.3939 0.3 24.4950 0.1 100 0 )  

  1758.     vln-one-sin

  1759.   beg 0.9850 f+ 0.225  550      0.1875 :fm-index 0.8 :distance 1.0 

  1760.     :reverb-amount 0.0013

  1761.     :amp-env '( 0 0 1.3333 1 5.3199 0.6 10.3030 0.3 25.2525 0.1 100 0 ) 

  1762.     vln-one-sin

  1763. ;event

  1764. 

  1765. : long-example  ( -- )

  1766.   <'> fth-long-example

  1767.   *clm-c-version* if	\ we have only a C version of freeverb

  1768.     :reverb <'> freeverb :reverb-data '( :room-decay 0.8 )

  1769.   else

  1770.     :reverb <'> nrev :reverb-data '( :lp-coeff 0.6 )

  1771.   then with-sound

  1772. ;

  1773. 

  1774. : short-example ( -- )

  1775.   <'> fth-short-example

  1776.   :reverb <'> nrev :reverb-data '( :lp-coeff 0.6 ) with-sound

  1777. ;

  1778. 

  1779. 'snd provided? [unless]

  1780.   *argc* 2 > [if]

  1781.     *argv* array-pop drop

  1782.     long-example

  1783.   [else]

  1784.     short-example

  1785.   [then]

  1786. [then]

  1787. 

  1788. \ fmviolin.fth ends here