introducing multiple inheritance

2004-09-15 14:36:27 +00:00
1 parent 7697b222d0
commit a25ee154e7
@@ -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) ;
+  }
+