bool ampliar(tList &l,int i){
	bool ok=false;
	tProPtr aux= new tProduct[i];
	if(aux!=NULL){
		for (int i2=0;i2<l.ctr;i2++) aux[i2]=l.products[i2];
		delete l.products;
		l.products=aux;
		l.capacidad=i;
		ok=true;
	}
	return ok;
}