;;; -*- Mode: TDL; Coding: utf-8 -*- 

;;; Authors: 
;;; 2002-2006 Berthold Crysmann

;;; Copyright: DFKI GmbH


pvp-lrule-0 := pvp-lrule & 
	       [synsem [loc [cat.subcat.list #rest],
			nonloc contains-slash & 
			    [slash <! 
				    [cat.subcat.list #rest ] 
				    !>]],
		args <[synsem.loc.cat.subcat.list <> ]>].

pvp-lrule-1 := 
	       pvp-lrule & 
	       [synsem [loc [cat.subcat.list <#up . #rest>],
			nonloc contains-slash & 
			    [slash <! [cat.subcat.list #rest ] !>]],
		args <[synsem.loc.cat.subcat.list <#up>]>].

pvp-lrule-2 := pvp-lrule & 
	       [synsem [loc [cat.subcat.list <#d1, #up . #rest>],
			nonloc contains-slash & 
			    [slash <! [cat.subcat.list <#d1 . #rest> ] !>]],
		args <[synsem.loc.cat.subcat.list <#up & [loc.cat.opt -]>]>].

pvp-lrule-3 := pvp-lrule & 
	       [synsem [loc [cat.subcat.list <#d1,#d2, #up . #rest>],
			nonloc contains-slash & 
			    [slash <! [cat.subcat.list <#d1,#d2 . #rest> ] !>]],
		args <[synsem.loc.cat.subcat.list <#up & [loc.cat.opt -]>]>].