blob: 7e512ce6d59230a7dd61ea8210ba16b2aef8afb9 (
plain)
1
2
3
4
5
6
7
8
|
--# -path=.:present
concrete FaceIta of Face = FaceI - [Like] with
(Syntax = SyntaxIta),
(LexFace = LexFaceIta) ** open SyntaxIta in {
lin Like p o =
mkCl (mkNP this_Quant o) like_V2 p ;
}
|