forked from GitHub/gf-rgl
fix type errors detected by the new type checker
This commit is contained in:
@@ -512,8 +512,8 @@ param
|
||||
|
||||
-- IL2018-02: a whole lot of times we only need number and person, not gender
|
||||
-- maybe switch to PersAgr at some point and halve the number of fields
|
||||
oper PersAgr : Type = {n : Number ; p : Person} ;
|
||||
oper Agr : Type = PersAgr ** {g : Gender} ;
|
||||
oper PersAgr : PType = {n : Number ; p : Person} ;
|
||||
oper Agr : PType = PersAgr ** {g : Gender} ;
|
||||
|
||||
oper
|
||||
pagr : Agr -> PersAgr = \agr -> { p = agr.p ; n = agr.n } ;
|
||||
|
||||
Reference in New Issue
Block a user