concrete TenseNno of Tense = CatNno, TenseX [Ant,Pol,AAnter,ASimul,PNeg,PPos] **  
  TenseScand with
  (ResScand = ResNno) ;