Experimenting with transfer.

This commit is contained in:
aarne
2003-10-09 16:11:22 +00:00
parent 2ee936c7e2
commit ce253baf15
6 changed files with 173 additions and 1 deletions

View File

@@ -0,0 +1,7 @@
resource ResDecimal = {
param Zeros = noz | zz ;
oper ss : Str -> {s : Str} = \s -> {s = s} ;
oper mkz : Str -> {s : Zeros => Str} = \s -> {s = table {_ => s}} ;
}