hacky solution to name resolution warnings

This commit is contained in:
aarne
2007-07-05 14:08:58 +00:00
parent 4d228365ac
commit 63f060dcf6
4 changed files with 161 additions and 90 deletions

View File

@@ -0,0 +1,10 @@
resource StringOper = {
oper
SS : Type = {s : Str} ;
ss : Str -> SS = \x -> {s = x} ;
cc : SS -> SS -> SS = \x,y -> ss (x.s ++ y.s) ;
prefix : Str -> SS -> SS = \p,x -> ss (p ++ x.s) ;
}