program mainmc2ntr,1
      call mc2ntr()
      stop
      end