int L = N;
int O = @;

write(){
	P(L);
	tab[ilibre] = V;
	ilibre++;
	if(ilibre==N) iLibre = @;

	V(O);
}


read(){
	P(O);
	V = tab[ioccupe];
	ioccupe++;
	if(ioccupe==N) ioccupe = @;

	V(L);
}

// Problème d'indice en fonction de qui écrit en premier, 
puis problème de si on fini de lire avant de finir d'écrire sur la bonne case

multREAD()
	var j;
	P(O);
	P(COM3);
	j = tabTransiOcc[j