concrete LexSwe of Lex = CatSwe ** open ParadigmsSwe in {
  lin 
    zero_PN = regPN "noll" neutrum ;
    successor_N2 = 
      mkN2 (mk2N "efterföljare" "efterföljare") (mkPreposition "till") ;
    even_A = regA "jämn" ;

}