concrete SentencesNor of Sentences = NumeralNor ** SentencesI - [NameNN] with 
  (Syntax = SyntaxNor),
  (Symbolic = SymbolicNor),
  (Lexicon = LexiconNor) ** open SyntaxNor, (P = ParadigmsNor) in

{

lin NameNN = mkNP (P.mkPN "NN") ;

}