TENNIS CORPORATIF DU TREGOR SAISON 2003-2004

"; $concaten.="$table[$i]\n"; } return $concaten; } function isLibre ($nom_ter,$proprio) { $retour=true; $taille=count($proprio); for($i=0;$i<$taille;$i++) { $test=strstr($proprio[$i],$nom_ter); if($test!=false) { $retour=false; break; } } return $retour; } function findIndex ($semaine) { $taille=count($semaine); $chaine="S35 \' SEMAINE"; $retour=-1; for($i=0;$i<$taille;$i++) { if(strcmp($chaine,$semaine[$i])>0) { $retour=$i; break; } } return $retour; } //echo ("equip:
$equip
"); $fait.=stripslashes($equip); //echo ("div:
$equip_div_fait
"); $fait.="\n; donnee des divisions des equipes ;\n\n"; $fait.=$equip_div_fait; $fait.="\n; donnee des journees ;\n\n"; for($i=0;$i<$nb_journee;$i++) { //echo "
";
	//echo "J$i ' JOUR\n";
	$fait.="J$i ' JOUR\n";
	//echo "
";
	}
//echo "
";
$taille=count($terrain);

$fait.="\n; donnees des courts (jour+h+lieu) possibles ;\n\n";

	for($i=0;$i<$taille;$i++)
	{
	//echo "
";
	//echo "$terrain[$i] ' COURT\n";
	$fait.="$terrain[$i] ' COURT\n";
	//echo "
";
	
	}

$fait.="\n; semaines a considerer ;\n\n";
//imprimTable1 ($semaine,"semaine");
$index=findIndex($semaine);
//echo "
index:$index
";	
	for($i=count($semaine)-1;$i>$index-1;$i--)
	{
		$fait.=stripslashes($semaine[$i])."\n";
	}
	for($i=$index-1;$i>-1;$i--)
	{
		$fait.=stripslashes($semaine[$i])."\n";
	}



$libre;
	for($i=0;$i<$taille;$i++)
	{
		//echo "terrain:$terrain[$i]";
		//echo "
";
		
		if(isLibre($terrain[$i],$proprio))
		{
		$libre[]="$terrain[$i] EST_LIBRE VRAI";
		}	
	
	}
$fait.="\n; terrains libres : aucune equipe proprietaire ;\n\n";
$fait.=imprimTable1 ($libre,"libre");

$fait.="\n; tel terrain ne peut etre occupe que par telle equipe ;\n\n";
$fait.=imprimTable1($proprio,"proprio");

$fait.="\n; tel terrain ne peut pas etre utilise par telle equipe (contrainte de jour) ;\n\n";
$fait.=imprimTable1 ($impossible,"impossible");

echo "
";
echo "
";
echo "fait:";
echo "
";
echo "
$fait
";
echo "
";
echo "
";
echo "";
echo "";
echo "
";
?>