copyright (C) 2001  MSC-RPN COMM  %%%MC2%%%
      integer un_geo,un_rstrt,un_gbusper,un_ser,un_zono
      common /lun/ un_geo,un_rstrt,un_gbusper,un_ser,un_zono