concrete PredefCnc of PredefAbs = {
  lincat Int, String = {s : Str} ;
} ;