introducing multiple inheritance

This commit is contained in:
aarne
2004-09-15 14:36:27 +00:00
parent 9bc8ffe4d1
commit e6fd325d07
44 changed files with 214 additions and 74 deletions

View File

@@ -0,0 +1,6 @@
concrete UserMathEng of UserMath = UserEng, MathEng ** open Prelude in
{
lin
QSum x y = ss (["what is the sum of"] ++ x.s ++ "and" ++ y.s) ;
}