   integer iconsl,input
   logical lrderr
   common/iocom/iconsl,input,lrderr
