for (unsigned int n = 0; n < cs; ++n) {
		a = tPorte[n];
		b = n;
		unsigned int tmp = tDos[n];
		double tmp2 = tTps[n];
		while ((b > 0) && (tPorte[b - 1] > a))
		{
			tPorte[b] = tPorte[b - 1];
			tDos[b] = tDos[b - 1];
			tTps[b] = tTps[b - 1];
			b = b - 1;
		}
		tTps[b] = tmp2;
		tDos[b] = tmp;
		tPorte[b] = a;
	}