Changeset 73

Timestamp:

02/20/10 18:35:17 (2 years ago)

Author:

cscm

Message:

small script for getting word approximations

Location:

trunk/scripts

Files:

• get_all_words.pl (added)
• make_acoustic_model.pl (modified) (5 diffs)

trunk/scripts/make_acoustic_model.pl

@@ -455 +455 @@
     "embarras", "enterrer", "fourrer", "marronnier", "arrondir", "arrosoir",
     # ik
-    "rubrique", "brique", "fabrique", "historique", "théorique", "électrique", "acrobatique", "agronomique", "analogique",
+    "rubrique", "brique", "fabrique", "historique", "théorique", "électrique", "acrobatique", "agronomique", "analogique",
     # W~
     "certain", "contraint", "cubain", "entrain", "gain", "grain", "demain", "humble",
@@ -473 +473 @@
     "vaillant", "travailleur", "travailler",
     # _!
-    "humain", "humanitaire", "humanité", "humide", "humilier", "humus", "humeur",
+    "humain", "humanitaire", "humanité", "humide", "humilier", "humus", "humeur",
     # Z 
     "jardin", "jaquette", "jargon", "jaser", "jazz", "javanais", "pyjama",
@@ -479 +479 @@
     "aluminium", "album",
     # wa
-    "abattoir", "aléatoire", "auditoire",
+    "abattoir", "aléatoire", "auditoire",
     # au
     "applaudir", "assaut",
@@ -485 +485 @@
     "suicide", "suisse", "suite", "suivi", "suivre", "suie", "suicider", "ensuite",
     # A~
-    "échange", "change", "changement",
+    "échange", "change", "changement",
     # z
-    "division", "provision", "révision", "vision"
+    "division", "provision", "révision", "vision"
 
 ) {
@@ -555 +555 @@
 #  Fisher-Yates shuffle
 my $array = \@all_words_table;
-my $i;
 for ($i = @$array; --$i; ) {
     my $j = int rand ($i+1);