concrete numbersSwe of numbers = {

lincat
Number = {s : Str};

pattern
one = "ett";
two = "två";
three = "tre";
four = "fyra";
five = "fem";
six = "sex";
seven = "sju";
eight = "åtta";
nine = "nio";
ten = "tio";

--aNumber = "NUMMER";

}