more compatibility modules

This commit is contained in:
aarne committed 2008-09-09 14:06:46 +00:00
1 parent 4f560ea668
commit 95866cbe6c
3 files changed
+33

No files matched your search

+11
View File
@@ -0,0 +1,11 @@
--# -path=.:../romance:../abstract:../common
concrete CompatibilityCat of Compatibility = CatCat ** open Prelude, CommonRomance in {
-- from Noun 19/4/2008
lin
NumInt n = {s = \\_ => n.s ; isNum = True ; n = Pl} ;
OrdInt n = {s = \\_ => n.s ++ "."} ; ---
}
+11
View File
@@ -0,0 +1,11 @@
--# -path=.:../romance:../abstract:../common
concrete CompatibilityFre of Compatibility = CatFre ** open Prelude, CommonRomance in {
-- from Noun 19/4/2008
lin
NumInt n = {s = \\_ => n.s ; isNum = True ; n = Pl} ;
OrdInt n = {s = \\_ => n.s ++ "."} ; ---
}
+11
View File
@@ -0,0 +1,11 @@
--# -path=.:../romance:../abstract:../common
concrete CompatibilityIta of Compatibility = CatIta ** open Prelude, CommonRomance in {
-- from Noun 19/4/2008
lin
NumInt n = {s = \\_ => n.s ; isNum = True ; n = Pl} ;
OrdInt n = {s = \\_ => n.s ++ "."} ; ---
}