inclev=0
      include 'inc4'
      print *,'back to main prog'
      stop
      end