integer         istv
      common /strnum/ istv