X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=Documentation%2Fsnippets%2Fgenerating-random-notes.ly;h=43b32ca530775c86c530516556f1554cddd3d34b;hb=5113ffa035f243c3c4a3d453f731556474893b98;hp=65e897e3973c95388965eef09263b2689b177960;hpb=a42aaa559b71ce5776795fa11a7e1df9110d85b7;p=lilypond.git diff --git a/Documentation/snippets/generating-random-notes.ly b/Documentation/snippets/generating-random-notes.ly index 65e897e397..43b32ca530 100644 --- a/Documentation/snippets/generating-random-notes.ly +++ b/Documentation/snippets/generating-random-notes.ly @@ -4,22 +4,10 @@ %% and then run scripts/auxiliar/makelsr.py %% %% This file is in the public domain. -\version "2.15.20" +\version "2.15.40" \header { - lsrtags = "pitches" - -%% Translation of GIT committish: 8b93de6ce951b7b14bc7818f31019524295b990f - texidoces = " -Este fragmento de código basado en Scheme genera -24 notas aleatorias (o tantas como se necesiten), basándose en la -hora actual (o en cualquier número pseudo-aleatorio que se -especifique en su lugar, para obtener las mismas notas aleatorias -cada vez): es decir, para obtener distintos patrones de notas, -sólo tiene que modificar este número. - -" - doctitlees = "Generación de notas aleatorias" + lsrtags = "pitches, really-cool, scheme-language" texidoc = " This Scheme-based snippet generates 24 random notes (or as many as @@ -31,6 +19,7 @@ get different random note patterns, just change this number. doctitle = "Generating random notes" } % begin verbatim + \score { { $(let ((random-state (seed->random-state (current-time))))