forked from GitHub/gf-rgl
added linref PN
This commit is contained in:
@@ -126,6 +126,7 @@ concrete CatPol of Cat = CommonX - [CAdv] ** open ResPol, Prelude, (R = ParamX)
|
|||||||
linref
|
linref
|
||||||
A = \a -> a.pos.s1 ;
|
A = \a -> a.pos.s1 ;
|
||||||
A2 = \a -> a.pos.s1 ++ a.c.s ;
|
A2 = \a -> a.pos.s1 ++ a.c.s ;
|
||||||
|
PN = \pn -> pn.nom ;
|
||||||
|
|
||||||
};
|
};
|
||||||
|
|
||||||
|
|||||||
Reference in New Issue
Block a user