[ Skip to the content ]

Institute of Formal and Applied Linguistics Wiki

[ Back to the navigation ]

You are here: start » external » pdt

Differences

This shows you the differences between two versions of the page.

Link to this comparison view

Both sides previous revision Previous revision
Next revision Both sides next revision
external:pdt [2008/05/28 00:45]
stepanek 		external:pdt [2008/05/28 00:45]
stepanek
Line 29: Line 29:
  
 ==== m-rovina ==== ==== m-rovina ====
 +
  
  
Line 35: Line 36:
  
 <code perl> <code perl>
-ntred -d iso-8859-2 -NTe ' +  ntred -d iso-8859-2 -NTe ' 
-if ($this->attr("m/tag")=~/^D/ +  if ($this->attr("m/tag")=~/^D/ 
-    and my $ch=(first {$_->{afun}eq"Obj"} PML_A::GetEChildren($this))[0]){ +      and my $ch=(first {$_->{afun}eq"Obj"} PML_A::GetEChildren($this))[0]){ 
-  writeln($this->attr("m/lemma"),".",$this->{afun} +    writeln($this->attr("m/lemma"),".",$this->{afun} 
-    ,"\t",$ch->attr("m/form") +      ,"\t",$ch->attr("m/form") 
-    ,"\t",PML_A::GetSentenceString($root)) +      ,"\t",PML_A::GetSentenceString($root)) 
-} +  } 
-'  | grep -v 'Coord\|Apos\|ExD\|AuxC' | sort+  '  | grep -v 'Coord\|Apos\|ExD\|AuxC' | sort
 </code perl> </code perl>
  
 ==== t-rovina ==== ==== t-rovina ====
  

[ Back to the navigation ] [ Back to the content ]