mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-07-02 03:58:34 -06:00
add mkVS
This commit is contained in:
@@ -23,13 +23,14 @@ lin
|
||||
ComplVA va ap = ResMay.insertComp ap (useV va) ;
|
||||
|
||||
-- : VS -> S -> VP ;
|
||||
-- ComplVS vs s =
|
||||
-- let vps = useV vs ;
|
||||
-- subord = SubjS {s=""} s ;
|
||||
-- in vps ** {} ;
|
||||
ComplVS vs s = ResMay.insertObj (linS s) (useV vs) ;
|
||||
|
||||
-- let vps = useV vs ;
|
||||
-- subord = SubjS {s=""} s ;
|
||||
-- in vps ** {} ;
|
||||
|
||||
{-
|
||||
-- : VQ -> QS -> VP ;
|
||||
-- : VQ -> QS -> VP ;s
|
||||
ComplVQ vq qs = ;
|
||||
|
||||
|
||||
|
||||
Reference in New Issue
Block a user