LocalInsert.scala

import scala.collection.Map

class LocalInsert(inst: Instance, solucion: List[List[Customer]]) {

	var mejor = solucion
	val ininsertables = new scala.collection.mutable.ListBuffer[Customer]()
	var nnv = List[Customer]()
	
	def insert(nonvisit: List[Customer]): List[List[Customer]] = {
//		println("\n********insert()********")
//		println("nonvisit (" + nonvisit.size + ") = " + nonvisit.map(_.num))

		// pruebo meter los no visitados
		nonvisit.foreach(insert)

		if (ininsertables.size == 0) {
			mejor
		}
		else {
			nnv = nonvisit
			var i = 0
			while (ininsertables.size > 0 && i < 15) {
				i = i + 1

				nnv = ininsertables.toList ++ (nnv -- ininsertables.toList)
				println("retry " + i)
				println("ininsertables = " + ininsertables.map(_.num).toList) 
				println("nueva nonvisit = " + nnv.map(_.num))

				ininsertables.clear
				mejor = solucion		// intento con la solucion inicial

				nnv.foreach(insert)
			}

//		   if (ininsertables.size == 0) {
//			   println("try " + i + " es factible")
//		   }
//		   else {
//			   println("infactible...")
//		   }
			
			mejor
		}
	}
	
   private def tryInsert(cust: Customer): List[List[List[Customer]]] = {
      var factibles = new scala.collection.mutable.ListBuffer[List[List[Customer]]]()

      mejor.foreach { camion =>
         for (pos <- 1 to camion.length) {
            val nuevo = camion.take(pos) ++ (cust :: camion.drop(pos))
            if (inst.camionFactible(nuevo)) {
               factibles += nuevo :: (mejor - camion)
            }
         }
      }

      factibles.toList
   }
	
	private def insert(nv: Customer) = {
		val factibles = tryInsert(nv)
		
//		 println("hay " + factibles.size + " opciones para insertar el cliente [" + nv.num + "]")

		// me quedo con el de menor largo
		if (factibles.size > 0) {
			mejor = factibles.tail.foldLeft(factibles.head){ (a,b) => if (inst.solLength(a) < inst.solLength(b)) a else b }
		}
		else if (factibles.size == 0) {
			ininsertables + nv
		}
	}
}