English Ord to Order

This commit is contained in:
aarne
2005-12-07 22:27:16 +00:00
parent 59d1b1271b
commit e6fe9fc07a
3 changed files with 6 additions and 6 deletions

View File

@@ -9,14 +9,14 @@ concrete CatEng of Cat = open ResEng, Prelude, (R = ParamX) in {
QS = {s : QForm => Str} ;
RS = {s : Agr => Str} ;
Cl = {s : Tense => Anteriority => Polarity => Ord => Str} ;
Slash = {s : Tense => Anteriority => Polarity => Ord => Str} ** {c2 : Str} ;
Cl = {s : Tense => Anteriority => Polarity => Order => Str} ;
Slash = {s : Tense => Anteriority => Polarity => Order => Str} ** {c2 : Str} ;
QCl = {s : Tense => Anteriority => Polarity => QForm => Str} ;
RCl = {s : Tense => Anteriority => Polarity => Agr => Str} ;
VP = {
s : Tense => Anteriority => Polarity => Ord => Agr => {fin, inf : Str} ;
s : Tense => Anteriority => Polarity => Order => Agr => {fin, inf : Str} ;
s2 : Agr => Str
} ;

View File

@@ -29,7 +29,7 @@ resource ParamEng = ParamX ** {
-- The order of sentence is needed already in $VP$.
Ord = ODir | OQuest ;
Order = ODir | OQuest ;
--2 For $Adjective$

View File

@@ -99,7 +99,7 @@ resource ResEng = ParamEng ** open Prelude in {
} ;
VerbForms : Type =
Tense => Anteriority => Polarity => Ord => Agr => {fin, inf : Str} ;
Tense => Anteriority => Polarity => Order => Agr => {fin, inf : Str} ;
VP : Type = {
s : VerbForms ;
@@ -229,7 +229,7 @@ resource ResEng = ParamEng ** open Prelude in {
-- For $Sentence$.
Clause : Type = {
s : Tense => Anteriority => Polarity => Ord => Str
s : Tense => Anteriority => Polarity => Order => Str
} ;
mkClause : Str -> Agr -> VP -> Clause =